例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 6;[iX`LL
)k0bP1oGS
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: $o{f)'.>n
} [D[ZLv
O0100(MAIN) W53i5u(
G92 X80.0 Y40.0;设定坐标系 |hOqz2|
M98 P0101;调用子程序P1 |F9/7 z\5+
G93 X0.0 Y0.0;坐标平移 m'z <d
M50;切断丝 mbJ#-^}V
G90 G00 X100.0 Y120.0;快速移动 z}u
M60;穿丝 u+XZdV
M98 P0102;调用子程序P2 ~`8`kk8
G93 X0.0 Y0.0;坐标平移 (p^q3\
M50;切断丝 J=zh+oLCV
G90 G00 X200.0 Y80.0;快速移动 _U#ue
M60;穿丝 @qg=lt|(F
M98 P0103;调用子程序P3 GS<,adD
M30;程序结束 
子程序调用切割实例
Il*wVNrZI
yZdM4` O0101(P1)子程序P1
1=W>zC G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
i#(T?=VPcy G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
CO5?UgA X0.0;到矩形右上角处
jDy Y-40.0;到矩形右下角处
.NwHr6/s* X-80.0;到矩形左下角处
*8X: fq Y0.0;到矩形左上角处
FkKx~I: X-40.0;到矩形上边中心处
nyTfTn Y-20.0;回到矩形的穿丝点(矩形切割的起点)
0o(/%31] M99;子程序结束返回主程序
LD]XN'?"W [A[vR7&S O0102(P2)子程序P2
DFqXZfjm G93 X100.0 Y80.0;坐标平移三角形底边中间处
L!-T`R8'c G90 G01 Y60.0;到三角形顶点处
"m/0>UU0 X40.0 Y0.0;到三角形右下角处
d&.)Dw Y-40.0;到三角形左下角处
%hcY
[F< X0 Y60.0;到三角形顶点处
M)Ogb'@# Y40.0;回到三角形的穿丝点(三角形切割的起点)
$p}7CP M99;子程序结束返回主程序
S(9fGh 3mr9}P9; O0103(P3)子程序P3
XZIj' a0d G93 X200.0 Y80.0;坐标平移到圆心处
C!~&c7 G90 G01 Y40.0; 到圆以上圆上一点
O8 k$Uc G02 J-40.0;顺时针切割圆
OG!^:OY G01 Y0.0; 回到圆心处
Yl>@(tu)| M99;子程序结束返回主程序