PLC与触摸屏实现翻页

admin

近段时间开发一种机器系统，其中有一项功能是将每天的机器工作数目在触摸屏中显示出来，天数要两年；并且只要输入日期，触摸屏上就可以将任意时间的数目进行统计。　　画面讲述
　　
　　 本系统用的是OMRON的CQM1H-51的plc，触摸屏用的是Pro-face的GP577R。其画面如下图1-A所见。
　　图中所示的B1按下后，就可以设置统计日期；设置完后，再按一下B2，就会统计两年内任意日期内的工件数。A1下的是指示数，从1～730，A2下的是年月日，如（030528）指的是03年05月28日。A3即每天的工件数。C1是向上翻页键，C2是向上翻行键，C3是向下翻页键，C4是向下翻行键。
　　

　　地址分布
　　
　　 触摸屏的系统地址从DM500开始。
　　 A1下的数字用的是一个触摸屏中的N标签，其功能如图2-A所示。地址是触摸屏的内部地址区域，我用的是LS2000; N标签上有一个运算，从上到下分别是LS2000+1~LS2000+10。
　　 A2下的数字用的是一个触摸屏中的两位E标签，其功能如图2-B所示。地址是PLC的内部地址区域，我用的是DM1000~1001。从上到下分别是DM1000~DM1018。
　　 A3下的数字用的也是一个触摸屏中的两位E标签，其功能如图2-C所示。地址是PLC的内部地址区域，我用的是DM2000~2001。从上到下分别是DM2000~DM2018。
　　 B1是触摸键，用来设定起始日期和终止日期日期。B2=22915，用来触发统计总的工件数。
　　 C1~C4用的是一个触摸屏中的T标签，其功能如图2-D所示。地址是触摸屏的内部地址区域，C1=LS50102，C2=LS50103，C3=LS50100 ，C4=LS50101。
　　
　　
　　触摸屏程序
　　
　　Pro-face的触摸屏有D-Script Editor功能，请大家看以下的程序。
　　
　　 ID : 0000
　　 Trigger : Bit Rising ， Edge Bit Address : LS050100
　　 Formula :
　　 if ([w:LS1000]<=758)
　　 {[w:LS1000]=[w:LS1000]+2
　　 }
　　 endif
　　 Date Type : BCD Data Length : 16 Bit
　　此程序的是用来向下翻行，即指示值（A1）小于758时，将画面向下翻一行。
　　 ID : 0001
　　 Trigger : Bit Rising ， Edge Bit Address : LS050101
　　 Formula :
　　 if ([w:LS1000]<=720)
　　 {[w:LS1000]=[w:LS1000]+40
　　 }
　　 endif
　　 Date Type : BCD Data Length : 16 Bit
　　此程序的是用来向下翻页，即指示值（A1）小于720时，将画面向下翻一页。
　　 ID : 0002
　　 Trigger : Bit Rising ， Edge Bit Address : LS050102
　　 Formula :
　　 if ([w:LS1000]>=40)
　　 {[w:LS1000]=[w:LS1000]-40
　　 }
　　 endif
　　 Date Type : BCD Data Length : 16 Bit
　　此程序的是用来向上翻页，即指示值（A1）大于等于40时，将画面向上翻一页。
　　 ID : 0003
　　 Trigger : Bit Rising ， Edge Bit Address : LS050103
　　 Formula :
　　 if ([w:LS1000]>=2)
　　 {[w:LS1000]=[w:LS1000]-2
　　 }
　　 endif
　　 Date Type : BCD Data Length : 16 Bit
　　此程序的是用来向上翻行，即指示值（A1）大于等于2时，将画面向上翻一行。
　　 ID : 0004
　　 Trigger : Timer Fn ， Timer Duration : 1
　　 Formula :
　　 [w:LS2000]=[w:LS1000]/2
　　 Date Type : BCD Data Length : 16 Bit
　　此程序的显示指示数A1。
　　
　　PLC程序
　　
　　[NETWORK]
　　 Name="calendar"（本段是将每天的日期转换到触摸屏中）
　　[STATEMENTLIST]
　　 LD 253.13
　　 OUT TR0
　　 CMP DM0502 HR92 //DM0502是系统的年
　　 AND NOT 255.06
　　 LD TR0
　　 AND 049.02
　　 OR LD
　　 AND NOT TIM252
　　 AND NOT 049.03


