[求助]关于scanf

abcdefg123

帮帮忙啊！！！

leesoft

LavaX没有scanf，可自行实现。

songfei

比如，输入数字
#define ENTER_KEY 13
#define LT_KEY 23
long inputn(char start)
{
int i;
int n,sign;
char ch,row,col;
long value;
char numberc[11];
char string[12];
row=start/20;col=start%20;
strcpy(numberc,"0bnmghjtyu");
memset(string,0,12);
sign=1;
n=0;
value=0;
for(;;)
{
n=strlen(string);
Locate(row,col);
memset(_TEXT+start,0,156-start);
printf("%s_",string);
ch=getchar();
for(i=0;i<10;i++)
if(ch==numberc){ch=i+'0';break;}
else if(ch==20)ch='-';

if(isdigit(ch)&&n<10)string[n]=ch;
else if (ch=='-')
{
   if(sign==1)
        {
           memmove(string+1,string,10);
           string[0]=ch;
         }
   else if(sign==-1){memmove(string,string+1,10);string[n-1]=0;}
   sign=-sign;
}
else if(ch==LT_KEY&n)string[n-1]=0;
else if (ch==ENTER_KEY&&n) {string[n]=0;break;}
}
            if(sign==1)i=0;else i=1;
             for(;i<n;i++)
                 {
                 ch=string;
                 value=value*10+(ch&0xf);
                 }
               return sign*value;
            
}

void main()
{
long value;
SetScreen(1);
value=inputn(0);
printf("\n%d",value);
getchar();
}

songfei

输入字符串
#define LT_KEY 23
#define ENTER_KEY 13
void inputs(long object,char start,int maxlen)
{
    char Ch[3];
    int Pos,word,n;
    char mode,row,col;
    row=start/20;col=start%20;
    n=0 ;
    mode=0 ;
    Ch[2]=0 ;
    memset(object,0,maxlen);
    for(;;)
    {
        memset(_TEXT+start,0,100-start);
        n=strlen(object);
        Locate(row,col);
        printf("%s_",object);
     
        word=GetWord(mode);
        mode=3 ;
        Ch[0]=word ;
        
        if(isprint(Ch[0])&&n<maxlen)
        {
            *(object+n)=Ch[0];
            continue ;
        }
        
        else if(Ch[0]>=160&&n<maxlen)
        {
            Ch[1]=word>>8 ;
            strcpy(object+n,Ch);
            continue ;
        }
  
        else if(Ch[0]==LT_KEY&&n)
        {
           
            if(*(object)&160)
            {
                n--;
                memset(object+n-1,0,2);
            }
            else *(object+n-1)=0 ;
            continue ;
        }
        
        else if(Ch[0]==ENTER_KEY&&n)
        {
            *(object+n)=0 ;
            break ;
        }
        
        else if(Ch[0]==27)
        {
            memset(object,0,maxlen);
            return ;
        }
        
    }
   
}

void main()
{char string[32];
   
    printf("PLEASE INPUT:");
    inputs(string,20,30);
    printf("\n%s",string);
    getchar();
   
   
}

kydtc

相当于INPUT

chenyanyi

有没有搞错，实现这个如此麻烦，建议LEE加入相关函数！

leesoft

怕麻烦就别学编程。

qiqingling

说的对啊

chenyanyi

我栽了！我在认真研究一下哦

aboysbyh

以下是引用leesoft在2005-8-4 15:51:03的发言：[BR]怕麻烦就别学编程。

语言创造着就应该考虑之后编程的人
应该给他们提供方便
除非....

leesoft

各种语言有各种语言的特性，不能说别的语言有什么其他语言也得有。

abcdefg123

楼上songfei给的那些好象有问题!
请再写一遍!

JAY

贴一个我的吧
   

1. 
   
2. 建立一个Input函数，用户输入一长串字符（注：此代码仅能使用于LavaX1.0，其他版本请将GetWord函数替换为相应的函数）
   
3.     #define FONT_SMA   0
   
4.     #define FONT_LAR   1
   
5.     #define EDIT_INS   0
   
6.     #define EDIT_OVR   1
   
7.     #define KEY_LEFT   23
   
8.     #define KEY_RIGHT  22
   
9.     #define KEY_UP     20
   
10.     #define KEY_DOWN   21
    
11.     #define KEY_ENTER  13
    
12.     #define KEY_SHIFT  18
    
