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 夜夜穞天天穞狠狠穞

nos001
級別: 探索解密
精華主題: 0
發帖數量: 54 個
工控威望: 110 點
下載積分: 1002 分
在線時間: 42(小時)
注冊時間: 2018-03-31
最后登錄: 2022-10-06
查看nos001的 主題 / 回貼
樓主  發表于: 2019-06-27 16:21
圖片：
找不到st編程的教程，硬是自己摸索，一點一點摳出來的。
后來發現iQ-R 結構化文本(ST)編程指南就是教程，關于語法、其他手冊上找不到的較難理解的結構變量都有示例。
完全st編程的中斷寫法好幾天無從著手，把FXCPU結構化順序指令篇看了一遍又一遍，才摸索出來，具體見工程附件。
工程是未完成的不完整工程，只是希望自己認為較難理解手冊沒提及的st編程方法對需要的同志有所幫助。

另外吐槽一下st編輯器，變量不能在程序里定義，只能在標簽窗口定義，結構體成員引用不能單獨設置字體顏色，這些都影響閱讀。
總之，gx works2 的st編輯器比較簡陋，但可閱讀性已經比梯形圖好多了。

復制代碼
  1. (*****************************************************************************************************
  2. * 程序“恒定掃描”設置
  3. * M8039 = TRUE， 則程序為恒定周期掃描
  4. * D8039 = 掃描周期, 單位為ms，最小恒定掃描周期為1ms
  5. *****************************************************************************************************)
  6. M8039 := TRUE;
  7. IF M8039 THEN
  8.     D8039 := 5;
  9. END_IF;
  10. (*****************************************************************************************************
  11. * 初始化
  12. *****************************************************************************************************)
  13. EI ( TRUE );        (* 允許中斷 *)
  15. IF M8002 THEN
  16.     
  17.     FOR j := 0 TO 30 BY 1 DO        
  18.         Tcnt[j] := -1;        
  19.     END_FOR;
  20.     RST( TRUE, HmiKey_ManualOP );
  21.     RST( TRUE, bMode_Manual );
  22.     RST( TRUE, HmiKey_AutoPack );
  23.     RST( TRUE, bMode_Auto );
  24.     DownFill_FB_Call( );
  25.     VerticalSeal_FB_Call( );          
  26.     BagFold_FB_Call( );
  27.     
  28. END_IF;
  30. (* 每包包裝時間所需計數值 = 60000ms / 10ms / 預置包裝速度，每分鐘為60000ms，定時器為10ms *)
  31. TVal_Packing :=  6000 / Param_PresetSpeed;
  33. (*****************************************************************************************************
  34. * 清零
  35. *****************************************************************************************************)
  36. IF( HmiKey_BagCnt_CLR ) THEN
  37.     MakeBagCnt := 0;
  38. END_IF;
  40. IF( HmiKey_PackingCnt_CLR ) THEN
  41.     PackingCnt := 0;
  42. END_IF;    
  44. (*****************************************************************************************************
  45. * 警報發生
  46. * 報警鎖，任何一種警報發生，自動包裝都將停止運行
  47. ****************************************************************************************************)
  48. IF( bAlarm_Lock_AutoPack = TRUE ) THEN
  49.     
  50.     ZRST( TRUE, Y001, Y007 );
  51.     ZRST( TRUE, Y010, Y017 );
  52.     ZRST( TRUE, Y020, Y027 );    
  53.             
  54.     FOR j := 0 TO 30 BY 1  DO        
  55.         Tcnt[j] := -1;        
  56.     END_FOR;    
  57.     
  58. END_IF;
  59. (*****************************************************************************************************
  60. * HMI按鈕開關
  61. *****************************************************************************************************)
  62. Key_Hmi_FB_Call();
  64. (*****************************************************************************************************
  65. * 包裝流程
  66. *
  67. *****************************************************************************************************)
  68. IF( bMode_Auto ) AND ( bAlarm_Lock_AutoPack = FALSE ) AND ( HmiKey_FillPack[1]  OR  HmiKey_EmptyBagTest[1]  OR  HmiKey_FillBagOne[1] ) THEN
  69.     
  70.     IF( HmiKey_FillPack[1]  ) THEN
  71.         DownFill_FB_Call( hmi_key := KeyDownID,  pT_DownFillDly := Tcnt[ ID_DOWN_FILL_DLY ],   iX := iX_DownFill ); (* 下料 *)
  72.     END_IF;
  73.         
  74.     IF( HmiKey_EmptyBagTest[1]  OR  HmiKey_FillBagOne[1] ) THEN
  75.         
  76.         IF( PackingFlow = 0 ) THEN  
  77.                       
  78.             SET( TRUE, bEnd_DownFill );
  79.             PackingFlow := FLOW_PULL_FILM;
  80.                         
  81.         END_IF;
  82.         
  83.     END_IF;
  84.     VerticalSeal_FB_Call( bEnable := bServo_End );    (* 縱封 *)        
  85.     
  86.     BagFold_FB_Call( bEnable:= bServo_End );          (* 折角 *)
  87.     
  88.     ServoControl_FB_Call( pServoEnd := bServo_End  ); (* 伺服拉膜；指針參數，指向全局變量 *)
  89.     
  90.     (* 真空箱閉合 *)
  91.     IF( bServo_End = TRUE ) THEN
  92.         
  93.         IF( Tcnt[ ID_VACUUM_BOX_CLOSE_DLY ] = -1 ) THEN    
  94.             Tcnt[ ID_VACUUM_BOX_CLOSE_DLY ] := Param_VcmBoxCloseDly ;    
  95.         END_IF;
  96.         
  97.         IF( Tcnt[ ID_VACUUM_BOX_CLOSE_DLY ] = 0 )  AND ( bAlarm_GlassDoor = FALSE ) THEN
  98.             
  99.             Tcnt[ ID_VACUUM_BOX_CLOSE_DLY ] := -255;
  100.             Tcnt[ ID_BAG_CUT_DLY ] := Param_CutDly;
  101.             SET( TRUE, Y_VacuumBox_Y3 );            
  102.             
  103.         END_IF;      
  104.           
  105.     END_IF;
  106.     (* 剪切包裝膜 *)
  107.     IF( Y_VacuumBox_Y3 ) THEN
  108.         
  109.         IF( Tcnt[ ID_BAG_CUT_DLY ]  = 0 ) AND ( bAlarm_GlassDoor = FALSE ) THEN
  110.             
  111.             Tcnt[ ID_BAG_CUT_DLY ] := -255;
  112.             Tcnt[ ID_BAG_CUT ] := Param_Cut;
  113.             SET( TRUE, Y_Cutter_Print_cylinder );          
  114.             
  115.         END_IF;    
  116.         
  117.         IF( Tcnt[ ID_BAG_CUT ]  = 0 ) THEN
  118.             
  119.             Tcnt[ ID_BAG_CUT ] := -255;
  120.             Tcnt[ ID_VACUUMIZE ] := Param_Vacuum;
  121.             RST( TRUE, Y_Cutter_Print_cylinder );
  122.             SET( TRUE, Y_VacuumPump_Y5 );
  123.             SET( TRUE, Y_Vacuum_cylinder );
  124.             
  125.         END_IF;    
  126.               
  127.     END_IF;
  128.     (* 包裝袋抽真空、封口，恒溫，冷卻 *)
  129.     IF( Tcnt[ ID_VACUUMIZE ] = 0 ) THEN           (* 抽真空 *)
  130.         
  131.         Tcnt[ ID_VACUUMIZE ] := -255;
  132.         Tcnt[ ID_HEAT_SEAL ] := Param_HeatSeal;
  133.         SET( TRUE, Y_HoriSeal_cylinder );
  134.         
  135.     END_IF;
  136.     
  137.     IF( Tcnt[ ID_HEAT_SEAL ] = 0 ) THEN           (* 熱封 *)
  138.         Tcnt[ ID_HEAT_SEAL ] := -255;
  139.         Tcnt[ ID_SEAL_KEEP ] := Param_SealKeep;
  140.         RST( TRUE, Y_HoriSeal_cylinder );
  141.     END_IF;
  142.     
  143.     IF( Tcnt[ ID_SEAL_KEEP ] = 0 ) THEN           (* 恒溫保持 *)
  144.         Tcnt[ ID_SEAL_KEEP ] := -255;
  145.         Tcnt[ID_SEAL_COOL ] := Param_SealCool;
  146.         SET( TRUE, Y_AirIn_cylinder );
  147.     END_IF;
  148.     
  149.     IF( Tcnt[ID_SEAL_COOL ] = 0 ) THEN            (* 冷卻等待 *)
  150.         RST( TRUE, Y_VacuumBox_Y3 );
  151.         RST( TRUE, Y_Vacuum_cylinder );
  152.         RST( TRUE, Y_AirIn_cylinder );
  153.         PackingFlow := FLOW_END;
  154.     END_IF;
  155.     
  156.     (* 每分鐘為60000ms，程序掃描周期為5ms，每分鐘的計數值為60000 / 5 = 12000 *)
  157.     IF( Cnt < 11999 ) THEN
  158.         Cnt := Cnt + 1;
  159.     END_IF;
  160.         
  161.     IF( PackingFlow = FLOW_END  ) AND ( HmiKey_FillPack[1]  ) THEN
  162.     
  163.         MakeBagCnt := MakeBagCnt + 1;             (* 制袋計數 *)
  164.         PackingCnt := PackingCnt + 1;             (* 包裝計數 *)
  165.         PackingSpeed := 12000 / Cnt;              (* 包裝速度計算 *)
  166.         Cnt := 0;
  167.         
  168.     END_IF;
  169.     
  170.     IF( PackingFlow = FLOW_END ) AND ( HmiKey_EmptyBagTest[1]  OR  HmiKey_FillBagOne[1] )  THEN
  171.         
  172.         MakeBagCnt := MakeBagCnt + 1;             (* 制袋計數 *)
  173.         PackingSpeed := 12000 / Cnt;
  174.         Cnt := 0;
  175.                 
  176.     END_IF;
  178.     (* 包裝流程結束，復位定時器、伺服結束標志、制袋一個按鈕 *)
  179.     IF( PackingFlow = FLOW_END  ) THEN  
  180.         
  181.         PackingFlow := 0;
  182.         RST( TRUE, bServo_End );
  183.         RST( TRUE, HmiKey_FillBagOne[0] );
  184.         FOR j := 0 TO 30 BY 1 DO
  185.             Tcnt[j] := -1;
  186.         END_FOR;
  187.               
  188.     END_IF;
  189.                 
  190. END_IF;
  192. (*****************************************************************************************************
  193. * 包裝膜卷棍電機控制
  194. *
  195. * 說明：接近開關的感應體是一個自由落體的金屬橫桿，由包裝膜拉動其上下運動表示包裝膜的松緊。
  196. *       感應體運動到頂部，頂部金屬感應開關動作，說明包裝膜被拉緊，包裝膜卷棍電機運轉送膜；
  197. *       感應體運動到中部，中部金屬感應開關動作，說明送膜已經足夠，停止送膜；
  198. *       感應體運動到底部，底部金屬感應開關動作，說明接近開關的感應體已經沒有包裝膜拉動其運動，
  199. *       或者送膜太多，感應體自由落體到底部
  200. ****************************************************************************************************)
  201. IF bMode_Auto THEN
  202.     
  203.     IF( ix_PackFilm_SensorTop  ) THEN
  204.         
  205.         SET( TRUE, Y_FilmMotor_Y13 ); (* 送膜 *)
  206.         
  207.     ELSIF( ix_PackFilm_SensorMid OR ix_PackFilm_SensorBot )  THEN
  208.         
  209.         RST( TRUE, Y_FilmMotor_Y13 ); (* 送膜停止 *)
  210.         
  211.     END_IF;  
  212.     
  213. END_IF;
  215. (* 手動控制，放膜 *)
  216. IF HmiKey_ManualOP THEN
  217.     
  218.     IF( HMI手動_放膜 ) THEN
  219.         
  220.         SET( TRUE, Y_FilmMotor_Y13 ); (* 手動送膜 *)
  221.         
  222.     ELSE  
  223.         
  224.         RST( TRUE, Y_FilmMotor_Y13 );    
  225.         
  226.     END_IF;
  227.     
  228. END_IF;
