例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 M,{<TpCx
m){&:Hs
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: ,CW%JIM
* D3
O0100(MAIN) =+Tsknq
G92 X80.0 Y40.0;设定坐标系 :eLLDp<
M98 P0101;调用子程序P1 %0(>!SY
G93 X0.0 Y0.0;坐标平移 !L$oAqW
M50;切断丝 Bcm=G""
G90 G00 X100.0 Y120.0;快速移动 hGKdGu`0
M60;穿丝 9oD#t~+F4
M98 P0102;调用子程序P2 ;S=e%:zb
G93 X0.0 Y0.0;坐标平移 Y;PDZbK3
M50;切断丝 |Kn^w4mN
G90 G00 X200.0 Y80.0;快速移动 Sh47c4{
M60;穿丝 % NwoU%q
M98 P0103;调用子程序P3 :\T_'Shq
M30;程序结束 
子程序调用切割实例
3DHvaq q7 [M2Dy{dh O0101(P1)子程序P1
+{bh G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
a!{hC)d* G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
N>T=L0` X0.0;到矩形右上角处
y7
<(,uT Y-40.0;到矩形右下角处
w5=EtKTi X-80.0;到矩形左下角处
KKMWD\ Y0.0;到矩形左上角处
^f"&}%" M X-40.0;到矩形上边中心处
vKV{
$| Y-20.0;回到矩形的穿丝点(矩形切割的起点)
3g+\?L-c M99;子程序结束返回主程序
'jwTGT5x xKisL=l6Y O0102(P2)子程序P2
\ !6t G93 X100.0 Y80.0;坐标平移三角形底边中间处
zkvH=wL G90 G01 Y60.0;到三角形顶点处
JG1LS$p^ X40.0 Y0.0;到三角形右下角处
l9,w>]s Y-40.0;到三角形左下角处
LDSbd,GF X0 Y60.0;到三角形顶点处
s
UvKA0 Y40.0;回到三角形的穿丝点(三角形切割的起点)
<C2c"=b M99;子程序结束返回主程序
4O9tx_<JG !FO:^P O0103(P3)子程序P3
|O'Hh7 G93 X200.0 Y80.0;坐标平移到圆心处
l$qmn$Uc G90 G01 Y40.0; 到圆以上圆上一点
fG^7@Jw:G G02 J-40.0;顺时针切割圆
<kk'v'GW@ G01 Y0.0; 回到圆心处
.|tQ=l@I M99;子程序结束返回主程序