例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 F~z_>1lpP&
%<aImR]
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： DH\wD Q
OlEpid'Z
O0100（MAIN） ,'FD}yw4v
G92 X80.0 Y40.0；设定坐标系 5U0ytDZ2/(
M98 P0101；调用子程序P1 E x_L!9>!
G93 X0.0 Y0.0；坐标平移 R(: 4s
M50；切断丝 D3 %l4.h
G90 G00 X100.0 Y120.0；快速移动 WYSc k&9
M60；穿丝 J#6LSD@ (O
M98 P0102；调用子程序P2 >65
TkAp
G93 X0.0 Y0.0；坐标平移 i[^k.W3gf
M50；切断丝 5Xwk*@t2a
G90 G00 X200.0 Y80.0；快速移动 r~)VGdB+
M60；穿丝 .r ~'(g{qt
M98 P0103；调用子程序P3 &}zRH}s;
M30；程序结束 
子程序调用切割实例
;e&! M$,Jg5Dc O0101（P1）子程序P1
(JevHdI*V G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
dKU5 ; G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
>4Iv[ D1 X0.0；到矩形右上角处
_kh >Z Y-40.0；到矩形右下角处
d2ohW | X-80.0；到矩形左下角处
d O+kPC Y0.0；到矩形左上角处
PPN q:, X-40.0；到矩形上边中心处
f 4R1$(< Y-20.0；回到矩形的穿丝点（矩形切割的起点）
0; vtdM[_ M99；子程序结束返回主程序
+d =~LQ}* q;p.wEbr4U O0102（P2）子程序P2
--Oprl G93 X100.0 Y80.0；坐标平移三角形底边中间处
0[lS( K G90 G01 Y60.0；到三角形顶点处
bKYY{V55 X40.0 Y0.0；到三角形右下角处
PM@XtL7J Y-40.0；到三角形左下角处
!{IC[g n X0 Y60.0；到三角形顶点处
5QR}Ix Q Y40.0；回到三角形的穿丝点（三角形切割的起点）
?hKm&B;d M99；子程序结束返回主程序
+q7qK* #De(*&y2 O0103（P3）子程序P3
^Ss<X}es- G93 X200.0 Y80.0；坐标平移到圆心处
1x { XE*%; G90 G01 Y40.0； 到圆以上圆上一点
%=BtOM_2 G02 J-40.0；顺时针切割圆
Bk+{} G01 Y0.0； 回到圆心处
\ZqK\= M99；子程序结束返回主程序
