DOOSAN PUMA Macro-B OD Jaw Program (FANUC Series 31i)


Submit by: Machinist

CNC Program

%
O8999
(BORE JAWS - !!!DO NOT ERASE!!!)
(****** DEFINE JAW DATA ******)
#100=5.5 (STARTING DIA X)
#101=6.5 (FINAL DIA X)
#102=0.1 (DIA DEPTH PER PASS)
#103=-3.5 (FINAL DEPTH Z)
(*****************************)
G18 G40 G80 G99
G00 G28 U0.0 V0.0
G00 G28 W0.0
G54
G00 B-90.0
G490 S1800 (ORIENT TO LEFT HAND)
G00 B-90.0
G00 Z5.0
M126
M34
M261
G50 S600
G96 S500 M04 P11
G00 Z0.1
G00 X[#100]
G01 Z[#103+0.01]F0.012
G01 X[#100-0.1]
G00 Z0.1
#104=[#100+#102]
GOTO2
N1
#104=[#104+#102]
N2
IF[#104GT#101]GOTO99
G00 X[#104-0.02]
G01 Z[#103+0.01]F0.012
G01 X[#104-0.15]
G00 Z0.1
GOTO1
N99
G00 X[#101]
G01 Z[#103]F0.008
G01 X[#100-0.15]
G00 Z0.1
G00 X[#101]
G01 Z[#103]F0.008
G01 U0.0625 W-0.0313
G04 U1.0
G01 U-0.0625 W0.0313
G01 X[#100-0.15]
G00 Z0.1
Z1.0
X10.0
G00 Z10.0
G00 G28 U0.0 V0.0
G00 G28 W0.0
T20000
M09
M127
M05 P11
(****** CLEAR ALL JAW DATA ******)
#100=0
#101=0
#102=0
#103=0
#104=0
(*****************************)
M30
%