例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 P/G>/MD/l
c+8V|'4
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: }w#F6
%yfE7UPS]
O0100(MAIN) J smB^
G92 X80.0 Y40.0;设定坐标系 T<P0T<
M98 P0101;调用子程序P1 k=`$6(>Fz
G93 X0.0 Y0.0;坐标平移 q(gjT^aN
M50;切断丝 z|I0-1tAK
G90 G00 X100.0 Y120.0;快速移动 Fwb5u!_,
M60;穿丝 :> SLQ[1
M98 P0102;调用子程序P2 `^x9(i/NE
G93 X0.0 Y0.0;坐标平移 K3L"^a
M50;切断丝 t{zBC?cR
G90 G00 X200.0 Y80.0;快速移动 h/HHKn
M60;穿丝 Kk=LXmL2
M98 P0103;调用子程序P3 QXs8:;T
M30;程序结束 
子程序调用切割实例
KzNm^^#/$A _lX8K:C( O0101(P1)子程序P1
6T_K9 G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
GWdSSr> G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
&))\2pl X0.0;到矩形右上角处
tb,9a!? Y-40.0;到矩形右下角处
IXWQ) X-80.0;到矩形左下角处
6Hk="$6K Y0.0;到矩形左上角处
_w>uI57U X-40.0;到矩形上边中心处
p?JQ[K7i Y-20.0;回到矩形的穿丝点(矩形切割的起点)
s1bU M99;子程序结束返回主程序
VO_dA4C}z xzr<k Sp O0102(P2)子程序P2
LTXz$Z] G93 X100.0 Y80.0;坐标平移三角形底边中间处
w#9_eq|3 G90 G01 Y60.0;到三角形顶点处
|cgui X40.0 Y0.0;到三角形右下角处
Ys3uPs Y-40.0;到三角形左下角处
ezUQ>
e X0 Y60.0;到三角形顶点处
DW>ES/B8$( Y40.0;回到三角形的穿丝点(三角形切割的起点)
f@d9Hqr+l; M99;子程序结束返回主程序
,EI:gLH id?E)Jy O0103(P3)子程序P3
KP{3iUqvO G93 X200.0 Y80.0;坐标平移到圆心处
E7`qmn G90 G01 Y40.0; 到圆以上圆上一点
Da_()e[9p G02 J-40.0;顺时针切割圆
u okc:D G01 Y0.0; 回到圆心处
"%@v++4y M99;子程序结束返回主程序