O10 程式名 (主程式)
G50 X170. Z100.; 工件座標系設定
G99 M03 ; 每轉進給 主軸正轉
T0100 ; 呼叫第一把刀具
M98 P11 H01 L6 ; 呼叫11號程式 從
N20 M05; N01段開始執行,
W90.;
M30; 呼叫6次
O11 程式名 (副程式)
N01 G00 X29.Z90.; 刀具快速定位
N02 G01 X17.F0.1;車端面
N03 G00 X170.Z100.;退刀
N04 T0202 ; 換60°尖刀
N07 G00X24.95 Z90.;定位
N08 G01W-2.5F0.1; 車φ25外圓
N09 G01X23.; 車30°角
N10 W-8.8 ; 車φ23外圓
N11 X24.95;
N12 W-3.;
N13 G00X170.Z100.T0200 退刀去刀補值
N14 T0303 ; 換切刀
N15 X26.Z75.;
N16 X19.F0.1; 切斷
N17 X170.T0300; 退刀去刀補值
N18 W10.; Z向退刀
N19 G50Z100. ; 重新建立座標系
M99 N20 ; 呼叫結束返回主程式
O10 程式名 (主程式)
G50 X170. Z100.; 工件座標系設定
G99 M03 ; 每轉進給 主軸正轉
T0100 ; 呼叫第一把刀具
M98 P11 H01 L6 ; 呼叫11號程式 從
N20 M05; N01段開始執行,
W90.;
M30; 呼叫6次
O11 程式名 (副程式)
N01 G00 X29.Z90.; 刀具快速定位
N02 G01 X17.F0.1;車端面
N03 G00 X170.Z100.;退刀
N04 T0202 ; 換60°尖刀
N07 G00X24.95 Z90.;定位
N08 G01W-2.5F0.1; 車φ25外圓
N09 G01X23.; 車30°角
N10 W-8.8 ; 車φ23外圓
N11 X24.95;
N12 W-3.;
N13 G00X170.Z100.T0200 退刀去刀補值
N14 T0303 ; 換切刀
N15 X26.Z75.;
N16 X19.F0.1; 切斷
N17 X170.T0300; 退刀去刀補值
N18 W10.; Z向退刀
N19 G50Z100. ; 重新建立座標系
M99 N20 ; 呼叫結束返回主程式