例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。
CJJD@=
?AEd(_a!q
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： VZ$=6CavH
}.p<wCPy6
O0100（MAIN） _2b9QP p
G92 X80.0 Y40.0；设定坐标系 o/C(4q6d
M98 P0101；调用子程序P1 P}0*{%jB
G93 X0.0 Y0.0；坐标平移 Frk c O
M50；切断丝 ~4Pc_%&i
G90 G00 X100.0 Y120.0；快速移动 #/|75
4]]
M60；穿丝 J1bA2+5.*e
M98 P0102；调用子程序P2 &uv0G'"\
G93 X0.0 Y0.0；坐标平移 [QT 1Ju64
M50；切断丝 P.djd$#
G90 G00 X200.0 Y80.0；快速移动 Z`Pd2VRp
M60；穿丝 ;i mRh'-V6
M98 P0103；调用子程序P3 %JtbRs(~q
M30；程序结束 
子程序调用切割实例
P"1 S$oc 2jl)mL O0101（P1）子程序P1
<\" .L G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
FXV`9uq}Z G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
6k"P&AD X0.0；到矩形右上角处
. V$ps-t Y-40.0；到矩形右下角处
M`vyTuO3SO X-80.0；到矩形左下角处
Rs*v m Y0.0；到矩形左上角处
Po(]rQbE X-40.0；到矩形上边中心处
nBN&.+3t Y-20.0；回到矩形的穿丝点（矩形切割的起点）
[$\z'} M99；子程序结束返回主程序
z% 1{ +Ng0WS_0 O0102（P2）子程序P2
P}V=*g G93 X100.0 Y80.0；坐标平移三角形底边中间处
|E TiLR=& G90 G01 Y60.0；到三角形顶点处
;gMgj$mI X40.0 Y0.0；到三角形右下角处
QV qK Y-40.0；到三角形左下角处
*f5l=lDOB X0 Y60.0；到三角形顶点处
&.Q8Mi
aT Y40.0；回到三角形的穿丝点（三角形切割的起点）
[3N[i(Wlk M99；子程序结束返回主程序
w5KPB5/zu :m'+tGs O0103（P3）子程序P3
A5fwAB G93 X200.0 Y80.0；坐标平移到圆心处
\'Z<P,8~ G90 G01 Y40.0； 到圆以上圆上一点
f?56=& pHY G02 J-40.0；顺时针切割圆
Q6
? z_0 G01 Y0.0； 回到圆心处
,Q/Ac{C M99；子程序结束返回主程序
