威纶通配方——宏指令.doc

威纶通配方——宏指令.doc

ID:56049465

大小:26.50 KB

页数:9页

时间:2020-06-19

威纶通配方——宏指令.doc_第1页
威纶通配方——宏指令.doc_第2页
威纶通配方——宏指令.doc_第3页
威纶通配方——宏指令.doc_第4页
威纶通配方——宏指令.doc_第5页
资源描述:

《威纶通配方——宏指令.doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、/**********************************************************行号刷新——number**********************************************************/macro_commandmain()shortindex,array[10]     //数组array[10]是存放行号的数组boolOFF=false,ON=true GetData(index,"本机触摸屏",LW,9000,1)//a用于提取索引寄存器的当前值 array[0]

2、=1+index/70      //索引寄存器的值以700的倍数递增,即以当前页面中占用地址总数为基数array[1]=array[0]+1array[2]=array[1]+1array[3]=array[2]+1array[4]=array[3]+1array[5]=array[4]+1array[6]=array[5]+1array[7]=array[6]+1array[8]=array[7]+1array[9]=array[8]+1SetData(array[0],"本机触摸屏",RW,7800,10)//RW7800~RW7809

3、中存放行号SetData(OFF,"本机触摸屏",LB,4,1)//清零宏指令触发位              endmacro_command /**********************************************************新增——add**********************************************************/macro_commandmain()shortname[5],temp[5],data[65]shorti,var=0,CurtLine=0,inde

4、x=0,NextLine=0boolOFF=false,flag=false GetData(CurtLine,"本机触摸屏",RW,8000,1)       //获取RW8000的值,即保存的行数 GetData(name[0],"本机触摸屏",LW,0,5)//获取LW0的值,即输入的配方名   GetData(data[0],"PanasonicFP",DT,32700,65)//获取当前HMI的数据输入值 //判断数据表是否填满,若未填满,则判断是否有重名ifCurtLine==100then       flag=true    

5、   SetData(flag,"本机触摸屏",LB,22,1)else       //判断是否有重名       fori=0to99step1                 GetData(temp[0],"本机触摸屏",RW,var,5)//遍历每一行的配方名              ifname[0]==temp[0]andname[1]==temp[1]andname[2]==temp[2]andname[3]==temp[3]andname[4]==temp[4]  then                       fl

6、ag=true                     SetData(flag,"本机触摸屏",LB,21,1)//若有重名则跳出“警告”框,提示该配方已存在                                     else                   var=var+70//否则开始查询下一行                        endif                                  nexti        //遍历所有行未找到匹配值,就将配方名和数据保存在数据表中       i

7、fflag==falsethen                var=0              var=70*CurtLine    //当前行的索引量              SetData(name[0],"本机触摸屏",RW,var,5)//将LW0中的配方名保存至新地址RW(0+var)中              SetData(data[0],"本机触摸屏",RW,5+var,65)//将DT32700中连续的65个数据保存在RW(5+var)65个连续的地址中              //下面程序是实现数据表行数增加 

8、           ifCurtLine<100then                     NextLine=CurtLine+1             

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。