例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 #rg6,.I)<
R^e'}+Z
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: e~(5%CO>#j
OcO3v'&
O0100(MAIN) (QiAisE
G92 X80.0 Y40.0;设定坐标系 A<fG}q1#
M98 P0101;调用子程序P1 6E}qL8'5x
G93 X0.0 Y0.0;坐标平移 o,wUc"CE
M50;切断丝 T6kdS]4-
G90 G00 X100.0 Y120.0;快速移动 lr$zHI7_`
M60;穿丝 /<BI46B\
M98 P0102;调用子程序P2 OB}Ib]
G93 X0.0 Y0.0;坐标平移 /wlEe>i
M50;切断丝 4`=mu}Y2
G90 G00 X200.0 Y80.0;快速移动 NZz 8j^
M60;穿丝 -DAlRz#d,
M98 P0103;调用子程序P3 <\S:'g"(
M30;程序结束 
子程序调用切割实例
HLi%%"' q75s#[<ap O0101(P1)子程序P1
{f p[BF G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
hFBe,'3M G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
e8b:)"R X0.0;到矩形右上角处
,"0:3+(8; Y-40.0;到矩形右下角处
Yz93'HDB X-80.0;到矩形左下角处
@|T'0_' Y0.0;到矩形左上角处
yaV|AB$v X-40.0;到矩形上边中心处
v(%*b,^
Y-20.0;回到矩形的穿丝点(矩形切割的起点)
l9H!au= M99;子程序结束返回主程序
+qdEq_m Uoix O0102(P2)子程序P2
Ef{Vp;] G93 X100.0 Y80.0;坐标平移三角形底边中间处
'/%H3A#L G90 G01 Y60.0;到三角形顶点处
Yu`~U,m X40.0 Y0.0;到三角形右下角处
FXU8[j0P_G Y-40.0;到三角形左下角处
pI<f) r X0 Y60.0;到三角形顶点处
m~ee/&T Y40.0;回到三角形的穿丝点(三角形切割的起点)
7 Fsay+a M99;子程序结束返回主程序
dUdT7ixo |! "eWTJ O0103(P3)子程序P3
11;zNjD| G93 X200.0 Y80.0;坐标平移到圆心处
\z}
Ic%Tp G90 G01 Y40.0; 到圆以上圆上一点
{BU;$ G02 J-40.0;顺时针切割圆
+x}<IS8 G01 Y0.0; 回到圆心处
g<
.qUBPKX M99;子程序结束返回主程序