13.     #define KEY_CAPS   26
    
14.     #define KEY_ESC    27
    
15.     #define KEY_HELP   25
    
16.     #define KEY_SPC    32
    
17.     #define KEY_F1     28
    
18.     #define KEY_F2     29
    
19.     #define KEY_F3     30
    
20.     #define KEY_F4     31
    
21.     //文字缓存
    
22.     char textBuf[100];
    
23.     //保存地址，长度，显示坐标，字体
    
24.     char Input(long textAdd,char length,char textX,char textY,char font){
    
25.         char strPt;//字串指针、长度
    
26.         char curX,curY,curL;//光标坐标、长度
    
27.         int word;//获得的单个字符的ASCII或GB码
    
28.         char editMode;
    
29.         strPt=0;
    
30.         word=0;
    
31.         editMode=EDIT_INS;
    
32.         if(font==FONT_SMA){//判断字体
    
33.             curL=6;
    
34.             curY=textY+11;
    
35.         }
    
36.         else{
    
37.             curL=8;
    
38.             curY=textY+15;
    
39.         }
    
40.         while(1){
    
41.             Refresh();
    
42.             TextOut(textX,textY,textAdd,0x40+0x80*font);//显示当前字串
    
43.             curX=textX+strPt*curL;
    
44.             if(editMode==EDIT_INS){//绘制光标
    
45.                 if(*(textAdd+strPt)>=0xa1){Line(curX,curY,curX+curL*2-1,curY,2);}
    
46.                 else{Line(curX,curY,curX+curL-1,curY,2);}
    
47.             }else{
    
48.             if(*(textAdd+strPt)>=0xa1){Box(curX,curY-curL*2,curX+curL*2-1,curY,1,2);}else
    
49.                 {Box(curX,curY-curL*2,curX+curL-1,curY,1,2);}
    
50.             }
    
51.             word=GetWord(3);
    
52.             if(word==KEY_ENTER||word==KEY_ESC){break;}
    
53.             if(word==KEY_F1){//切换插入、覆盖
    
54.                 if(editMode==EDIT_INS){editMode=EDIT_OVR;}
    
55.                 else{editMode=EDIT_INS;}
    
56.                 continue;
    
57.             }
    
58.             if(word==KEY_LEFT){//左移光标
    
59.                 if(strPt>0){
    
60.                     if(*(textAdd+strPt-1)>=0xa1){strPt=strPt-2;}
    
61.                     else{strPt--;}
    
62.                 }
    
63.                 continue;
    
64.             }
    
65.             if(word==KEY_RIGHT){//右移光标
    
66.                 if(strPt<strlen(textAdd)){
    
67.                     if(*(textAdd+strPt)>=0xa1){strPt=strPt+2;}
    
68.                     else{strPt++;}
    
69.                 }
    
70.                 continue;
    
71.             }   
    
72.             if(word==KEY_F2){//删除字符
    
73.                 if(*(textAdd+strPt)==NULL){
    
74.                     if(strPt>0){
    
75.                         if(*(textAdd+strPt-1)>=0xa1){strPt=strPt-2;}
    
76.                         else{strPt--;}
    
77.                     }
    
78.                 }
    
79.                 if(*(textAdd+strPt)>=0xa1){strcpy(textBuf,textAdd+strPt+2);}
    
80.                 else if(*(textAdd+strPt)!=0){strcpy(textBuf,textAdd+strPt+1);}
    
81.                 strcpy(textAdd+strPt,textBuf);
    
82.                 continue;
    
83.             }
    
84.             //加入字符
    
85.             if(!isgraph(word&0xff) && (word>>8==0)){continue;}//合法字符
    
86.             if(editMode==EDIT_INS||*(textAdd+strPt)==NULL){//插入模式，或是光标在最后为新加的字符腾出空间
    
87.                 if(word>>8!=0&&strlen(textAdd)>=length-1){continue;}//判断长度是否超过规定长度
    
88.                 if(word>>8==0&&strlen(textAdd)>=length){continue;}
    
89.                 strcpy(textBuf,textAdd+strPt);
    
90.                 if(word>>8!=0){strcpy(textAdd+strPt+2,textBuf);}
    
91.                 else{strcpy(textAdd+strPt+1,textBuf);}
    
92.             }
    
93.             if(word>>8!=0){//汉字
    
94.                 if(*(textAdd+strPt)<0xA1&&editMode==EDIT_OVR){//覆盖英文或数字
    
95.                     if(strlen(textAdd)>=length)continue;
    
96.                     strcpy(textBuf,textAdd+strPt);
    
97.                     strcpy(textAdd+strPt+1,textBuf);
    
98.                 }
    
99.                 *(textAdd+strPt)=word&0xff;
    
100.                 *(textAdd+strPt+1)=word>>8;
     
101.                 strPt=strPt+2;
     
102.             }else{//英文或数字
     
103.                 if(strlen(textAdd)>=length&&*(textAdd+strPt)==NULL)continue;
     
104.                 if(*(textAdd+strPt)>=0xA1&&editMode==EDIT_OVR){//覆盖汉字
     
105.                     strcpy(textBuf,textAdd+strPt+1);
     
106.                     strcpy(textAdd+strPt,textBuf);
     
107.                 }
     
108.                 *(textAdd+strPt)=word&0xff;
     
109.                 strPt++;
     
110.                 }
     
111.         }
     
112.         if(word==KEY_ESC)return 0;
     
113.         return!0;
     
114.     }
     
