例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 Gaw LQst[+
_ mFb+8C
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： Q_M2!qj
B/pNM81(
O0100（MAIN） jS| (g##4
G92 X80.0 Y40.0；设定坐标系 ilpg()
M98 P0101；调用子程序P1 ou96
P<B
G93 X0.0 Y0.0；坐标平移 4}#*M2wb
M50；切断丝 Lf7iOW9U3
G90 G00 X100.0 Y120.0；快速移动 :i?Z1x1`
M60；穿丝 OJ ] {FI
M98 P0102；调用子程序P2 4!iS"QH?;^
G93 X0.0 Y0.0；坐标平移 :n>:*e@w%
M50；切断丝 b%T-nY2
G90 G00 X200.0 Y80.0；快速移动 }RW4
M60；穿丝 e`8z1r
M98 P0103；调用子程序P3 GTJ\APrH
M30；程序结束 
子程序调用切割实例
0D 0 #*J ;?%2dv2d O0101（P1）子程序P1
PMkwY {.u G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
@AVx4,!>[ G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
aLq=%fsV) X0.0；到矩形右上角处
`4l>%S8y: Y-40.0；到矩形右下角处
/rJvw X-80.0；到矩形左下角处
-hhE`Y Y0.0；到矩形左上角处
H$\?D+xlf X-40.0；到矩形上边中心处
Z p]Bs Y-20.0；回到矩形的穿丝点（矩形切割的起点）
vad" N M99；子程序结束返回主程序
t1IC0'o- l m-ubzJN O0102（P2）子程序P2
y $\K@B4 G93 X100.0 Y80.0；坐标平移三角形底边中间处
f{^n<\Jh G90 G01 Y60.0；到三角形顶点处
^!Bpev X40.0 Y0.0；到三角形右下角处
KAEf 4 / Y-40.0；到三角形左下角处
zM[WbB+"m X0 Y60.0；到三角形顶点处
1NJ*EzJ~? Y40.0；回到三角形的穿丝点（三角形切割的起点）
1 &wZJP = M99；子程序结束返回主程序
nc@ul') _H:SoJ' O0103（P3）子程序P3
5 nf|CQH6? G93 X200.0 Y80.0；坐标平移到圆心处
F)v+ .5T1 G90 G01 Y40.0； 到圆以上圆上一点
}R}tIC-: G02 J-40.0；顺时针切割圆
7+ =j]+ O G01 Y0.0； 回到圆心处
9n9/[?S M99；子程序结束返回主程序
