劉特斌
寧?kù)o致遠(yuǎn)
級(jí)別: 工控俠客
精華主題: 0
發(fā)帖數(shù)量: 752 個(gè)
工控威望: 2316 點(diǎn)
下載積分: 1468 分
在線時(shí)間: 466(小時(shí))
注冊(cè)時(shí)間: 2014-06-20
最后登錄: 2023-11-16
查看劉特斌的 主題 / 回貼
樓主  發(fā)表于: 2017-11-03 14:52
最近準(zhǔn)備要做碼垛機(jī),各位大神誰(shuí)有碼垛機(jī)程序分享一下,我參考一下。
z10086
級(jí)別: 探索解密
精華主題: 0
發(fā)帖數(shù)量: 17 個(gè)
工控威望: 113 點(diǎn)
下載積分: 698 分
在線時(shí)間: 53(小時(shí))
注冊(cè)時(shí)間: 2017-10-20
最后登錄: 2024-06-21
查看z10086的 主題 / 回貼
1樓  發(fā)表于: 2017-11-13 15:03
Def Inte m1,m2    定義變量
Servo On   伺服電機(jī)打開
Accel 80,80    定義加減速度
Ovrd 50        定義全局速度
Mvs p0         移動(dòng)到p0點(diǎn)
GoTo *ddd      調(diào)用子程序
*ddd           子程序名
Def Plt 1,p1,p2,p3,p4,4,3,1  定義托盤
For m1%=1 To 12          建立循環(huán)
p7=Plt 1,m1%              賦值給p7
JOvrd 50                   關(guān)節(jié)速度
Mov p7 ,80                 移動(dòng)到p7上方80  
Mvs p7                     移動(dòng)到p7                  
HClose 1                    夾取工件
Dly 0.5                      延時(shí)0.5秒
Mvs p7,80                   移動(dòng)到p7上方z軸80  
If m2%=m1% Mod 2=1 Then 判斷奇偶性
    JOvrd 50                 定義關(guān)節(jié)速度              
    Mov p5,80                移動(dòng)到p5上方80
    Mvs p5                    移動(dòng)到p5
    HOpen 1                   松開工件
    Dly 0.5                      延時(shí)0.5秒
     Mvs p5,80                移動(dòng)到p5上方80的位置(安全點(diǎn))
    p5.Z=p5.Z+20               p5的點(diǎn)位沒循環(huán)一次增加20          
Else                             或
     JOvrd 50                   關(guān)節(jié)速度
     Mov p6,80                  
     Mov p6
    
     HOpen 1
     Dly 0.5
      Mvs p6,80
p6.Z=p6.Z+20
    EndIf                  結(jié)束if循環(huán)
Next                       結(jié)束for循環(huán)
End                        結(jié)束程序    


這是三菱的機(jī)械手的,參考一下
本帖最近評(píng)分記錄:
  • 下載積分:+5(劉特斌) 真誠(chéng)感謝!