例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 2T2#HP
|u@>[*k'=
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: JU2' ~chh
K|J#/
O0100(MAIN) nF[eb{GR`
G92 X80.0 Y40.0;设定坐标系 5J2p^$s
M98 P0101;调用子程序P1 +7vh_ _
G93 X0.0 Y0.0;坐标平移 cZK?kz_Y
M50;切断丝 S0QU@e
G90 G00 X100.0 Y120.0;快速移动 4 }YT@={g}
M60;穿丝 >_%g8T'
M98 P0102;调用子程序P2 P}u<NPy3Q
G93 X0.0 Y0.0;坐标平移 6Q?6-,?_
M50;切断丝 jnLu| W&
G90 G00 X200.0 Y80.0;快速移动 :Y?08/V
M60;穿丝 7X3l&J2C4l
M98 P0103;调用子程序P3 [x()^{;2
M30;程序结束 
子程序调用切割实例
{]m
e?I `DY4d$!4 O0101(P1)子程序P1
uH;^>`DT G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
}sNZQ89V*v G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
W)P_t"'@L X0.0;到矩形右上角处
|;1:$E" Y-40.0;到矩形右下角处
yaGVY*M0 X-80.0;到矩形左下角处
2{tJ'3 Y0.0;到矩形左上角处
a}]@o" X-40.0;到矩形上边中心处
`2~Ea_Z Y-20.0;回到矩形的穿丝点(矩形切割的起点)
[0
f6uIF M99;子程序结束返回主程序
DG9;6"HBX Q-%=ZW Z O0102(P2)子程序P2
Fi=8B&j G93 X100.0 Y80.0;坐标平移三角形底边中间处
WW/m
/+ G90 G01 Y60.0;到三角形顶点处
?\$/#zak X40.0 Y0.0;到三角形右下角处
2Yf;b9-k Y-40.0;到三角形左下角处
;+Kewi;< X0 Y60.0;到三角形顶点处
aRKG)0= Y40.0;回到三角形的穿丝点(三角形切割的起点)
M@86u^80 M99;子程序结束返回主程序
!8M'ms>s= b#'a4j-u O0103(P3)子程序P3
Gjh7cm> G93 X200.0 Y80.0;坐标平移到圆心处
<NsT[r~C G90 G01 Y40.0; 到圆以上圆上一点
iiFKt( G02 J-40.0;顺时针切割圆
,Yt&PE G01 Y0.0; 回到圆心处
r?>Hg+ M99;子程序结束返回主程序