例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 >;Vy{bL8
t[HA86X
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: +=g9T`YbE
nYts[f9e
O0100(MAIN) Y!fgc<]'&
G92 X80.0 Y40.0;设定坐标系 o 76QQ+hP
M98 P0101;调用子程序P1 } .'\IR
G93 X0.0 Y0.0;坐标平移 z-`-0@/A$
M50;切断丝 K&UTs$_cI
G90 G00 X100.0 Y120.0;快速移动 Uq:CM6q\
M60;穿丝 @Xl/<S&
M98 P0102;调用子程序P2 8 CCA}lOG
G93 X0.0 Y0.0;坐标平移 BM_Rlcx~
M50;切断丝 o 12wp
G90 G00 X200.0 Y80.0;快速移动 RinaGeim
M60;穿丝 ,,CheRO
M98 P0103;调用子程序P3 2t1u{
M30;程序结束 
子程序调用切割实例
v>E3|w% _l$X![@6= O0101(P1)子程序P1
7) G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
7MhN>a;A\ G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
l_0/g^( X0.0;到矩形右上角处
{p)=#Jd`.P Y-40.0;到矩形右下角处
8bW,.to(?x X-80.0;到矩形左下角处
T;Zv^:]0 Y0.0;到矩形左上角处
+nm?+F X-40.0;到矩形上边中心处
LL7un_EC Y-20.0;回到矩形的穿丝点(矩形切割的起点)
1^^9'/ M99;子程序结束返回主程序
Nc[[o>/Cb MWn+e O0102(P2)子程序P2
K %Qj<{) G93 X100.0 Y80.0;坐标平移三角形底边中间处
I>(-&YbC G90 G01 Y60.0;到三角形顶点处
O YayTKxN X40.0 Y0.0;到三角形右下角处
JF-ew"o<E Y-40.0;到三角形左下角处
mYw9lM X0 Y60.0;到三角形顶点处
PYJ8\XZ1_N Y40.0;回到三角形的穿丝点(三角形切割的起点)
ZG bY M99;子程序结束返回主程序
EViQB.3w\ cH{[\F"Eb O0103(P3)子程序P3
X+;{&Efrl G93 X200.0 Y80.0;坐标平移到圆心处
'c&S%Ra[3G G90 G01 Y40.0; 到圆以上圆上一点
VMgO1-F G02 J-40.0;顺时针切割圆
~Lf>/w G01 Y0.0; 回到圆心处
NI33lp$V M99;子程序结束返回主程序