例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 *Kj*| >)
c'M#va
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： I3 /^{-n
'.Iz*%"
O0100（MAIN） i#Tm] ++
G92 X80.0 Y40.0；设定坐标系 cQ( zBf
M98 P0101；调用子程序P1 ?+#|h;M8
G93 X0.0 Y0.0；坐标平移 qxS=8#-`(
M50；切断丝 ct,B0(]
G90 G00 X100.0 Y120.0；快速移动 9))E\U
M60；穿丝 B k,:a,
M98 P0102；调用子程序P2 Ia_I~ U$
G93 X0.0 Y0.0；坐标平移 $n_'# m2LE
M50；切断丝 B-Bgk
G90 G00 X200.0 Y80.0；快速移动 +M4X
r *
M60；穿丝 lS"g[O+
M98 P0103；调用子程序P3 1>hY!nG h
M30；程序结束 
子程序调用切割实例
n0|oV(0FE h|
q!Qsnj' O0101（P1）子程序P1
6*yt^[ W G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
g<C_3 ap/ G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
O ?`=<W/R X0.0；到矩形右上角处
/{Ff)<Q.Z Y-40.0；到矩形右下角处
Zl aU+Y(_[ X-80.0；到矩形左下角处
*12,MO>go Y0.0；到矩形左上角处
4n6EkTa X-40.0；到矩形上边中心处
#p 'Xq
}] Y-20.0；回到矩形的穿丝点（矩形切割的起点）
! 6y< jJ> M99；子程序结束返回主程序
Uc
oVp}vl ee7#PE]} O0102（P2）子程序P2
hcWYz G93 X100.0 Y80.0；坐标平移三角形底边中间处
R9=K / G90 G01 Y60.0；到三角形顶点处
cuv?[ M X40.0 Y0.0；到三角形右下角处
<}e2\x Y-40.0；到三角形左下角处
5= <
y%VF X0 Y60.0；到三角形顶点处
@tv3\eD Y40.0；回到三角形的穿丝点（三角形切割的起点）
b{T". @ b M99；子程序结束返回主程序
PL+r*M%ll [C1 .*Q+l O0103（P3）子程序P3
:r5DR`Rfm G93 X200.0 Y80.0；坐标平移到圆心处
T NwBnM e G90 G01 Y40.0； 到圆以上圆上一点
M0Eq
7:Ba G02 J-40.0；顺时针切割圆
ey 'x3s_ G01 Y0.0； 回到圆心处
p)_v.D3i M99；子程序结束返回主程序
