91黄动漫 I 欧美 日韩 国产 成人 在线 I a级成人毛片 I 农村黄色片 I 男生捅女生的肌肌 I 精品99一区二区三区 I 妃光莉av I 日日夜夜操操 I 性中国古装videossex I 久久不卡av I 美女高潮动态图 I 极品美女开粉嫩精品 I 牛牛精品一区二区 I 91精品福利视频 I 成人刺激视频 I 91国内精品视频 I 中国一级特黄毛片大片 I 校长狠狠挺进校花体内小说 I 欧美激情黄色片 I 欧美久久久一区 I 爱豆国产剧免费观看大全剧苏畅 I 麻豆国产人妻欲求不满谁演的 I 亚洲一区二区在线免费观看视频 I 国产超碰av人人做人人爽 I 精品国产第一国产综合精品 I 久久免费看av I 欧美一区二区三区白人 I 国产精品夫妻激情 I 校花被肉干高h潮不断 I 欧美最猛黑人xxxx黑人表情 I 国产欧美日韩一区二区搜索 I 极品女神露脸呻吟啪啪 I 人人天天久久 I 亚洲动漫在线 I 日本91福利区 I 五月天 桃色 开心 I av在线免费观看国产 I 男人添女人的免费视频 I 夜夜穞天天穞狠狠穞

