三菱MELDAS 控制器L形式用
组式排列宏程序
L200(haretu..PRO... )
#133=01 (PRO,NO)
#134=01 (H)
#155=9 (I=X.PIC)
#156=20 (J=Y.PIC)
#157=6 (A=X-KOSUU)
#158=2 (B=Y-KOSUU)
#141=-95(NO1,X-STARTPOINT)
#142=15 (NO1,Y-STARTPOINT)
#143=20 (NO2,X-STARTPOINT)
#144=15 (NO2,Y-STARTPOINT)
#145=20(NO3,X-STARTPOINT)
#146=-43(NO3,Y-STARTPOINT)
#147=-95 (NO4,X-STARTPOINT)
#148=-43(NO4,X-STARTPOINT)
G90G0G54XY
G43Z20.H#134
G65L9000T#133X#141Y#142I#155.A#157J#156.B#158
G65L9000T#133X#143Y#144I#155.A#157J#156.B#158
G65L9000T#133X#145Y#146I#155.A#157J#156.B#158
G65L9000T#133X#147Y#148I#155.A#157J#156.B#158
G52XYZ
Z50.
M9
G91G28Z
G28XY
M2
%
L1
(26-05-04Hr:Min -09:51)
(1.0e)
G90G00X0Y0
X5.Y-2.5Z10.S5000M03
M50
Z1.
G01Z-.1F30.
Y2.5F600.
X-5.
Y-2.5
X5.
G00Z10.
G0Z20.
G23
%
%
L9000(PRO-IWAMOTO..... )
IF[#23EQ#0]GOTO10
GOTO15
N10#23=54
N15IF[#20EQ#0]GOTO1000
IF[#24EQ#0]GOTO20
GOTO25
N20#24=0
N25IF[#25EQ#0]GOTO30
GOTO35
N30#25=0
N35IF[#4EQ#0]GOTO1001
IF[#5EQ#0]GOTO1002
IF[#1EQ#0]GOTO1003
IF[#2EQ#0]GOTO1004
#510=#24
#511=#25
#513=0
WHILE[#513LT#2]DO2
#514=0
WHILE[#514LT#1]DO1
G0G90G#23
G52X#510Y#511
G22L#20
G52X0Y0
#510=#510+#4
#514=#514+1.
END1
#510=#24
#511=#511+#5
#513=#513+1.
END2
G23
N1000#3000=1(PRG.NASHI)
N1001#3000=2(I.NASHI)
N1002#3000=3(J.NASHI)
N1003#3000=4(A.NASHI)
N1004#3000=5(B.NASHI)
% |