例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 j8oX9
Yo0=
u6 QW*8b4
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： =xQPg0g
?)ct@,Ek$
O0100（MAIN） +DG-MM%\
G92 X80.0 Y40.0；设定坐标系 3:O| p[2)L
M98 P0101；调用子程序P1 2$o#b .
G93 X0.0 Y0.0；坐标平移 R$ !] z(
M50；切断丝 u/<ZGW(&s(
G90 G00 X100.0 Y120.0；快速移动 2D(sA
M60；穿丝 Q ;N)$Xx
M98 P0102；调用子程序P2 r$v \ \^?2
G93 X0.0 Y0.0；坐标平移 ScjeAC)
M50；切断丝 G1-r$7\
G90 G00 X200.0 Y80.0；快速移动 [p' A?-
M60；穿丝 ,A &`W E
M98 P0103；调用子程序P3 JMk2OK {0
M30；程序结束 
子程序调用切割实例
x+DETRLP _Ss}dU9 O0101（P1）子程序P1
cuC'
o\f G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
:_<&LO]Q G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
*<:6A&'D9 X0.0；到矩形右上角处
cNT !}8h^ Y-40.0；到矩形右下角处
ZeY|J H1 X-80.0；到矩形左下角处
E,F^!4 rJ$ Y0.0；到矩形左上角处
MQDLC7Y.p5 X-40.0；到矩形上边中心处
,{\Ae"{6 Y-20.0；回到矩形的穿丝点（矩形切割的起点）
fs yVu|G M99；子程序结束返回主程序
7IFZK\V _xH<R O0102（P2）子程序P2
fN@ZJ~F%j G93 X100.0 Y80.0；坐标平移三角形底边中间处
\[qxOZ{ G90 G01 Y60.0；到三角形顶点处
~+d{:WY X40.0 Y0.0；到三角形右下角处
#eN2{G=4+ Y-40.0；到三角形左下角处
CzY18-L@EX X0 Y60.0；到三角形顶点处
TV0sxod6 Y40.0；回到三角形的穿丝点（三角形切割的起点）
tAo$; | M99；子程序结束返回主程序
1ni72iz\ *P 5\T4!+d O0103（P3）子程序P3
k]C k%[d G93 X200.0 Y80.0；坐标平移到圆心处
8KN 3|) G90 G01 Y40.0； 到圆以上圆上一点
s?s ,wdp G02 J-40.0；顺时针切割圆
.%dGSDru G01 Y0.0； 回到圆心处
`\|@w@f|; M99；子程序结束返回主程序
