例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 qz-#LZFTR
:u[
oc.
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: j+z'
Q1P,=T@
O0100(MAIN) 6,CU)-98G
G92 X80.0 Y40.0;设定坐标系
w0q?\qEX
M98 P0101;调用子程序P1 XHwZ+=v
G93 X0.0 Y0.0;坐标平移 ph}wnIW]
M50;切断丝 9q@z[+X
G90 G00 X100.0 Y120.0;快速移动 }I`
ku.@5
M60;穿丝 yVu^
>
M98 P0102;调用子程序P2 hfl%r9o
G93 X0.0 Y0.0;坐标平移 +ZD[[+
M50;切断丝 *DPTkMQN
G90 G00 X200.0 Y80.0;快速移动 1t~S3Q||>]
M60;穿丝
4\ uZKv@,
M98 P0103;调用子程序P3 QZ:]8MHl]
M30;程序结束 
子程序调用切割实例
0ECO/EuCg ovo? lE-a0 O0101(P1)子程序P1
1FXzAc(c! G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
s>9z+;~! G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
2@=cqD7x X0.0;到矩形右上角处
KxgR5#:i" Y-40.0;到矩形右下角处
5JXzfc9rL X-80.0;到矩形左下角处
;T"m[D Y0.0;到矩形左上角处
-.+KCt G$+ X-40.0;到矩形上边中心处
T_YMM'` Y-20.0;回到矩形的穿丝点(矩形切割的起点)
gMoyy M99;子程序结束返回主程序
Q(!}t"u ;|;h9" O0102(P2)子程序P2
FrAqTz G93 X100.0 Y80.0;坐标平移三角形底边中间处
`E4!u=% G90 G01 Y60.0;到三角形顶点处
iuH8g X40.0 Y0.0;到三角形右下角处
HNkZ1+P { Y-40.0;到三角形左下角处
'<{oYXZW3 X0 Y60.0;到三角形顶点处
LB64W ;#h Y40.0;回到三角形的穿丝点(三角形切割的起点)
a|]%/[G@ M99;子程序结束返回主程序
Aoy1<8WP%
%$9)1"T0Y O0103(P3)子程序P3
-x3tx7% G93 X200.0 Y80.0;坐标平移到圆心处
mBD!:V' G90 G01 Y40.0; 到圆以上圆上一点
)N%1%bg^- G02 J-40.0;顺时针切割圆
tnKpn-LPA G01 Y0.0; 回到圆心处
l/y
Kc8^< M99;子程序结束返回主程序