威綸通觸摸屏的宏指令實現到期密碼鎖機

宏指令腳本如下：

1. macro_command main()
   
2. 
   
3. unsigned int time_sum[6]={0,0,0,0,0,0}   //時間組合數組
   
4. unsigned int Dynamic_password[2]={0,0}   //動態密碼存放
   
5. unsigned int Verification_Code=0         //驗證碼存放
   
6. unsigned int Input_password=0            //輸入密碼框
   
7. unsigned int mm1=0, mk1=0,mm2=0, mk2=0,mm3=0, mk3=0,mm4=0, mk4=0,mm5=0, mk5=0 //定義10個變量為密碼計算，
   
8. unsigned short  year=0,month=0,day=0,hour=0,minute=0,second=0 //系統時間存放---聲明時間變量
   
9. bool init_button=false,Open_button1=false,Open_button2=false,Open_button3=false,Open_button4=false,Open_button5=false//聲明位狀態變量
   
10.      //1.初始化按鈕，     2.1#開啟按鈕，     3.2#開啟按鈕      4.3#開啟按鈕        5.4#開啟按鈕      6.5#開啟按鈕
    
11. 
    
12. bool Release_button=false,ON=true,OFF=false, Picture_locked=false,M99_ON=true,M99_OFF=false //聲明位狀態變量
    
13.      //3.解除按鈕                              4.畫面控制         5.PLC,M99-打開，PLC，M99-關閉
    
14. 
    
15. unsigned short Year_input[5]={0,0,0,0,0},month_input[5]={0,0,0,0,0},day_input[5]={0,0,0,0,0},count=0  //獲取-輸入時間期限變量
    
16. unsigned short K0=0,K1=1,K2=2,K3=3,K4=4    //常數賦值---5次期限0-4
    
17. unsigned int   DK0=0                       //常數賦值
    
18. unsigned short R1=11                       //主畫面編號
    
19. 
    
20. 
    
21. GetData(year,  "Local HMI", LW, 9022, 1)  //獲取系統時間年
    
22. GetData(month, "Local HMI", LW, 9021, 1)  //獲取系統時間月
    
23. GetData(day,   "Local HMI", LW, 9020, 1)  //獲取系統時間日
    
24. GetData(hour,  "Local HMI", LW, 9019, 1)  //獲取系統時間時
    
25. GetData(minute,"Local HMI", LW, 9018, 1)  //獲取系統時間分
    
26. GetData(second,"Local HMI", LW, 9017, 1)  //獲取系統時間秒
    
27. SetData(ON,    "Local HMI", LB, 9029, 1)  //強制保存---強制保存配方資料到觸摸屏
    
28. 
    
29. Dynamic_password[0]=(year+month+day+hour)*123+1234567  //期限解鎖密碼算法
    
30. Dynamic_password[1]=(year+month+day+hour)*123+3456789  //終級解鎖密碼算法
    
31. 
    
32. time_sum[0]=year*10000+month*100+day        //系統時間組合
    
33. Verification_Code=(year+month+day+hour)*123 //驗證碼算法
    
34. 
    
35. GetData(Open_button1, "Local HMI", RW_Bit, 600, 1) //讀取   分期按鈕1  是否開啟
    
36. GetData(Open_button2, "Local HMI", RW_Bit, 601, 1) //讀取   分期按鈕2  是否開啟
    
37. GetData(Open_button3, "Local HMI", RW_Bit, 602, 1) //讀取   分期按鈕3  是否開啟
    
38. GetData(Open_button4, "Local HMI", RW_Bit, 603, 1) //讀取   分期按鈕4  是否開啟
    
39. GetData(Open_button5, "Local HMI", RW_Bit, 604, 1) //讀取   分期按鈕5  是否開啟
    
40. 
    
41. GetData(init_button,    "Local HMI", RW_Bit, 11, 1)//讀取   初始化按鈕狀態
    
42. GetData(Release_button, "Local HMI", RW_Bit, 12, 1)//讀取   解除按鈕狀態
    
43. GetData(Picture_locked, "Local HMI", RW_Bit, 14, 1)//畫面控制
    
