PROC main()

MoveAbsJ Home\NoEoffs,v1000,z50,tool1\Wobj:= Wobj2;   回起始点

reg1:=0;

reg2:=0;

WHILE reg1 < 3 DO

MoveJ offs(P10,reg1*30,reg2*30,0),v1000,fine,tool1\Wobj:= Wobj2; 

MoveL offs(P20,reg1*30,reg2*30,0),v1000,fine,tool1\Wobj:= Wobj2; 

WaitTime 1;

Set DO16;

WaitTime 1;

MoveJ offs(P10,reg1*30,reg2*30,0),v1000,fine,tool1\Wobj:= Wobj2;

MoveJ offs(P30,reg1*30,reg2*30,0),v1000,fine,tool1\Wobj:= Wobj2;

MoveL offs(P40,reg1*30,reg2*30,0),v1000,fine,tool1\Wobj:= Wobj2;

WaitTime 1;

ReSet DO16;

WaitTime 1;

MoveJ offs(P30,reg1*30,reg2*30,0),v1000,fine,tool1\Wobj:= Wobj2;

reg2:=reg2+1;

IF reg2 = 4 THEN

reg2:= 0;

reg1:=reg1+1;

ENDIF

ENDWHILE

ENDPROC


普通3X4搬运,reg1为X方向变量,reg2为Y方向变量。

注意set 信号查看,在视图——数字输出

点赞(2) 打赏

评论列表 共有 0 条评论

暂无评论

微信小程序

微信扫一扫体验

立即
投稿

微信公众账号

微信扫一扫加关注

发表
评论
返回
顶部