例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 {$O.@#'
TQ>kmHWf/
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: F~{yqY5]n
'$q'Wl)
O0100(MAIN) s 6vsV
G92 X80.0 Y40.0;设定坐标系 :eei<cn2
M98 P0101;调用子程序P1 }T4"#'`
G93 X0.0 Y0.0;坐标平移 $>8+t>|
M50;切断丝 Ok2k;
+l
G90 G00 X100.0 Y120.0;快速移动 rc9 \
M60;穿丝 ZDcv-6C)B
M98 P0102;调用子程序P2 6-QTqb?U;N
G93 X0.0 Y0.0;坐标平移 J3y5R1?EP
M50;切断丝 m0XK?;\V
G90 G00 X200.0 Y80.0;快速移动 mi%d([)%<
M60;穿丝 '1^\^)&q
M98 P0103;调用子程序P3 C03ehjT<
M30;程序结束 
子程序调用切割实例
sqj8c)6 tezsoR!.ak O0101(P1)子程序P1
x_bS-B)%Y: G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
2syKYHV G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
`!>zYcmT X0.0;到矩形右上角处
4\dc Y-40.0;到矩形右下角处
r3_@ L>; X-80.0;到矩形左下角处
zZ
OoPE Y0.0;到矩形左上角处
}4
P@`>e/` X-40.0;到矩形上边中心处
tjuW+5O Y-20.0;回到矩形的穿丝点(矩形切割的起点)
^xu`NE8; M99;子程序结束返回主程序
}qi6K-,oU L7%Dc2{^( O0102(P2)子程序P2
qW$IpuK G93 X100.0 Y80.0;坐标平移三角形底边中间处
o24`5Jdh G90 G01 Y60.0;到三角形顶点处
VG q' X40.0 Y0.0;到三角形右下角处
j#3}nJB%#i Y-40.0;到三角形左下角处
.kBi" p& X0 Y60.0;到三角形顶点处
YJ.'Yc Y40.0;回到三角形的穿丝点(三角形切割的起点)
:7@"EW M99;子程序结束返回主程序
b ]1SuL @C~TD)K O0103(P3)子程序P3
+:mj]`= G93 X200.0 Y80.0;坐标平移到圆心处
O&E1(M|*> G90 G01 Y40.0; 到圆以上圆上一点
qYGnebn@\ G02 J-40.0;顺时针切割圆
!gW$A-XD G01 Y0.0; 回到圆心处
vA;ml$ M99;子程序结束返回主程序