44. 
    
45. GetData(count,             "Local HMI", RW, 2, 1)  //讀取期數
    
46. GetData(Input_password,    "Local HMI", RW, 3, 1)  //讀取密碼
    
47. SetData(Verification_Code, "Local HMI", RW, 5, 1)  //驗證碼顯示
    
48. GetData(mm1,               "Local HMI", RW, 5, 1)  //讀取驗證碼
    
49. 
    
50. mk1=mm1+372100   //第一期密碼：= 驗證碼 + 372100
    
51. mk2=mm1+472800   //第二期密碼：= 驗證碼 + 472800
    
52. mk3=mm1+573500   //第三期密碼：= 驗證碼 + 573500
    
53. mk4=mm1+674200   //第四期密碼：= 驗證碼 + 674200
    
54. mk5=mm1+774900   //第五期密碼：= 驗證碼 + 774900
    
55. 
    
56. 
    
57. 
    
58. //初始化處理
    
59. if init_button then
    
60.    SetData(OFF, "Local HMI", RW_Bit, 600, 1) //分期功能-關閉
    
61.    SetData(OFF, "Local HMI", RW_Bit, 601, 1) //分期功能-關閉
    
62.    SetData(OFF, "Local HMI", RW_Bit, 602, 1) //分期功能-關閉
    
63.    SetData(OFF, "Local HMI", RW_Bit, 603, 1) //分期功能-關閉
    
64.    SetData(OFF, "Local HMI", RW_Bit, 604, 1) //分期功能-關閉
    
65.    
    
66.    SetData(OFF, "Local HMI", RW_Bit, 12, 1)  //解除按鈕-復位
    
67.    SetData(K0,  "Local HMI", RW, 2, 1)        //期數-清
    
68.    SetData(DK0, "Local HMI", RW, 3, 1)       //密碼框-清零
    
69.    SetData(OFF, "Local HMI", RW_Bit, 13, 1)  //密碼輸入錯誤復位
    
70. end if
    
71. 
    
72. 
    
73. //一期密碼時間設定
    
74. GetData(Year_input[0],  "Local HMI", RW, 10, 1) //輸入年
    
75. GetData(month_input[0], "Local HMI", RW, 11, 1) //輸入月
    
76. GetData(day_input[0],   "Local HMI", RW, 12, 1) //輸入日
    
77. 
    
78. time_sum[1]=Year_input[0]*10000+month_input[0]*100+day_input[0]//輸入時間組合：如20211209
    
79. 
    
80. if Open_button1 and time_sum[0]>=time_sum[1] and count==0  then  //第1期打開鎖機條件：1#開啟+系統時間>=設定時間+1期
    
81. 
    
82.    SetData(ON, "Local HMI", RW_Bit, 14, 1)                       //鎖機畫面彈出  
    
83. end if
    
84. 
    
85. if count==0 and mk1==Input_password  and Release_button then     //第1期解鎖條件：1期+計算密碼=輸入密碼+解鎖按鈕按下
    
86. 
    
87.    SetData(OFF, "Local HMI", RW_Bit, 14, 1)   //鎖機畫面關閉
    
88.    SetData(DK0, "Local HMI", RW, 3, 1)        //密碼框清零
    
89.    SetData(OFF, "Local HMI", RW_Bit, 600, 1)  //分期功能-關閉
    
90.    SetData(K1,  "Local HMI", RW, 2, 1)        //期數加1
    
91.    SetData(R1,  "Local HMI", LW, 0, 1)        //切換主畫面
    
92. end if  
    
93.   
    
94.   
    
95. //二期密碼時間設定
    
96. GetData(Year_input[1],  "Local HMI", RW, 20, 1)  //輸入年
    
97. GetData(month_input[1], "Local HMI", RW, 21, 1)  //輸入月
    
98. GetData(day_input[1],   "Local HMI", RW, 22, 1)  //輸入日
    
99. 
    
100. time_sum[2]=Year_input[1]*10000+month_input[1]*100+day_input[1] //輸入時間組合
     
101. 
     
