例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 cMK6
EidIi"sr
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: V TEyqo2
%
qAhETZ%
O0100(MAIN) *?KQ\ Y
G92 X80.0 Y40.0;设定坐标系 sBSBDjk[
M98 P0101;调用子程序P1 jv_sRV
G93 X0.0 Y0.0;坐标平移 k5}i^^.
M50;切断丝 w_|WberU
G90 G00 X100.0 Y120.0;快速移动 (<%i8xu2
M60;穿丝 @d4zSG/s5w
M98 P0102;调用子程序P2
EQ=Enw1[
G93 X0.0 Y0.0;坐标平移 8q tNK>D
M50;切断丝 }^LcKV
G90 G00 X200.0 Y80.0;快速移动 88G[XkL$2
M60;穿丝 C<n.C*o
M98 P0103;调用子程序P3 eJy@N
M30;程序结束 
子程序调用切割实例
9`09.`U9[ j j$'DZk O0101(P1)子程序P1
?TzN?\ G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
CQtd%'rt6 G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
qw_qGgbl X0.0;到矩形右上角处
%8 4<@f&n] Y-40.0;到矩形右下角处
46e;UUf!d X-80.0;到矩形左下角处
S2fw"1h*x Y0.0;到矩形左上角处
gXH89n X-40.0;到矩形上边中心处
^k-H$] Y-20.0;回到矩形的穿丝点(矩形切割的起点)
3q1O:b^eo M99;子程序结束返回主程序
0tsll1 _fa]2I O0102(P2)子程序P2
>StvP=our G93 X100.0 Y80.0;坐标平移三角形底边中间处
'0o`<xW G90 G01 Y60.0;到三角形顶点处
F48`1+ X40.0 Y0.0;到三角形右下角处
Ap97 Zcw Y-40.0;到三角形左下角处
:fj}J)9'xW X0 Y60.0;到三角形顶点处
?T4%"0 Y40.0;回到三角形的穿丝点(三角形切割的起点)
(bBetX M99;子程序结束返回主程序
hw1ZTD:Y }xdI{E1 q) O0103(P3)子程序P3
H%%#^rb^ G93 X200.0 Y80.0;坐标平移到圆心处
G&Cl:CtC G90 G01 Y40.0; 到圆以上圆上一点
!P:hf/l[B G02 J-40.0;顺时针切割圆
(bT\HW%m G01 Y0.0; 回到圆心处
B8TI 5mZ4 M99;子程序结束返回主程序