kidien
編程就是鞭打自己
級別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 107 個
工控威望: 218 點
下載積分: 788 分
在線時間: 33(小時)
注冊時間: 2010-01-08
最后登錄: 2025-10-30
查看kidien的 主題 / 回貼
108樓  發(fā)表于: 2019-07-17 21:11
感謝樓主,最近在學功能塊,向結構化轉型,多謝分享!
chenyuuuu
Raymond
級別: 探索解密
精華主題: 0
發(fā)帖數(shù)量: 36 個
工控威望: 135 點
下載積分: 36116 分
在線時間: 155(小時)
注冊時間: 2019-05-06
最后登錄: 2025-12-09
查看chenyuuuu的 主題 / 回貼
109樓  發(fā)表于: 2019-07-19 09:09
謝謝樓主,學習學習。
huxiang2030
山本無憂,因雪白頭;水本無愁,因風起皺...
級別: 探索解密
精華主題: 0
發(fā)帖數(shù)量: 81 個
工控威望: 129 點
下載積分: 1380 分
在線時間: 22(小時)
注冊時間: 2019-06-19
最后登錄: 2025-01-10
查看huxiang2030的 主題 / 回貼
110樓  發(fā)表于: 2019-07-19 09:45
。。怎么打不開
山本無憂,因雪白頭;水本無愁,因風起皺...
nos001
級別: 探索解密
精華主題: 0
發(fā)帖數(shù)量: 54 個
工控威望: 110 點
下載積分: 814 分
在線時間: 42(小時)
注冊時間: 2018-03-31
最后登錄: 2022-10-06
查看nos001的 主題 / 回貼
111樓  發(fā)表于: 2019-07-19 21:40
結構化,程序大,有條理,值得借鑒。
就是定義在一頁的全局變量太多,感覺應該分頁。
其實不知道硬件,不知道用途,還是挺難看懂。
還是更喜歡st編程,自定義定時器感覺比gx works 內(nèi)建的好用。
復制代碼
  1. (******************************************************************************
  2. * 從自動包裝切換到手動操作
  3. * 如果前面進行過“自動包裝”,切換到“手動操作”時進行一次初始化
  4. *****************************************************************************)
  5. IF HmiKey_ManualOP THEN
  6.     
  7.     IF( bMode_Manual = FALSE ) THEN
  8.         
  9.         bMode_Manual := TRUE;
  10.         bMode_Auto   := FALSE;
  11.         HmiKey_AutoPack := FALSE;
  12.         HmiKey_FillPack := FALSE;
  13.         HmiKey_EmptyBagTest := FALSE;
  14.         HmiKey_FillBagOne := FALSE;
  15.         
  16.         ZRST( TRUE, Y001, Y004 );
  17.         ZRST( TRUE, Y006, Y007 );
  18.         ZRST( TRUE, Y010, Y011 );
  19.         ZRST( TRUE, Y013, Y017 );        
  20.         ZRST( TRUE, Y020, Y027 );
  21.         
  22.         Tcnt_10[ IDX_DOWN_FILL_DLY ].reset := TRUE;    
  23.         Tcnt_10[ IDX_DOWN_FILL ].reset := TRUE;    
  24.         Tcnt_10[ IDX_PULL_FILM_DLY ].reset := TRUE;    
  25.         Tcnt_10[ IDX_VERT_SEAL_DLY ].reset := TRUE;    
  26.         Tcnt_10[ IDX_VERT_SEAL ].reset := TRUE;
  27.             
  28.         Tcnt_10[ IDX_KNURL_DLY ].reset := TRUE;    
  29.         Tcnt_10[ IDX_KNURL ].reset := TRUE;    
  30.         Tcnt_10[ IDX_VACUUM_BOX_CLOSE_DLY ].reset := TRUE;    
  31.         Tcnt_10[ IDX_BAG_FOLD_DLY ].reset := TRUE;    
  32.         Tcnt_10[ IDX_BAG_FOLD ].reset := TRUE;
  33.                                     
  34.         Tcnt_10[ IDX_BAG_CUT_DLY ].reset := TRUE;                    
  35.         Tcnt_10[ IDX_BAG_CUT ].reset := TRUE;                        
  36.         Tcnt_10[ IDX_VACUUMIZE ].reset := TRUE;                    
  37.         Tcnt_10[ IDX_HEAT_SEAL ].reset := TRUE;                
  38.         Tcnt_10[ IDX_SEAL_KEEP ].reset := TRUE;                    
  39.         Tcnt_10[ IDX_SEAL_COOL ].reset := TRUE;            
  40.             
  41.     END_IF;
  42.     
  43. ELSE
  44.     RST( TRUE, bMode_Manual );
  45.     
  46. END_IF;
  47. (******************************************************************************
  48. * 從手動操作切換到自動包裝
  49. * 如果前面進行過“手動操作”,切換到“自動包裝”時進行一次初始化
  50. *****************************************************************************)
  51. IF HmiKey_AutoPack THEN
  52.     
  53.     IF( bMode_Auto = FALSE ) THEN      (* 初始化 *)
  54.         
  55.         bMode_Auto   := TRUE;
  56.         bMode_Manual := FALSE;    
  57.         HmiKey_ManualOP := FALSE;
  58.         HmiKey_Knurling := FALSE;
  59.         
  60.         ZRST( TRUE, Y001, Y004 );
  61.         ZRST( TRUE, Y006, Y007 );
  62.         ZRST( TRUE, Y010, Y011 );
  63.         ZRST( TRUE, Y013, Y017 );        
  64.         ZRST( TRUE, Y020, Y027 );    
  65.             
  66.         Tcnt_10[ IDX_DOWN_FILL_DLY ].reset := TRUE;    
  67.         Tcnt_10[ IDX_DOWN_FILL ].reset := TRUE;    
  68.         Tcnt_10[ IDX_PULL_FILM_DLY ].reset := TRUE;    
  69.         Tcnt_10[ IDX_VERT_SEAL_DLY ].reset := TRUE;    
  70.         Tcnt_10[ IDX_VERT_SEAL ].reset := TRUE;
  71.             
  72.         Tcnt_10[ IDX_KNURL_DLY ].reset := TRUE;    
  73.         Tcnt_10[ IDX_KNURL ].reset := TRUE;    
  74.         Tcnt_10[ IDX_VACUUM_BOX_CLOSE_DLY ].reset := TRUE;    
  75.         Tcnt_10[ IDX_BAG_FOLD_DLY ].reset := TRUE;    
  76.         Tcnt_10[ IDX_BAG_FOLD ].reset := TRUE;
  77.                                     
  78.         Tcnt_10[ IDX_BAG_CUT_DLY ].reset := TRUE;                    
  79.         Tcnt_10[ IDX_BAG_CUT ].reset := TRUE;                        
  80.         Tcnt_10[ IDX_VACUUMIZE ].reset := TRUE;                    
  81.         Tcnt_10[ IDX_HEAT_SEAL ].reset := TRUE;                
  82.         Tcnt_10[ IDX_SEAL_KEEP ].reset := TRUE;                    
  83.         Tcnt_10[ IDX_SEAL_COOL ].reset := TRUE;
  84.         
  85.     END_IF;
  86.     
  87. ELSE
  88.     bMode_Auto := FALSE;               (* 如果切換到“手動操作”,這條語句必然被執(zhí)行 *)
  89.     
  90. END_IF;
  91. (******************************************************************************
  92. * brief  按鍵掃描與互鎖
  93. * note  
  94. *****************************************************************************)
  95. HmiKey_Scan_InterLock();    
  96. (******************************************************************************
  97. * brief  自動包裝(填充包裝)按鍵事件處理
  98. * note
  99. *****************************************************************************)
  100. (* 按鍵生效,下降沿 *)
  101. IF( LDP( TRUE, KeyID_FillPack ) AND ( bY0_out_watch = FALSE ) ) THEN            
  102.      PackingFlow := FLOW_STANDBY;          
  103. END_IF;
  104. (* 按鍵生效,下降沿 *)    
  105. IF( LDF( TRUE, KeyID_FillPack ) ) THEN            
  106.      PackingFlow := FLOW_END;                          
  107. END_IF;
  108. (******************************************************************************
  109. * brief  空袋調(diào)試 按鍵事件處理
  110. * note
  111. *****************************************************************************)
  112. (* 按鍵生效,上升沿 *)
  113. IF( LDP( TRUE, KeyID_EmptyBagTest ) AND ( bY0_out_watch = FALSE ) ) THEN            
  114.      PackingFlow := FLOW_STANDBY;          
  115. END_IF;
  116. (* 按鍵生效,下降沿 *)    
  117. IF( LDF( TRUE, KeyID_EmptyBagTest ) ) THEN            
  118.      PackingFlow := FLOW_END;                          
  119. END_IF;
  120. (******************************************************************************
  121. * brief 制袋一個 按鍵事件處理
  122. * note
  123. *****************************************************************************)
  124.         
  125. (* 按鍵生效,下降沿 *)
  126. IF( LDP( TRUE, KeyID_FillBagOne ) AND ( bY0_out_watch = FALSE ) ) THEN            
  127.      PackingFlow := FLOW_STANDBY;          
  128. END_IF;
  129. (* 按鍵生效,下降沿 *)    
  130. IF( LDF( TRUE, KeyID_FillBagOne ) ) THEN            
  131.      PackingFlow := FLOW_END;                          
  132. END_IF;
  133. (******************************************************************************
  134. * 拉膜皮帶
  135. *
  136. * 伺服電機通過傳動桿驅動拉膜皮帶,拉膜氣缸控制拉膜皮帶:
  137. * 抱緊下料筒的包裝膜
  138. * 松開下料筒的包裝膜
  139. *****************************************************************************)
  140. IF( bMode_Auto )  THEN
  141.     
  142.      IF( HmiKey_BeltFlimPull ) THEN
  143.                   
  144.          SET( TRUE, Y_BeltPullFilm_cylinder );        
  145.      ELSE        
  146.          RST( TRUE, Y_BeltPullFilm_cylinder );        
  147.      END_IF;
  148.     
  149. END_IF;
  150. (******************************************************************************
  151. * 真空泵
  152. *
  153. *****************************************************************************)
  154. IF( bMode_Auto ) THEN
  155.     
  156.     IF( HmiKey_VacuumPump ) THEN
  157.         
  158.         SET( TRUE, Y_VacuumPump_SSR );        
  159.     ELSE        
  160.         RST( TRUE,Y_VacuumPump_SSR );        
  161.     END_IF;
  162.     
  163. END_IF;  
  164. (******************************************************************************
  165. * 跑遍糾正
  166. *
  167. * HmiPB_MoveLeft     HMI“自動包裝”界面“跑偏糾正”左移按鈕
  168. * HmiPB_MoveRight    HMI“自動包裝”界面“跑偏糾正”右移按鈕
  169. * Limit_Left         左移限位開關
  170. * Limit_Right        右移限位開關
  171. *****************************************************************************)
  172. IF( HmiKey_MoveLeft AND ( NOT ix_PackFilm_Limit_L ) ) THEN
  173.     
  174.     SET( TRUE, Y_MoveLeft_SSR );    
  175. ELSE    
  176.     RST( TRUE, Y_MoveLeft_SSR );    
  177. END_IF;
  178. IF( HmiKey_MoveRight  AND ( NOT ix_PackFilm_Limit_R ) )THEN
  179.     
  180.     SET( TRUE, Y_MoveRight_SSR );    
  181. ELSE    
  182.     RST( TRUE, Y_MoveRight_SSR );    
  183. END_IF;
