例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 T)/eeZ$
Ml_^
` vn
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： afV T~Sf{
js(pC@<q5
O0100（MAIN） K- v#.e4
G92 X80.0 Y40.0；设定坐标系 }2jn[${ pr
M98 P0101；调用子程序P1 /uc>@!F
G93 X0.0 Y0.0；坐标平移 B,@i
M50；切断丝 aE8VZ8tvq
G90 G00 X100.0 Y120.0；快速移动 IGl9 g_1 8
M60；穿丝 J.a]K[ci
M98 P0102；调用子程序P2 ES[G
G93 X0.0 Y0.0；坐标平移 /~1+i'7V.,
M50；切断丝 dysS9a,
G90 G00 X200.0 Y80.0；快速移动 5P2K5,o|n~
M60；穿丝 c Aw/I@jG
M98 P0103；调用子程序P3 Z ,gk|M3.
M30；程序结束 
子程序调用切割实例
E .h*g8bXe 6tZI["\ O0101（P1）子程序P1
}MySaL> G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
+ {]j]OP G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
7 V>M] X0.0；到矩形右上角处
?,/ }`3Vw Y-40.0；到矩形右下角处
4eu O1= X-80.0；到矩形左下角处
+`4A$# $+y Y0.0；到矩形左上角处
A/(a`"mK|' X-40.0；到矩形上边中心处
TeQV?ZQ#} Y-20.0；回到矩形的穿丝点（矩形切割的起点）
637:
oT_`O M99；子程序结束返回主程序
6)J#OKZ \V:^h [ad O0102（P2）子程序P2
l ;U? Z'n G93 X100.0 Y80.0；坐标平移三角形底边中间处
e20-h3h+ G90 G01 Y60.0；到三角形顶点处
4i bc X40.0 Y0.0；到三角形右下角处
kAx4fE[c Y-40.0；到三角形左下角处
WIOV2 + X0 Y60.0；到三角形顶点处
~&O%N Y40.0；回到三角形的穿丝点（三角形切割的起点）
}]Tx lSp!; M99；子程序结束返回主程序
s 2?&! 6@f-Glwg O0103（P3）子程序P3
YIE<pX4Q7) G93 X200.0 Y80.0；坐标平移到圆心处
<3iMRe G90 G01 Y40.0； 到圆以上圆上一点
6@o*xK7L G02 J-40.0；顺时针切割圆
8t`?#8D} G01 Y0.0； 回到圆心处
e!`i3KYn" M99；子程序结束返回主程序
