例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 ft*G*.0kO
i2`.#YJ&v
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： \=
)[
ZlwcwoPib
O0100（MAIN） s8/ozaeo
G92 X80.0 Y40.0；设定坐标系 9;m#>a@Y
M98 P0101；调用子程序P1 }0(vR_x
G93 X0.0 Y0.0；坐标平移 Sm~? zU[k/
M50；切断丝 >@q2FSMf
G90 G00 X100.0 Y120.0；快速移动 kM6
EZ`mj
M60；穿丝 XPR:_
M98 P0102；调用子程序P2 +c~O0U1
G93 X0.0 Y0.0；坐标平移 1+.y,}F6b
M50；切断丝 {VrAh*#h
G90 G00 X200.0 Y80.0；快速移动 n?7hp%}
M60；穿丝 KU 8Cl>5
M98 P0103；调用子程序P3 XACEt~y
M30；程序结束 
子程序调用切割实例
}(f,~?CP] _s*uF_: 3 O0101（P1）子程序P1
k;AV;KWI' G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
#I*ht0++ G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
s\n,Z?m X0.0；到矩形右上角处
T3 B |r<>I Y-40.0；到矩形右下角处
^OGH5@" X-80.0；到矩形左下角处
V2<k0@y Y0.0；到矩形左上角处
P+_\}u; X-40.0；到矩形上边中心处
[|P]S t- Y-20.0；回到矩形的穿丝点（矩形切割的起点）
CC]@`R5 M99；子程序结束返回主程序
~Krg8s!F& )f_"`FH0d O0102（P2）子程序P2
yA`]%U(( G93 X100.0 Y80.0；坐标平移三角形底边中间处
s OrY^cY; G90 G01 Y60.0；到三角形顶点处
& <[]X@ bY X40.0 Y0.0；到三角形右下角处
e[|p0 ,Q Y-40.0；到三角形左下角处
z!uB&2C{k X0 Y60.0；到三角形顶点处
? >< Y40.0；回到三角形的穿丝点（三角形切割的起点）
gE]a*TOZk M99；子程序结束返回主程序
;d' O. i= 7\|NYT4 O0103（P3）子程序P3
tpy :o(H G93 X200.0 Y80.0；坐标平移到圆心处
"KQ\F0/ G90 G01 Y40.0； 到圆以上圆上一点
[W7\c;Do G02 J-40.0；顺时针切割圆
O#89M% G01 Y0.0； 回到圆心处
[fJFH^&?hr M99；子程序结束返回主程序