[ 此帖被nos001在2019-07-19 21:47重新編輯 ]
wangli1268
級別: 正式會員
精華主題: 0
發(fā)帖數(shù)量: 32 個
工控威望: 82 點
下載積分: 7479 分
在線時間: 14(小時)
注冊時間: 2019-06-14
最后登錄: 2022-06-01
查看wangli1268的 主題 / 回貼
112樓  發(fā)表于: 2019-07-19 22:15
感謝您的分享,學習中!
denghong
我是一只草泥馬.!
級別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 161 個
工控威望: 350 點
下載積分: 1175 分
在線時間: 189(小時)
注冊時間: 2007-10-12
最后登錄: 2025-11-22
查看denghong的 主題 / 回貼
113樓  發(fā)表于: 2019-08-08 09:00
樓主,軸的機構體寫的不是很好,我有幾個簡單的。
林李56
級別: 正式會員
精華主題: 0
發(fā)帖數(shù)量: 26 個
工控威望: 94 點
下載積分: 5593 分
在線時間: 53(小時)
注冊時間: 2019-01-25
最后登錄: 2025-09-07
查看林李56的 主題 / 回貼
114樓  發(fā)表于: 2019-08-08 09:58
樓上的高手能分享下嗎?
小嘿嘿
級別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 230 個
工控威望: 356 點
下載積分: 15344 分
在線時間: 169(小時)
注冊時間: 2012-09-24
最后登錄: 2025-07-25
查看小嘿嘿的 主題 / 回貼
115樓  發(fā)表于: 2019-08-08 12:08
         感謝樓主
