例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 KlS#f
noz1W ]
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： nJYIkfd A
/+`%u&<
O0100（MAIN） @T L|\T
G92 X80.0 Y40.0；设定坐标系 ^[bFG KE
M98 P0101；调用子程序P1 #U w X~
G93 X0.0 Y0.0；坐标平移 4:**d [|1
M50；切断丝 b+arnKo1fk
G90 G00 X100.0 Y120.0；快速移动 +03/A`PKrB
M60；穿丝 o+XQ Mg
M98 P0102；调用子程序P2 GNrRc3dr$
G93 X0.0 Y0.0；坐标平移 v{"yrC
M50；切断丝 z>y# ^f)r
G90 G00 X200.0 Y80.0；快速移动 t54?<-
M60；穿丝 XHJ` C\xR
M98 P0103；调用子程序P3 Tjv'S
<
M30；程序结束 
子程序调用切割实例
]=i('|YG KkpbZ7\@ O0101（P1）子程序P1
dXM8iP G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
kQd|qZ=:w G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
}f}? |&q X0.0；到矩形右上角处
y4I Qa.F Y-40.0；到矩形右下角处
.Oc j |A6 X-80.0；到矩形左下角处
PXtF#,roP Y0.0；到矩形左上角处
/ bH2 Z X-40.0；到矩形上边中心处
|`o1 B;lc Y-20.0；回到矩形的穿丝点（矩形切割的起点）
@K*W3& TO M99；子程序结束返回主程序
EVaHb; /~;!E w|q O0102（P2）子程序P2
(4ZO[Ae G93 X100.0 Y80.0；坐标平移三角形底边中间处
Qmo}esb'( G90 G01 Y60.0；到三角形顶点处
r1vS~
4Z X40.0 Y0.0；到三角形右下角处
{ m{nCl)y Y-40.0；到三角形左下角处
MXEI/mDYK X0 Y60.0；到三角形顶点处
jpZq]E9`P Y40.0；回到三角形的穿丝点（三角形切割的起点）
wWf_d jd M99；子程序结束返回主程序
=v<A&4 -gt ?5H h O0103（P3）子程序P3
+ %K ~ G93 X200.0 Y80.0；坐标平移到圆心处
XSK<hr0m G90 G01 Y40.0； 到圆以上圆上一点
0#uB[N G02 J-40.0；顺时针切割圆
&?1^/]'"r G01 Y0.0； 回到圆心处
> cWE@P M99；子程序结束返回主程序
