例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 5Ow[~p"l<
d/BM&r
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: :c8&N-`
|N%fMPKa
O0100(MAIN) r [4tPk
G92 X80.0 Y40.0;设定坐标系 U*22h` S
M98 P0101;调用子程序P1 77\]B
G93 X0.0 Y0.0;坐标平移 BI3@|,._N
M50;切断丝 bYEy<7)x
G90 G00 X100.0 Y120.0;快速移动 GT0Of~?f
M60;穿丝 3BtaH#ZY
M98 P0102;调用子程序P2 {ys=Ndo8
G93 X0.0 Y0.0;坐标平移 nm6h%}xND<
M50;切断丝 ,.kha8v
G90 G00 X200.0 Y80.0;快速移动 $npT[~U5
M60;穿丝 wE? 'Cl
M98 P0103;调用子程序P3 GBRa.;Kk
M30;程序结束 
子程序调用切割实例
_F$aUtb%O ^pQCNKLBY O0101(P1)子程序P1
f33 l$pOp G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
}+C2I G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
9%B\/&f X0.0;到矩形右上角处
IIn"=g=9 Y-40.0;到矩形右下角处
AaWs}M X-80.0;到矩形左下角处
Qa-K$dm% Y0.0;到矩形左上角处
`< xn8h9p X-40.0;到矩形上边中心处
_$
+^q- Y-20.0;回到矩形的穿丝点(矩形切割的起点)
M<kj_.
M99;子程序结束返回主程序
9f&C #,":vr O0102(P2)子程序P2
z([ v%zf G93 X100.0 Y80.0;坐标平移三角形底边中间处
OmIg<v0\; G90 G01 Y60.0;到三角形顶点处
9}PhN<Gd X40.0 Y0.0;到三角形右下角处
%M7` Hwu Y-40.0;到三角形左下角处
23RN}LUi X0 Y60.0;到三角形顶点处
5N/%v&1 Y40.0;回到三角形的穿丝点(三角形切割的起点)
:lf+W M99;子程序结束返回主程序
#~C]ZrK $ZugBh[b O0103(P3)子程序P3
1*9U1\z G93 X200.0 Y80.0;坐标平移到圆心处
8,?h~prc G90 G01 Y40.0; 到圆以上圆上一点
??M"6k G02 J-40.0;顺时针切割圆
>[*8I\*@n G01 Y0.0; 回到圆心处
Z0Vl+ M99;子程序结束返回主程序