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

另外吐槽一下st編輯器,變量不能在程序里定義,只能在標(biāo)簽窗口定義,結(jié)構(gòu)體成員引用不能單獨設(shè)置字體顏色,這些都影響閱讀。
總之,gx works2 的st編輯器比較簡陋,但可閱讀性已經(jīng)比梯形圖好多了。

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

    主站蜘蛛池模板: 国内精品伊人久久久久av | 久久亚洲综合色 | 高h禁伦餐桌上的肉伦水视频 | 国产成a人亚洲精品无码樱花 | 精品国产百合女同互慰 | 毛片毛片毛片 | 在熟睡夫面前侵犯我在线播放 | 久热在线播放中文字幕 | 熟妇人妻系列aⅴ无码专区友真希 | 91精品国产综合久久久蜜臀九色 | 九九视频免费 | 国产欧美日韩中文久久 | 久久久噜噜噜久久久精品 | 双腿高潮抽搐喷白浆视频 | 亚洲高潮呻吟xoxo | av一二三区| 婷婷国产天堂久久综合五月 | 精品日韩一区二区三区 | 色乱码一区二区三区 | 亚洲精品一区二区三区h | 中文字幕v亚洲日本在线电影 | 天天躁日日躁狠狠躁欧美老妇小说 | 青青草免费观看 | 亚洲国产成人一区二区三区 | 成年人网站黄 | 少妇人妻系列无码专区系列 | 欧美aaa大片 | 国产精品免费vv欧美成人a | 国产成人久久精品一区二区三区 | 久久久久久久久久久久福利 | 国产日韩欧美一区二区宅男 | 九九九小视频 | 亚洲h精品动漫在线观看 | 中文字幕在线观看你懂的 | 久青草视频在线 | 日韩一级中文字幕 | 一本久久伊人热热精品中文字幕 | 久久超碰精品一夜七次郎 | 欧洲美色妇ⅹxxxxx欧美 | 国产福利永久在线视频无毒不卡 | 男人看的网站 | 国产精品无码一区二区三区电影 | 国产98色在线 | 国产 | 免费人成在线观看 | 久久免费观看视频 | 中文字幕无码肉感爆乳在线 | 久激情内射婷内射蜜桃 | 国精品午夜福利视频不卡 | 四虎免费看黄 | 亚洲自偷自拍另类12p | 天堂久久久久va久久久久 | 亚洲人禽杂交av片久久 | 天天干,天天干 | 久久久精品妓女影院妓女网 | 欧美成人午夜免费全部完 | 国产精品嫩草影院8vv8 | 粗大的内捧猛烈进出少妇 | 四虎国产精品永久一区高清 | 日本护士毛茸茸 | 日韩激情毛片 | 毛片基地在线播放 | 91免费视频网址 | 中文字幕免费在线观看视频 | 东西向洞2在线观看 | 成人中文视频 | 被技师按摩到高潮的少妇 | eeuss亚洲精品久久 | 中文字幕乱码免费看电影 | 无码中字出轨中文人妻中文中 | 蜜臀久久99精品久久一区二区 | 国产不卡一区二区视频 | 久久夜色精品久久噜噜亚 | 又爽又黄又无遮挡网站动态图 | 中文字幕+乱码+中文字幕明步 | jizzyou中国人少妇熟睡 | 日韩视频在线观看一区 | 日本黄色xxxx | 97久久综合亚洲色hezyo | 成人男女视频 | 亚洲人成网站在线播放无码 | 中文字幕人成乱码熟女 | 无码av高潮喷水无码专区线 | 欧美日韩一区二区视频在线观看 | 自拍在线 | 色九九视频 | 狂野欧美性猛xxxx乱大交 | 天天做天天爽 | 欧美精选一区 | 国产重口老太伦 | 国产精品久久久久久久久ktv | 国产精品国产三级国产专播精品人 | 国产做a爰片久久毛片a片美国 | 欧美亚洲日本日韩在线 | 浮妇高潮喷白浆视频 | 人人妻人人澡人人爽欧美一区双 | 国产精品美女久久久久图片 | 3d动漫精品啪啪一区二区免费 | 自偷自拍av | 欧美顶级深喉aaaaa片 |