例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 -$OD }5ku#
@7 )Z
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: BL0|\&*1
.E#<fz
O0100(MAIN) }}s8D>;G~
G92 X80.0 Y40.0;设定坐标系 [\88@B=jXP
M98 P0101;调用子程序P1 X:R%1+&*
G93 X0.0 Y0.0;坐标平移 m:b^,2"g
M50;切断丝 9ptZVv=O
G90 G00 X100.0 Y120.0;快速移动 yS+(<
M60;穿丝 6#fOCr;f7
M98 P0102;调用子程序P2 W\'Nv/L
G93 X0.0 Y0.0;坐标平移 db<q-u
M50;切断丝 g%X &f_@
G90 G00 X200.0 Y80.0;快速移动 \Oz,Qzr|
M60;穿丝 xJN |w\&
M98 P0103;调用子程序P3 >kt~vJI
M30;程序结束 
子程序调用切割实例
Y:rJK|m kSB3KR;~n O0101(P1)子程序P1
U)
+?$
Tbm G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
&3WkH W G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
s c5\( b X0.0;到矩形右上角处
xQX<w\s Y-40.0;到矩形右下角处
*&(2`#C; X-80.0;到矩形左下角处
Q^[e/U, Y0.0;到矩形左上角处
L7s>su|c( X-40.0;到矩形上边中心处
KlY,NSlQ Y-20.0;回到矩形的穿丝点(矩形切割的起点)
\>4v?\8o M99;子程序结束返回主程序
^GE^Q\&D& FwXKRZa O0102(P2)子程序P2
(QhGxuC G93 X100.0 Y80.0;坐标平移三角形底边中间处
ESn6D@" G90 G01 Y60.0;到三角形顶点处
C2CYIok$& X40.0 Y0.0;到三角形右下角处
t'dHCp} Y-40.0;到三角形左下角处
mXQl; X0 Y60.0;到三角形顶点处
NY.}uZ Y40.0;回到三角形的穿丝点(三角形切割的起点)
.4H_Zt[2 M99;子程序结束返回主程序
g[m3IJzq <9ePi9D( O0103(P3)子程序P3
oSN8Xn*qr G93 X200.0 Y80.0;坐标平移到圆心处
J 5Wz4`' G90 G01 Y40.0; 到圆以上圆上一点
*^X#Eb G02 J-40.0;顺时针切割圆
C usVW G01 Y0.0; 回到圆心处
_{lx*dq M99;子程序结束返回主程序