例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 )E @ A0 W
&e 6CJ
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： 'EDda
v\m ]A1
O0100（MAIN） I)A`)5="5
G92 X80.0 Y40.0；设定坐标系 N(I&
M98 P0101；调用子程序P1 & l3iV88
G93 X0.0 Y0.0；坐标平移 1
$/%m_t
M50；切断丝 CC#;c1t
G90 G00 X100.0 Y120.0；快速移动 J5^'HU3
M60；穿丝 bFe+m1Q_
M98 P0102；调用子程序P2 G rUCZ<S
G93 X0.0 Y0.0；坐标平移 5R(/Uiv 3F
M50；切断丝 ZovW0 Q)m
G90 G00 X200.0 Y80.0；快速移动 O8 B\{T1
M60；穿丝 ne 4Q#P
M98 P0103；调用子程序P3 fQ#l3@in
M30；程序结束 
子程序调用切割实例
Y.g59X!Ub2 Z .92 y O0101（P1）子程序P1
h }B%
/U G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
%Ev4]}2C1 G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
anXc| X0.0；到矩形右上角处
j#cYS*^H Y-40.0；到矩形右下角处
xuq v 6b. X-80.0；到矩形左下角处
^$b Y,CE Y0.0；到矩形左上角处
-r-k_6QP X-40.0；到矩形上边中心处
"?V0$-DR Y-20.0；回到矩形的穿丝点（矩形切割的起点）
SQX:7YF~ M99；子程序结束返回主程序
rg^'S1x| `DV.+>O-1 O0102（P2）子程序P2
<YdE1{fm G93 X100.0 Y80.0；坐标平移三角形底边中间处
8_{X1b j G90 G01 Y60.0；到三角形顶点处
/Mvf8v X40.0 Y0.0；到三角形右下角处
: Zlwp6 Y-40.0；到三角形左下角处
"wNJ X0 Y60.0；到三角形顶点处
7Zlw^'q$:L Y40.0；回到三角形的穿丝点（三角形切割的起点）
F oN|i"*l M99；子程序结束返回主程序
r>o63Q: `$ 6rz O0103（P3）子程序P3
HMSO=)@+ G93 X200.0 Y80.0；坐标平移到圆心处
L7dd(^ G90 G01 Y40.0； 到圆以上圆上一点
n*2UnKaJ G02 J-40.0；顺时针切割圆
#ZB~ x6i6 G01 Y0.0； 回到圆心处
kqFP)!37 M99；子程序结束返回主程序
