例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 0:T|S>FsAm
8p: j&F
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： = 17t-
[
@0F3$
O0100（MAIN） s#WAR]x0x
G92 X80.0 Y40.0；设定坐标系 2Tagr1L
M98 P0101；调用子程序P1 eN^qG
42
G93 X0.0 Y0.0；坐标平移 ^3UGV*Ypk
M50；切断丝 zR{W?_cV
G90 G00 X100.0 Y120.0；快速移动 m8o(J\]
M60；穿丝 aP/T<QZ~
M98 P0102；调用子程序P2 v+X)Qmzf~
G93 X0.0 Y0.0；坐标平移 lk( }-
M50；切断丝 OEkN(w F
G90 G00 X200.0 Y80.0；快速移动 o:_Xv.HRZo
M60；穿丝 @9lUSk ^9
M98 P0103；调用子程序P3 lQe%Yh
>rl
M30；程序结束 
子程序调用切割实例
,=#F// d&+h}O O0101（P1）子程序P1
#n# @fAY G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
MZT23 [+ G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
CL+}| 7O( X0.0；到矩形右上角处
6e[VgN-s Y-40.0；到矩形右下角处
RE/~#k@a X-80.0；到矩形左下角处
IyWI5Q"t Y0.0；到矩形左上角处
sk=-M8;\ X-40.0；到矩形上边中心处
E<Q
f!2s$ Y-20.0；回到矩形的穿丝点（矩形切割的起点）
o}* hY"& M99；子程序结束返回主程序
(G[
*|6m yc?a=6q'm O0102（P2）子程序P2
[m|YWT= G93 X100.0 Y80.0；坐标平移三角形底边中间处
6x%h6<#xh* G90 G01 Y60.0；到三角形顶点处
ZR(x%ews X40.0 Y0.0；到三角形右下角处
Bq$rf < W Y-40.0；到三角形左下角处
SN1}xR$ X0 Y60.0；到三角形顶点处
1q,{0s_kp Y40.0；回到三角形的穿丝点（三角形切割的起点）
[D<1 CF M99；子程序结束返回主程序
R
wZ]),o z}MP)|aH: O0103（P3）子程序P3
;e1ku|>$ G93 X200.0 Y80.0；坐标平移到圆心处
D F* :_B ) G90 G01 Y40.0； 到圆以上圆上一点
Bi
@2 G02 J-40.0；顺时针切割圆
[O?z@)dx G01 Y0.0； 回到圆心处
T Kg aV;92 M99；子程序结束返回主程序
