例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 7[XRd9a5(
} |NCboM^_
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： uHzU-FZ|B
0 /U{p,r6`
O0100（MAIN） M!^az[ [
G92 X80.0 Y40.0；设定坐标系 33B]RGq
M98 P0101；调用子程序P1 VjZ|$k
G93 X0.0 Y0.0；坐标平移 T:yE(OBf
M50；切断丝 ENs&RZ;
G90 G00 X100.0 Y120.0；快速移动 ( ^Nz9{
M60；穿丝 c<Tf
2]vZE
M98 P0102；调用子程序P2 g1 "kT h
G93 X0.0 Y0.0；坐标平移 &d^m 1
M50；切断丝 .}~_a7 6
G90 G00 X200.0 Y80.0；快速移动 +V OK%8,p
M60；穿丝 <R=Zs[9M1
M98 P0103；调用子程序P3 BpP y&
M30；程序结束 
子程序调用切割实例
LFRlzz; R$[vm6T? O0101（P1）子程序P1
$B5aje}i G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
\"OG6G_>$ G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
kUrkG80q| X0.0；到矩形右上角处
sS'm!7*(3 Y-40.0；到矩形右下角处
<}9 lZEqY X-80.0；到矩形左下角处
;"-&1qHN Y0.0；到矩形左上角处
5K8^WK X-40.0；到矩形上边中心处
ar+9\ Y-20.0；回到矩形的穿丝点（矩形切割的起点）
z5*'{t) M99；子程序结束返回主程序
Y O}<Ytx 6A+nS= O0102（P2）子程序P2
$}<e|3 _ G93 X100.0 Y80.0；坐标平移三角形底边中间处
' !~)? C< G90 G01 Y60.0；到三角形顶点处
-k"/X8 X40.0 Y0.0；到三角形右下角处
5MJS
~( Y-40.0；到三角形左下角处
z[qDkL X0 Y60.0；到三角形顶点处
lZKi'vg7 Y40.0；回到三角形的穿丝点（三角形切割的起点）
$suzW;{# M99；子程序结束返回主程序
pB0 \\wR ]2qo+yB O0103（P3）子程序P3
TJXT-\Vk G93 X200.0 Y80.0；坐标平移到圆心处
&E5g3lf G90 G01 Y40.0； 到圆以上圆上一点
7a<DKB G02 J-40.0；顺时针切割圆
ZyFjFHe+ G01 Y0.0； 回到圆心处
N6i Q8P - M99；子程序结束返回主程序