102. if Open_button2 and time_sum[0]>=time_sum[2] and count==1  then //第2期打開鎖機條件：2#開啟+系統時間>=設定時間+1期
     
103. 
     
104.    SetData(ON, "Local HMI", RW_Bit, 14, 1)                      //鎖機畫面彈出
     
105. end if
     
106. 
     
107. if count==1 and mk2==Input_password and Release_button then //第2期解鎖條件：2期+計算密碼=輸入密碼+解鎖按鈕按下
     
108. 
     
109.    SetData(OFF, "Local HMI", RW_Bit, 14, 1)   //鎖機畫面關閉
     
110.    SetData(DK0, "Local HMI", RW, 3, 1)        //密碼框清零
     
111.    SetData(OFF, "Local HMI", RW_Bit, 601, 1)  //分期功能-關閉
     
112.     SetData(K2, "Local HMI", RW, 2, 1)        //期數加1
     
113.    SetData(R1,  "Local HMI", LW, 0, 1)        //切換主畫面
     
114. end if
     
115. 
     
116. 
     
117. 
     
118. 
     
119. //三期密碼時間設定
     
120. GetData(Year_input[2],  "Local HMI", RW, 30, 1)  //輸入年
     
121. GetData(month_input[2], "Local HMI", RW, 31, 1)  //輸入月
     
122. GetData(day_input[2],   "Local HMI", RW, 32, 1)  //輸入日
     
123. 
     
124. time_sum[3]=Year_input[2]*10000+month_input[2]*100+day_input[2]  //輸入時間組合
     
125. 
     
126. if Open_button3 and time_sum[0]>=time_sum[3] and count==2 then   //第3期打開鎖機條件：3#開啟+系統時間>=設定時間+1期
     
127. 
     
128.    SetData(ON, "Local HMI", RW_Bit, 14, 1)                       //鎖機畫面彈出
     
129. end if
     
130. 
     
131. if count==2 and  mk3==Input_password and Release_button then     //第3期解鎖條件：3期+計算密碼=輸入密碼+解鎖按鈕按下
     
132. 
     
133.    SetData(OFF, "Local HMI", RW_Bit, 14, 1)     //鎖機畫面關閉
     
134.    SetData(DK0, "Local HMI", RW, 3, 1)          //密碼框清零
     
135.    SetData(OFF, "Local HMI", RW_Bit, 602, 1)    //分期功能-關閉
     
136.    SetData(K3,  "Local HMI", RW, 2, 1)          //期數加1
     
137.    SetData(R1,  "Local HMI", LW, 0, 1)          //切換主畫面
     
138. end if
     
139. 
     
140. 
     
141. //四期密碼時間設定
     
142. GetData(Year_input[3],  "Local HMI", RW, 40, 1)  //輸入年
     
143. GetData(month_input[3], "Local HMI", RW, 41, 1)  //輸入月
     
144. GetData(day_input[3],   "Local HMI", RW, 42, 1)  //輸入日
     
145. 
     
146. time_sum[4]=Year_input[3]*10000+month_input[3]*100+day_input[3] //輸入時間組合
     
147. 
     
148. if Open_button4 and time_sum[0]>=time_sum[4] and count==3 then  //第4期打開鎖機條件：4#開啟+系統時間>=設定時間+1期
     
149. 
     
150.    SetData(ON, "Local HMI", RW_Bit, 14, 1)                      //鎖機畫面彈出
     
151. end if
     
152. 
     
153. 
     
154. if count==3 and  mk4==Input_password and Release_button then    //第4期解鎖條件：4期+計算密碼=輸入密碼+解鎖按鈕按下
     
155. 
     
156.    SetData(OFF, "Local HMI", RW_Bit, 14, 1)   //鎖機畫面關閉
     
157.    SetData(DK0, "Local HMI", RW, 3, 1)        //密碼框清零
     
158.    SetData(OFF, "Local HMI", RW_Bit, 603, 1)  //分期功能-關閉
     
159.    SetData(K4,  "Local HMI", RW, 2, 1)        //期數加1
     
160.    SetData(R1,  "Local HMI", LW, 0, 1)        //切換主畫面
     
