例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 A=wh@"2
J6FV]Gpv
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: b`O'1r\Y;
1^(ad;BCy
O0100(MAIN) 8eHyL
G92 X80.0 Y40.0;设定坐标系 4Ic*9t3
M98 P0101;调用子程序P1 V /V9B2.$
G93 X0.0 Y0.0;坐标平移 ,>mrPtxN
M50;切断丝 xx%j.zDI]
G90 G00 X100.0 Y120.0;快速移动 k{SAvKx=
M60;穿丝 -I,$_
M98 P0102;调用子程序P2 ]F'e
aR
G93 X0.0 Y0.0;坐标平移 8C9-_Ng`
M50;切断丝 @wNG{Stj
G90 G00 X200.0 Y80.0;快速移动 @'!SN\?W8
M60;穿丝 T <ET
)D7
M98 P0103;调用子程序P3 Hn+~5@.
M30;程序结束 
子程序调用切割实例
76h ,]xi
oHn
Ky[1 O0101(P1)子程序P1
pohp&Tcm G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
XLOh7(
G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
6.nCV0xA X0.0;到矩形右上角处
o]M5b;1 Y-40.0;到矩形右下角处
Ks`J([(W& X-80.0;到矩形左下角处
[;),\\u,d Y0.0;到矩形左上角处
f5VLw`m}.8 X-40.0;到矩形上边中心处
^N{h3b8 Y-20.0;回到矩形的穿丝点(矩形切割的起点)
~;{;,8!) M99;子程序结束返回主程序
WuUk9_g GM f
`A,> O0102(P2)子程序P2
'XP7"
N47O G93 X100.0 Y80.0;坐标平移三角形底边中间处
V7fq4O^: G90 G01 Y60.0;到三角形顶点处
/zVOK4BqN+ X40.0 Y0.0;到三角形右下角处
iE^84l68 Y-40.0;到三角形左下角处
qwgPk9l X0 Y60.0;到三角形顶点处
N.{H,oO ` Y40.0;回到三角形的穿丝点(三角形切割的起点)
;LSANr& M99;子程序结束返回主程序
:hk5 .[ ;dZZ;#k% O0103(P3)子程序P3
tm RXgTS G93 X200.0 Y80.0;坐标平移到圆心处
ARwD~Tr G90 G01 Y40.0; 到圆以上圆上一点
a>I+]`g G02 J-40.0;顺时针切割圆
ryUQU^v G01 Y0.0; 回到圆心处
a:IC)]j$_ M99;子程序结束返回主程序