例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 r7m~.M+W"
.-KI,IU
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: 2%W;#oi?
BzzC|
O0100(MAIN) #Iw(+%D
G92 X80.0 Y40.0;设定坐标系 4<y
M98 P0101;调用子程序P1 mlnF,+s
G93 X0.0 Y0.0;坐标平移 $TI^8 3
M50;切断丝 O$,Fga
G90 G00 X100.0 Y120.0;快速移动 p)y5[HX
M60;穿丝 u,sR2&Fe
M98 P0102;调用子程序P2 <RGH+4LF
G93 X0.0 Y0.0;坐标平移 7n8nJTU{4j
M50;切断丝 m ptFd
G90 G00 X200.0 Y80.0;快速移动 UVo`jb|>
o
M60;穿丝 x< A-Ws{^V
M98 P0103;调用子程序P3 ,i2-
M30;程序结束 
子程序调用切割实例
s ^h@b!'7 cq1 5@a mX O0101(P1)子程序P1
Eb8pM>'qM G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
QL?_FwZL G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
B~p%pTS+ X0.0;到矩形右上角处
(8duV Y-40.0;到矩形右下角处
IPQRdBQ X-80.0;到矩形左下角处
"4N&T# Y0.0;到矩形左上角处
1EyN
|m| X-40.0;到矩形上边中心处
y>I2}P Y-20.0;回到矩形的穿丝点(矩形切割的起点)
oz)[- M99;子程序结束返回主程序
-$Oh.B`i 7EJ2 On O0102(P2)子程序P2
50,'z?-_ G93 X100.0 Y80.0;坐标平移三角形底边中间处
DB'v7
Ij0 G90 G01 Y60.0;到三角形顶点处
l A ^1} X40.0 Y0.0;到三角形右下角处
H QqFrR
Y-40.0;到三角形左下角处
1[FN: hm X0 Y60.0;到三角形顶点处
USg"wJY Y40.0;回到三角形的穿丝点(三角形切割的起点)
M(%H M99;子程序结束返回主程序
{v?Q9 @@65t'3S O0103(P3)子程序P3
@\K[WqF$$q G93 X200.0 Y80.0;坐标平移到圆心处
WtT;y|W G90 G01 Y40.0; 到圆以上圆上一点
5ZCu6A G02 J-40.0;顺时针切割圆
Q:}]-lJg G01 Y0.0; 回到圆心处
w,UE0i9I M99;子程序结束返回主程序