　　 AND NOT 049.04
　　 OUT 049.02
　　 TIM 252 #0010
　　 LD TR0
　　 MOV DM0502 HR92
　　 CMP DM0503 HR93 //DM0503是系统的月
　　 AND NOT 255.06
　　 LD TR0
　　 AND 049.03
　　 OR LD
　　 AND NOT TIM253
　　 AND NOT 049.04
　　 OUT 049.03
　　 TIM 253 #0010
　　 LD TR0
　　 MOV DM0503 HR93
　　 CMP DM0504 HR94 //DM0504是系统的日
　　 AND NOT 255.06
　　 OUT 049.04
　　 LD TR0
　　 MOV DM0504 HR94
　　 AND TIM252
　　 LD TR0
　　 AND TIM253
　　 OR LD
　　 LD TR0
　　 AND 049.04
　　 OR LD
　　 OUT TR1
　　 ADD #0002 DM0070 DM0070 //DM0070是指针字
　　 CMP DM0070 #0800
　　 AND 255.05
　　 LD TR1
　　 AND 255.06
　　 OR LD
　　 MOV #0000 DM0070
　　 LD TR1
　　 ADD DM0070 #2000 DM0076 //间接寻址，DM2000
　　 ADD DM0070 #2001 DM0077 //间接寻址，DM2001
　　 ADD DM0070 #1000 DM0074 //间接寻址，DM1000
　　 BSET #0000 *DM0076 *DM0077
　　 MCRO 10 DM0502 DM0626 //子程序入口
　　 XFER #0002 DM0628 *DM0074 //日期写入触摸屏
　　
　　[NETWORK]
　　 Name="count&reset"（本段是程序记数与复位）
　　[STATEMENTLIST]
　　 LD 253.13
　　 OUT TR0
　　 AND 228.10 //触摸屏上清零键
　　 DIFU 080.10
　　 LD TR0
　　 AND 080.10
　　 BSET #0000 DM0066 DM0067 //DM0066~67位计数值
　　 LD TR0
　　 AND 081.15 //计数角度微分
　　 AND HR64.04 //计数角度位置
　　 OUT TR1
　　 INC DM0066 //工件数的低位
　　 AND 255.06
　　 INC DM0067 //工件数的高位
　　 LD TR1
　　 INC *DM0076 //每天工件数的低位
　　 AND 255.06
　　 INC *DM0077 //每天工件数的高位
　　
　　[NETWORK]
　　 Name="Sum"（本段是程序统计）
　　[STATEMENTLIST]
　　 LD 253.13
　　 OUT TR0
　　 AND 229.15 //触摸屏上统计键
　　 DIFU 080.15
　　 LD TR0
　　 AND 080.15
　　 SET HR70.00 //统计开始标志
　　 MCRO 10 DM0602 DM0606 //触摸屏设定起始日期
　　 MCRO 10 DM0612 DM0616 //触摸屏设定终止日期
　　 BSET #0000 DM0080 DM0083 //指针2
　　 LD TR0
　　 AND HR70.00
　　 OUT TR1
　　 ADD DM0080 #2000 DM0086 //间接寻址，DM2000
　　 ADD DM0080 #1000 DM0084 //间接寻址，DM1000
　　 CMPL *DM0084 DM0608
　　 AND 255.05
　　 LD TR1
　　 AND 255.06
　　 OR LD
　　 OUT 048.01
　　 LD TR1
　　 CMPL *DM0084 DM0618
　　 AND 255.07
　　 LD TR1
　　 AND 255.06
　　 OR LD
　　 OUT 048.02
　　 LD TR1
　　 AND 048.01
　　 AND 048.02
　　 ADDL *DM0086 DM0081 DM0081
　　 AND 255.04
　　 INC DM0083
　　 LD TR1
　　 ADD DM0080 #0002 DM0080
　　 CMP DM0080 #0800
　　 AND 255.05
　　 LD TR1
　　 AND 255.06
　　 OR LD
　　 RSET HR70.00
　　 XFER #0003 DM0081 DM0091
　　

相由心生

Very  goog!楼主辛苦！

zhuanglei413

谢谢楼主！学习了，急需的资料！