例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 <()xO(
L'=e /&
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： Yo0%5 noz
+kCVi
O0100（MAIN） ]PdpC"
G92 X80.0 Y40.0；设定坐标系 ^Q8m) 0DP
M98 P0101；调用子程序P1 i[FcY2
G93 X0.0 Y0.0；坐标平移 4/D ~H+k
M50；切断丝 y$@d%U*rW^
G90 G00 X100.0 Y120.0；快速移动 #u+BjuZo
M60；穿丝 L^PZ\OC
M98 P0102；调用子程序P2 I 0ycLx
G93 X0.0 Y0.0；坐标平移 n0 :+D
R
M50；切断丝 3}O.B
r|
G90 G00 X200.0 Y80.0；快速移动 i gzISYC_
M60；穿丝 Y{y #us1
M98 P0103；调用子程序P3 o:C:obiQbu
M30；程序结束 
子程序调用切割实例
2 c fzLW( }i_[wq{E& O0101（P1）子程序P1
SxXh
N G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
ixN>KwH G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
%Fb"&F^7 X0.0；到矩形右上角处
Avw"[~Xd Y-40.0；到矩形右下角处
u E:#m.Q X-80.0；到矩形左下角处
;@K,>$ur- Y0.0；到矩形左上角处
{y0*cC X-40.0；到矩形上边中心处
#I9 |>XE1 Y-20.0；回到矩形的穿丝点（矩形切割的起点）
EVmQ"PKL' M99；子程序结束返回主程序
9Vk61x 6 A` u04Lm7 O0102（P2）子程序P2
; }IF'ANA G93 X100.0 Y80.0；坐标平移三角形底边中间处
77/y{#Sk G90 G01 Y60.0；到三角形顶点处
yAEOn/. ~ X40.0 Y0.0；到三角形右下角处
"d'xT/l
" Y-40.0；到三角形左下角处
MnFem $ @ X0 Y60.0；到三角形顶点处
6, ag\ Y40.0；回到三角形的穿丝点（三角形切割的起点）
tjk Y[ M99；子程序结束返回主程序
Mr:*l`b_ U0u @[9! O0103（P3）子程序P3
"Ks% ! G93 X200.0 Y80.0；坐标平移到圆心处
(]j*)~=V G90 G01 Y40.0； 到圆以上圆上一点
y<PPO 6u7 G02 J-40.0；顺时针切割圆
sAk~`(:4! G01 Y0.0； 回到圆心处
`u:U{m M99；子程序结束返回主程序