451665150
學海無涯,勤作舟
級別: 探索解密
精華主題: 0
發(fā)帖數(shù)量: 59 個
工控威望: 123 點
下載積分: 1877 分
在線時間: 57(小時)
注冊時間: 2019-04-27
最后登錄: 2025-09-11
查看451665150的 主題 / 回貼
116樓  發(fā)表于: 2019-08-08 20:37
下載了,感謝樓主分享
工控老毛
未來發(fā)展趨勢,自動機械化。
級別: 家園常客
精華主題: 0
發(fā)帖數(shù)量: 39 個
工控威望: 833 點
下載積分: 4558 分
在線時間: 71(小時)
注冊時間: 2017-12-14
最后登錄: 2021-01-22
查看工控老毛的 主題 / 回貼
117樓  發(fā)表于: 2019-08-09 08:05
學習學習,謝謝分享
早安你好
級別: 家園常客
精華主題: 0
發(fā)帖數(shù)量: 31 個
工控威望: 528 點
下載積分: 2924 分
在線時間: 52(小時)
注冊時間: 2019-03-04
最后登錄: 2022-06-07
查看早安你好的 主題 / 回貼
118樓  發(fā)表于: 2019-08-09 15:31
感謝,樓主
752759616
簽名個鬼
級別: 略有小成
精華主題: 0
發(fā)帖數(shù)量: 224 個
工控威望: 389 點
下載積分: 2802 分
在線時間: 199(小時)
注冊時間: 2013-07-08
最后登錄: 2025-12-09
查看752759616的 主題 / 回貼
119樓  發(fā)表于: 2019-08-10 09:56
學習下一下

