广州数控GSK983M斗笠式刀库换刀宏程序

%
:9001
N0010 G04 X1
N0020#19=#1032
N0025 I F[#19 E Q0] G O T O320
N0030 M5
N0040 G04 X1
N0045 I F[#1032 E Q0] G O T O320
N0050 I F[#4120 G E#19] G O T O320
N0070 I F[#4120 E Q0] G O T O320
N0090 I F[#4120 E Q#1032] G O T O460
N0100 M19
N0110 G04 X1
N0120#19=#0
N0130 I F[#509 E Q1] G O T O330
N0140 #146=#4003
N0141 G04 X1
N0142 G28 G91 Z0
N0145 G40 G49
N0150 G30 G91 Z0
N0160 M65
N0170 G04 X1.0
N0190 M54
N0200#509=1
N0205 G04 X500
N0210 G28 G91 Z0
N0220 M60
N0230 G04 X1.0
N0240 G30 G91 Z0
N0250 M55
N0255#509=0
N0260 G04 X500
N0270 M66
N0280 G#146
N0310 G O T O460
N0320#3000=200
N0330 #146=#4003
N0331 G28 G91 Z0
N0332 G40 G49
N0335 M54
N0340#509=1
N0350 M65
N0360 G04 X1.0
N0370 M60
N0380 G04 X1.0
N0390 G49 G30 G91 Z0
N0400 M55
N0410#509=0
N0415 G04 X500
N0420 M66
N0430 G#146
N0460 M99
%