161. end if
     
162. 
     
163. 
     
164. 
     
165. 
     
166. 
     
167. //五期密碼時間設定
     
168. GetData(Year_input[4],  "Local HMI", RW, 50, 1) //輸入年
     
169. GetData(month_input[4], "Local HMI", RW, 51, 1) //輸入月
     
170. GetData(day_input[4],   "Local HMI", RW, 52, 1) //輸入日
     
171. 
     
172. time_sum[5]=Year_input[4]*10000+month_input[4]*100+day_input[4] //輸入時間組合
     
173. 
     
174. 
     
175. 
     
176. if Open_button5 and time_sum[0]>=time_sum[5] and count==4 then  //第5期打開鎖機條件：1#開啟+系統時間>=設定時間+1期
     
177. 
     
178.   SetData(ON, "Local HMI", RW_Bit, 14, 1)                      //鎖機畫面彈出
     
179.   end if
     
180. 
     
181. 
     
182. if (count==4 and  mk5==Input_password and Release_button)or(Dynamic_password[1]==Input_password and Release_button) then //第5期解鎖條件：5期+計算密碼=輸入密碼+解鎖按鈕按下（或者終極解碼+解除按鈕）
     
183. 
     
184.    SetData(OFF, "Local HMI", RW_Bit, 14, 1)   //鎖機畫面關閉
     
185.    SetData(DK0, "Local HMI", RW, 3, 1)        //密碼框清零
     
186.    SetData(K0,  "Local HMI", RW, 2, 1)        //期數加1
     
187.    SetData(OFF, "Local HMI", RW_Bit, 600, 1)  //分期功能-關閉
     
188.    SetData(OFF, "Local HMI", RW_Bit, 601, 1)  //分期功能-關閉
     
189.    SetData(OFF, "Local HMI", RW_Bit, 602, 1)  //分期功能-關閉
     
190.    SetData(OFF, "Local HMI", RW_Bit, 603, 1)  //分期功能-關閉
     
191.    SetData(OFF, "Local HMI", RW_Bit, 604, 1)  //分期功能-關閉
     
192.    SetData(R1,  "Local HMI", LW, 0, 1)        //切換主畫面
     
193. end if
     
194. 
     
195. 
     
196. 
     
197. 
     
198. if Open_button1 and mk1 or Open_button2 and mk2 or Open_button3 and mk3 or Open_button4 and mk4 or Open_button5 and mk5 <>Input_password and Release_button==1 then//P判斷輸入密碼是否正確，顯示提示！
     
199. 
     
200.    SetData(ON,  "Local HMI", RW_Bit, 13, 1)   //密碼輸入錯誤
     
201.    else
     
202.    SetData(OFF, "Local HMI", RW_Bit, 13, 1)   //密碼輸入錯誤復位
     
203. end if
     
204. 
     
205. 
     
206. 
     
207. 
     
208. 
     
209. 
     
210. 
     
211. //R0:畫面切換備用 R1:各開關銨鈕存放及位控制/的R1.0開啟按鈕R1.1初始化按鈕R1.2解除按鈕按鈕R1.3密碼錯誤指示R1.4鎖機畫面彈出
     
212. //R2—R3:密碼輸入。
     
213. 
     
214. end macro_command
     
215. 
     

復制代碼

【必讀】版權免責聲明

1、本主題所有言論和內容純屬會員個人意見，與本論壇立場無關。2、本站對所發內容真實性、客觀性、可用性不做任何保證也不負任何責任，網友之間僅出于學習目的進行交流。3、對提供的數字內容不擁有任何權利，其版權歸原著者擁有。請勿將該數字內容進行商業交易、轉載等行為，該內容只為學習所提供，使用后發生的一切問題與本站無關。 4、本網站不保證本站提供的下載資源的準確性、安全性和完整性;同時本網站也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的損失或傷害。 5、本網站所有軟件和資料均為網友推薦收集整理而來，僅供學習用途使用，請務必下載后兩小時內刪除，禁止商用。6、如有侵犯你版權的，請及時聯系我們（電子郵箱1370723259@qq.com）指出，本站將立即改正。