例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 2T2#H P
|u@>[ *k'=
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： JU2' ~chh
K| J#/
O0100（MAIN） nF[eb{GR`
G92 X80.0 Y40.0；设定坐标系 5J2p^$s
M98 P0101；调用子程序P1 +7vh_ _
G93 X0.0 Y0.0；坐标平移 cZK?kz_Y
M50；切断丝 S 0QU@e
G90 G00 X100.0 Y120.0；快速移动 4 }YT@={g}
M60；穿丝 >_% g8T'
M98 P0102；调用子程序P2 P}u<NPy3Q
G93 X0.0 Y0.0；坐标平移 6Q?6- ,?_
M50；切断丝 jnLu| W&
G90 G00 X200.0 Y80.0；快速移动 :Y?08/V
M60；穿丝 7X3l&J2C4l
M98 P0103；调用子程序P3 [x() ^{;2
M30；程序结束 
子程序调用切割实例
{]m
e?I `DY4d$!4 O0101（P1）子程序P1
u H;^>`DT G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
}sNZQ89V*v G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
W)P_t"'@L X0.0；到矩形右上角处
|;1:$E " Y-40.0；到矩形右下角处
yaGVY*M0 X-80.0；到矩形左下角处
2{tJ '3 Y0.0；到矩形左上角处
a}]@ o" X-40.0；到矩形上边中心处
`2~Ea_Z Y-20.0；回到矩形的穿丝点（矩形切割的起点）
[0
f6uIF M99；子程序结束返回主程序
DG9;6"HBX Q-%=ZW Z O0102（P2）子程序P2
Fi=8B&j G93 X100.0 Y80.0；坐标平移三角形底边中间处
WW/m
/+ G90 G01 Y60.0；到三角形顶点处
?\$/#zak X40.0 Y0.0；到三角形右下角处
2Yf; b9-k Y-40.0；到三角形左下角处
;+Kewi;< X0 Y60.0；到三角形顶点处
aRKG)0= Y40.0；回到三角形的穿丝点（三角形切割的起点）
M@8 6u^80 M99；子程序结束返回主程序
!8M'ms>s= b#'a4j-u O0103（P3）子程序P3
Gjh7cm> G93 X200.0 Y80.0；坐标平移到圆心处
<NsT[r ~C G90 G01 Y40.0； 到圆以上圆上一点
iiFKt( G02 J-40.0；顺时针切割圆
,Yt&PE G01 Y0.0； 回到圆心处
r ?> Hg+ M99；子程序结束返回主程序
