机械手刀库半自动对刀宏程序参考

程序参考：

O6666(DUIDAO)(X,Y为对刀点坐标，R为刀库总数）

G30G91Z0.（G30的用法跟G28类似，但G30是返回第2、3、4参考点）

G90G53G0X#24Y#25（对刀点定位）

#1=1.

WHILE[#1LE#18]DO1

IF[#[10000+#1]NE0.]GOTO1（判定刀长是否为0，为0则换此刀）

T#1M6

#2=#1+1

WHILE[#2LT#18]DO2

IF[#[10000+#2]NE0]GOTO2（判定刀长是否为0，为0则备此刀）

T#2

GOTO3

N2#2=#2+1

END2

N3M00（此位置暂停，手动摇下Z轴，对刀，确认无误按循环启动键）

#[10000+#1]=#5023（设置当前Z机械坐标为当前刀长）

N1#1=#1+1.

END1

G30G91Z0.

M99