115.     void main(){
     
116.         char text[20];
     
117.         memset(text,0,20);
     
118.         Input(text,18,10,10,1);
     
119.     }
     

复制代码

[此贴子已经被作者于2005-9-2 18:41:11编辑过]

sxdxyj

方案一：可以输入一个long型整数，也就是从-2147483648到2147483647间的任一整数。

方案二：只可输入一个小于256的整数。兄弟们不妨看看，进而指点指点，谢谢。。。

方案一：

/*可以输入带有负号long型整数*/<br>long inputn(int y,int x)<br>{int sign,k,i,j,num[10];<br>long n;<br>char ch,zm[11];<br>strcpy (zm,"0bnmghjtyu");<br>i=0;n=0;sign=1;<br>for (;;)<br>{ch=getchar();<br>for (k=0;k<10;k++)<br>if (ch==zm[k]) {num[i++]=k;Locate (y,x+i);printf ("%d",k);break;}<br>if (ch==13) break;<br>else if (ch==20&&i==0) {Locate(y,x+i);printf ("-");sign=sign*(-1);} <br>if (ch==23) {Locate (y,x+i);printf(" ");i--;if (sign==-1&&i==-1) {sign=1;i++;}}<br>}printf("\n");<br>for (j=0;j<i;j++)<br>n=n*10+num[j];<br>return (n*sign);<br>}<br>void main()<br>{long k,l;<br>SetScreen(1);<br>printf ("Input the num:");<br>k=inputn(1,0);<br>printf("The num is %d\n",k);printf("Input the sec num:");<br>l=inputn(4,0);printf("The sec num is %d\n",l);printf("k+l=%d",k+l);<br>getchar();<br>}

方案二：

void scanf(char p,long *x)<br>{int k,i,j,num[10];<br>char ch, zm[11];<br>strcpy (zm,"0bnmghjtyu");<br>i=0;<br>for (;;)<br>{ch=getchar();<br>for (k=0;k<10;k++)<br>if (ch==zm[k]) {num[i++]=k;Locate (0,0+i-1);printf ("%d",k);break;}<br>if (ch==13) break;<br>else if (ch==23) {Locate (0,0+i-1);printf(" ");i--;}<br>}printf("\n");<br>for (j=0;j<i;j++)<br>*x=*x*10+num[j];<br>}<br>void main()<br>{long k;<br>SetScreen(1);<br>printf ("");<br>scanf("%d",&k);<br>printf("The num is: %d\n",k);getchar();<br>}<br>

轩辕游侠

真麻烦哈，但为了学lava，豁出去了。

songfei

以下是引用abcdefg123在2005-9-2 10:47:00的发言：[BR]楼上songfei给的那些好象有问题!
请再写一遍!

埃、代码贴到论坛里就变形了

zfuwen

可惜的只是输入一行，有什么用？ TC800上的GetWord 已经写好了， 不过，只能用拼音输入法 可惜的是输入多行时不好处理，请高手帮忙

xintu1987

啊哈~请问LEE是不是在LAVAX里面加入SCANF语句比较麻烦还是其它的原因？

如果有SCANF的话，程序就比较好吧~

yf350439756

呵呵,我没有打算学什么LAVA哦

leesoft

scanf是给控制台程序用的，对于游戏以及图形界面程序没有任何帮助！