例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 kc `Q-
N}
xtN%v 0ZZ
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： vWI9ocl`W
XbYW,a@w2
O0100（MAIN） &| el8;D
G92 X80.0 Y40.0；设定坐标系 d $g-u8
M98 P0101；调用子程序P1 OUn,UR I
G93 X0.0 Y0.0；坐标平移 {$ 4fRxj
M50；切断丝 o
<8L, u(U
G90 G00 X100.0 Y120.0；快速移动 d NG>:p
M60；穿丝 #)_4$<P*'
M98 P0102；调用子程序P2 Z6SM7? d
G93 X0.0 Y0.0；坐标平移 Lm"l*j4
M50；切断丝 *nU7v3D
G90 G00 X200.0 Y80.0；快速移动 V3K
M60；穿丝 o 6
M98 P0103；调用子程序P3 $d?<(n
M30；程序结束 
子程序调用切割实例
I
:%(nKBK c3]ZU^ O0101（P1）子程序P1
D_`MeqF}C G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
?n> h /[/ G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
&H;0N"Fn X0.0；到矩形右上角处
e?3 S0} Y-40.0；到矩形右下角处
8.Wf^j$+{ X-80.0；到矩形左下角处
}'a}s0h Y0.0；到矩形左上角处
h djv/ X-40.0；到矩形上边中心处
Y<%$;fx$Sx Y-20.0；回到矩形的穿丝点（矩形切割的起点）
" GkBX M99；子程序结束返回主程序
Af1mTbf= jTaEaX8+ O0102（P2）子程序P2
=l&7~ G93 X100.0 Y80.0；坐标平移三角形底边中间处
$fV47;U'* G90 G01 Y60.0；到三角形顶点处
* Ibl+ X40.0 Y0.0；到三角形右下角处
U)=?3}s( Y-40.0；到三角形左下角处
C^XJE1D. X0 Y60.0；到三角形顶点处
wq J^tA! Y40.0；回到三角形的穿丝点（三角形切割的起点）
ZJ'#XZpr M99；子程序结束返回主程序
:84fd\It4 D`,W 1Z# O0103（P3）子程序P3
QNJ )HN Lp G93 X200.0 Y80.0；坐标平移到圆心处
1om :SHw G90 G01 Y40.0； 到圆以上圆上一点
m^@,0\F G02 J-40.0；顺时针切割圆
O 8"kIDr- G01 Y0.0； 回到圆心处
L0Bcx|)"$` M99；子程序结束返回主程序
