例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。
P8tdT3*6/
h:
' |)O
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： $ Hab hw
e8F]m`{_"
O0100（MAIN） s^wm2/Yw
G92 X80.0 Y40.0；设定坐标系 s, HbW%s
M98 P0101；调用子程序P1 N~v6K}`}
G93 X0.0 Y0.0；坐标平移 i5VZ,E^ E
M50；切断丝 6hxZ5&;(*
G90 G00 X100.0 Y120.0；快速移动 S
/hx\TzC
M60；穿丝 #,%bW[L<N
M98 P0102；调用子程序P2 PsC")JS
G93 X0.0 Y0.0；坐标平移 j / 5
M50；切断丝 `JySuP2~/
G90 G00 X200.0 Y80.0；快速移动 U\KMeaF5e-
M60；穿丝 e97G]XLR
M98 P0103；调用子程序P3 p5G'})x
M30；程序结束 
子程序调用切割实例
Y{YbKKM
G 3Z"U O0101（P1）子程序P1
k^J8 p#`6 G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
ma.84~m G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
W0qR? jc X0.0；到矩形右上角处
Nu5|tf9%A Y-40.0；到矩形右下角处
pRd.KY -< X-80.0；到矩形左下角处
-$Oh.B` i Y0.0；到矩形左上角处
<DF3! r X-40.0；到矩形上边中心处
@N=vmtLP Y-20.0；回到矩形的穿丝点（矩形切割的起点）
K d&/9<{> M99；子程序结束返回主程序
E } L Hp Q +:y O0102（P2）子程序P2
M 5dYcCDE G93 X100.0 Y80.0；坐标平移三角形底边中间处
uYh!04u G90 G01 Y60.0；到三角形顶点处
w0Qtr>" X40.0 Y0.0；到三角形右下角处
uo9# (6 Y-40.0；到三角形左下角处
dSM\:/t X0 Y60.0；到三角形顶点处
&V].,12 x Y40.0；回到三角形的穿丝点（三角形切割的起点）
SE'Im M99；子程序结束返回主程序
%yR XOt2( H I g2y O0103（P3）子程序P3
c;l!i- G93 X200.0 Y80.0；坐标平移到圆心处
>jm(2P(R
G90 G01 Y40.0； 到圆以上圆上一点
JJ: ku&Mb G02 J-40.0；顺时针切割圆
<kh.fu@.Q G01 Y0.0； 回到圆心处
6( n0{A M99；子程序结束返回主程序
