例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 *Cx3bg*Gan
3Et t9fBd
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: Sh o] ~)XX
>iWw
i'T=
O0100(MAIN) W}> wRy
G92 X80.0 Y40.0;设定坐标系 t|k-Bh:x
M98 P0101;调用子程序P1 Ap%tm)@1
G93 X0.0 Y0.0;坐标平移 aK'%E3!~=x
M50;切断丝 qMmhmH)Gp
G90 G00 X100.0 Y120.0;快速移动 .!h`(>+@
M60;穿丝 2c8e:Xgv
M98 P0102;调用子程序P2 ?\T):o;/
G93 X0.0 Y0.0;坐标平移 +"SYG
M50;切断丝 vsCy?
G90 G00 X200.0 Y80.0;快速移动 VaFv%%w
M60;穿丝 EN@Pr `R
M98 P0103;调用子程序P3 lEiOE]
M30;程序结束 
子程序调用切割实例
pU5t, aECQ(]q O0101(P1)子程序P1
*bTR0U G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
mM;p 7
sJ G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
;,jms~ik X0.0;到矩形右上角处
4qLH3I[Y Y-40.0;到矩形右下角处
){ ,v&[ X-80.0;到矩形左下角处
p#fV|2'
Y0.0;到矩形左上角处
sRf?JyB X-40.0;到矩形上边中心处
pe7R1{2Q_s Y-20.0;回到矩形的穿丝点(矩形切割的起点)
G'
a{;3 M99;子程序结束返回主程序
AU/L_hg $tFmp) O0102(P2)子程序P2
3/?{=
{ G93 X100.0 Y80.0;坐标平移三角形底边中间处
jMB&(r G90 G01 Y60.0;到三角形顶点处
zD}2Zh] X40.0 Y0.0;到三角形右下角处
Umt?COc Y-40.0;到三角形左下角处
IAa}F!6Q1 X0 Y60.0;到三角形顶点处
'"<h;| Y40.0;回到三角形的穿丝点(三角形切割的起点)
j?cE0
hz M99;子程序结束返回主程序
v6_fF5N/ >z1q\cz O0103(P3)子程序P3
_^"0"<, G93 X200.0 Y80.0;坐标平移到圆心处
S2EeC&-AR G90 G01 Y40.0; 到圆以上圆上一点
x9B{|+tIoc G02 J-40.0;顺时针切割圆
Ct,|g =( G01 Y0.0; 回到圆心处
r1QLSD]i6 M99;子程序结束返回主程序