不同控件在系统键盘设置好参数存储到用户存储区
提示
编辑ok按钮的弹起事件,在page指令前添加以下代码
完整代码如下
1//调用此页之前，先对此页的loadpageid.val和loadcmpid.val赋值就可以了，其他的逻辑本页会自动实现
2//loadpageid.val表示调用页的页面ID,loadcmpid.val表示调用页的控件ID
3if(p[loadpageid.val].b[loadcmpid.val].type==54)
4{
5 covx input.txt,p[loadpageid.val].b[loadcmpid.val].val,0,0
6}else if(p[loadpageid.val].b[loadcmpid.val].type==59)
7{
8 covx input.txt,temp.val,0,0
9if(temp.val<0)
10{
11 temp.val*=-1
12}
13for(temp2.val=0;temp2.val<p[loadpageid.val].b[loadcmpid.val].vvs1;temp2.val++)
14{
15 temp.val*=10
16}
17 p[loadpageid.val].b[loadcmpid.val].val=temp.val
18 strlen input.txt,temp.val
19 temp.val--
20 while(temp.val>=0)
21{
22 substr input.txt,tempstr.txt,temp.val,1
23 if(tempstr.txt==".")
24 {
25 substr input.txt,tempstr.txt,temp.val+1,p[loadpageid.val].b[loadcmpid.val].vvs1
26 covx tempstr.txt,temp2.val,0,0
27 strlen tempstr.txt,temp.val
28 while(temp.val<p[loadpageid.val].b[loadcmpid.val].vvs1)
29 {
30 temp2.val*=10
31 temp.val++
32 }
33 p[loadpageid.val].b[loadcmpid.val].val+=temp2.val
34 temp.val=-1
35 }
36 temp.val--
37}
38substr input.txt,tempstr.txt,0,1
39if(tempstr.txt=="-")
40{
41 p[loadpageid.val].b[loadcmpid.val].val*=-1
42}
43}else
44{
45 p[loadpageid.val].b[loadcmpid.val].txt=input.txt
46}
47//区分不同页面的不同变量
48if(loadpageid.val==0&&loadcmpid.val==page0.n0.id)
49{
50 covx input.txt,sys0,0,0
51 //如果是n0，写在10的位置
52 wepo sys0,10
53}else if(loadpageid.val==0&&loadcmpid.val==page0.n1.id)
54{
55 covx input.txt,sys0,0,0
56 //如果是n1，写在14的位置
57 wepo sys0,14
58}else if(loadpageid.val==0&&loadcmpid.val==page0.n2.id)
59{
60 covx input.txt,sys0,0,0
61 //如果是n2，写在18的位置
62 wepo sys0,18
63}
64page loadpageid.val
注意
page指令之后的指令是不会被执行的，因为已经跳转到别的页面了。
存储变量类型为txt
完整的代码如下
1//调用此页之前，先对此页的loadpageid.val和loadcmpid.val赋值就可以了，其他的逻辑本页会自动实现
2//loadpageid.val表示调用页的页面ID,loadcmpid.val表示调用页的控件ID
3if(p[loadpageid.val].b[loadcmpid.val].type==54)
4{
5 covx input.txt,p[loadpageid.val].b[loadcmpid.val].val,0,0
6}else if(p[loadpageid.val].b[loadcmpid.val].type==59)
7{
8 covx input.txt,temp.val,0,0
9if(temp.val<0)
10{
11 temp.val*=-1
12}
13for(temp2.val=0;temp2.val<p[loadpageid.val].b[loadcmpid.val].vvs1;temp2.val++)
14{
15 temp.val*=10
16}
17p[loadpageid.val].b[loadcmpid.val].val=temp.val
18strlen input.txt,temp.val
19temp.val--
20while(temp.val>=0)
21{
22 substr input.txt,tempstr.txt,temp.val,1
23 if(tempstr.txt==".")
24 {
25 substr input.txt,tempstr.txt,temp.val+1,p[loadpageid.val].b[loadcmpid.val].vvs1
26 covx tempstr.txt,temp2.val,0,0
27 strlen tempstr.txt,temp.val
28 while(temp.val<p[loadpageid.val].b[loadcmpid.val].vvs1)
29 {
30 temp2.val*=10
31 temp.val++
32 }
33 p[loadpageid.val].b[loadcmpid.val].val+=temp2.val
34 temp.val=-1
35 }
36 temp.val--
37}
38substr input.txt,tempstr.txt,0,1
39if(tempstr.txt=="-")
40{
41 p[loadpageid.val].b[loadcmpid.val].val*=-1
42}
43}else
44{
45 p[loadpageid.val].b[loadcmpid.val].txt=input.txt
46}
47//区分不同页面的不同变量
48if(loadpageid.val==0&&loadcmpid.val==page0.t0.id)
49{
50 //如果是t0，写在100的位置,注意分配好存储所需的掉电存储空间空间
51 //此处仅为演示，默认的input.txt_maxl为32，会写入32+1=33个字节，占用100-132
52 wepo input.txt,100
53}else if(loadpageid.val==0&&loadcmpid.val==page0.t1.id)
54{
55 //如果是t1，写在120的位置,注意分配好存储所需的掉电存储空间空间
56 //此处仅为演示，默认的input.txt_maxl为32，会写入32+1=33个字节，占用120-152
57 wepo input.txt,120
58}else if(loadpageid.val==0&&loadcmpid.val==page0.t2.id)
59{
60 //如果是t2，写在140的位置,注意分配好存储所需的掉电存储空间空间
61 //此处仅为演示，默认的input.txt_maxl为32，会写入32+1=33个字节，占用140-172
62 wepo input.txt,140
63}
64page loadpageid.val
注意
page指令之后的指令是不会被执行的，因为已经跳转到别的页面了。
在系统键盘设置好参数存储到用户存储区-样例工程下载
演示工程下载链接：