[ 此帖被nos001在2019-07-04 17:38重新編輯 ]
附件： 結構化文本(ST)編程指南-1802.pdf (1477 K) 下載次數:944
附件： 顆粒包裝機v1.0_ST.gxw.rar (180 K) 下載次數:759
本帖最近評分記錄：
  • 下載積分:+1(gk1234) 感謝分享！
  • 下載積分:+1(lizhendong) 感謝分享！
  • 下載積分:+1(xn0220xn) 真誠感謝！
  • 下載積分:+1(chihung) 感謝分享！
  • 下載積分:+5(吳工2014)
  • 下載積分:+1(zhcdb2671) 真誠感謝！
  • 下載積分:+3(heidelberg5) 好貼好貼！
    zjjzszlqq
    級別: 正式會員
    精華主題: 0
    發帖數量: 17 個
    工控威望: 74 點
    下載積分: 605 分
    在線時間: 11(小時)
    注冊時間: 2019-10-25
    最后登錄: 2022-10-13
    查看zjjzszlqq的 主題 / 回貼
    1樓  發表于: 2020-01-13 11:23
    梯形圖跟ST一起用，這樣看起來就簡單多了，個人習慣   

    主站蜘蛛池模板： 爽到高潮无码视频在线观看 | 狠狠色图片 | 国产a国产片国产 | 天天影视网色香欲综合网 | 又爽又黄又无遮挡的激情视频 | 精品无码国产污污污免费 | 精品久久免费 | 亚洲人成人影院在线观看 | 日韩人妻无码精品—专区 | 亚洲自拍偷拍图 | 丁香伊人| 久久99精品国产麻豆蜜芽 | 正在播放国产对白孕妇作爱 | 国产山村乱淫老妇av色播 | 91精品国产99久久久久 | 伊人网视频 | 一级特黄免费视频 | 国产成人免费在线视频 | 九九视频网站 | 亚洲日韩欧美一区久久久久我 | 国产三级a在线观看 | 午夜爽爽爽男女免费观看一区二区 | 业余 自由 性别 成熟视频 视频 | 粗大的内捧猛烈进出少妇视频 | 香蕉久久人人爽人人爽人人片av | av怡红院一区二区三区 | 很色的网站| 精品无码一区二区三区爱欲九九 | 国产成人免费在线视频 | av天堂久久天堂色综合 | 二区三区精品 | 久久久噜噜噜久久久白丝袜 | 99视频免费 | 91不戴套国语对白在线观看 | 综合激情亚洲丁香社区 | 欧美一区二区三区综合 | 亚洲好看站 | 免费黄色在线网址 | 欧美在线高清 | 国产露脸系列magnet | 久视频精品 | 亚洲日本va中文字幕亚洲 | 国产成人一区二区三区在线观看 | 久久人妻精品国产一区二区 | 2022一本久道久久综合狂躁 | 自慰小少妇毛又多又黑流白浆 | 亚洲高潮呻吟xoxo | 久久996re热这里有精品 | 日本一区二区三区免费观看 | 国产精品毛片一区视频播 | 亚洲视频一区在线播放 | 日产区一线二线三av | 日本免费视频 | 女人被狂躁的高潮免费视频 | 国产性做爰xxx | 一级一级特黄女人精品毛片 | 国产亚洲综合欧美一区二区 | 国产网站av | 欧美福利视频 | 日韩精品内射视频免费观看 | 国产成人视屏 | 久久久久亚洲精品无码网址 | 亚洲色无码中文字幕手机在线 | 欧美国产激情二区三区 | 美女视频网址 | 免费无码黄十八禁网站在线观看 | 一区二区成人在线 | 在线中文视频 | 国产精品女教师av久久 | 精品国产一区二区三区性色 | 国产丰满老熟女重口对白 | 国产精品福利视频 | 欧美乱妇高清无乱码在线观看 | 999在线视频精品免费播放观看 | 四虎永久地址www成人久久 | 9999久久久久 | 天干夜天天夜天干天2004年 | 欧美一区2区三区4区公司 | 7777欧美成是人在线观看 | 欧产日产国产精品乱噜噜 | 成人91免费视频 | 天堂资源在线www中文最新偷拍 | 天堂中文av | 亚洲精品久久一区二区三区 | 一区二区天堂 | 77米奇,狠狠| 又色又爽又黄高潮的免费视频 | 国产精品日韩精品 | 天天操操夜夜操操 | 岛国精品在线观看 | 99久久国产热无码精品免费 | 丝袜人妻无码中文字幕综合网 | 他用舌头给我高潮喷水在线 | 91精品天码美女少妇 | 国产无遮挡在线观看 | 日韩精品一区在线观看 | 精品熟人妻一区二区三区四区不卡 | 欧美freesex黑人又粗又大 | 天天操天天插天天干 |