主站蜘蛛池模板: 内射后入在线观看一区 | 天天看片天天av免费观看 | 老司机精品导航 | 医院人妻闷声隔着帘子被中出 | 少妇精品久久久久久久久久 | 免费国产人成18在线观看 | 国产精品欧美亚洲韩国日本久久 | 色 亚洲 日韩 国产 综合 | 色偷偷av一区二区 | 爱看av在线入口 | 久久久噜噜噜www成人网 | 日韩视频免费观看高清 | 欧美性大战xxxxx久久久√ | 亚洲精品国偷拍自产在线观看蜜桃 | 开心激情综合网 | 亚洲国产欧美在线观看 | 性一交一乱一精一晶 | 黑人性较视频免费视频 | 天堂中文在线视频 | 国产a v高清一区二区三区 | 欧美自拍亚洲综合丝袜 | av岬奈奈美一区二区三区 | 国产aaa大片 | 狠狠色噜噜狠狠狠888米奇视频 | 久久99免费视频 | 欧美激情精品久久久久久免费 | 麻豆国产av尤物网站尤物 | 国内精品久久久久影院优 | 少妇真实高潮叫床声 | 国产黄色免费看 | 人人做人人妻人人精 | 69av一区二区三区 | 国产艳妇av在线观看果冻传媒 | 免费精品国自产拍在线不卡 | 免费欧美一区 | 免费a级毛片出奶水 | 国产a精品 | 亚洲欧美999 | 日韩精品久久久久久久 | 中国黄色一级视频 | 第一福利精品500在线导航 | 人妻精品国产一区二区 | 91大神精品视频 | 免费看的一级视频 | 免费网站内射红桃视频 | 精品一区二区三区免费毛片爱 | 久久久无码精品一区二区三区蜜桃 | xxxx操| 一本色道久久综合亚洲精品按摩 | 亚洲欧美日本中文字不卡 | 国产精品自在在线午夜出白浆 | 九九碰| 日韩亚洲一区二区三区 | 国产在线观看码高清视频 | 国产成人福利在线 | 亚洲男人av天堂男人社区 | 亚洲乱码国产乱码精品精 | 天堂va久久久噜噜噜久久va | 色欲av无码一区二区三区 | 午夜寂寞少妇aaa片毛片 | 国产人妻无码一区二区三区免费 | 日韩精品播放 | 国产色情又大又粗又黄的电影 | 在线中文字幕乱码英文字幕正常 | 成人看毛片 | 国产亚洲精品成人av久久ww | 黄色一级免费观看 | 青娱乐国产 | 亚洲日本中文字幕乱码在线 | 成午夜精品一区二区三区软件 | 四虎激情 | 日本成人中文字幕在线 | 影音先锋男人天堂 | 亚洲欧洲视频在线 | 成人深夜视频在线观看 | 91精品国产色综合久久久浪潮 | 免费无码av片在线观看网站 | 亚州性无码不卡免费视频 | 4hu最新网址 | 天天爱天天拍天天插 | 成在人线av无码免观看麻豆 | 欧美福利视频一区 | 婷婷综合缴情亚洲狠狠小说 | 国内精品乱码卡一卡2卡麻豆 | 隔壁邻居是巨爆乳寡妇 | 国产女人高潮大叫毛片 | 三级三级久久三级久久18 | 国产白浆一区二区 | 国产乱妇乱子在线播视频播放网站 | 网址在线观看你懂的 | 无码夫の前で人妻を犯す中字幕 | 天堂av2020| 玖玖成人 | 深爱开心激情网 | 91最新地址永久入口 | 青青草手机在线观看 | 天干天干天啪啪夜爽爽av | 免费人成在线观看网站品爱网 | 婷婷色婷婷 |