例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 Pl
,M>IQ
@}}1xP4Sr
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: PkO(Y!
ld0WZj
O0100(MAIN) c9K\K~bk
G92 X80.0 Y40.0;设定坐标系 UcIR0BYa
M98 P0101;调用子程序P1 S!bvU2d
G93 X0.0 Y0.0;坐标平移 !1]xKNp]
M50;切断丝 a#@opUn-
G90 G00 X100.0 Y120.0;快速移动 [#V!XdQ,
M60;穿丝 }zLE*b,
M98 P0102;调用子程序P2 3KZ h?~B
G93 X0.0 Y0.0;坐标平移 _z<q9:
M50;切断丝 HKf3eC
G90 G00 X200.0 Y80.0;快速移动 AS398L
M60;穿丝 wjs7K|PK
M98 P0103;调用子程序P3 ~'Hwszpb
M30;程序结束 
子程序调用切割实例
m{" zFD/ r4'Pf|`u O0101(P1)子程序P1
7X"cu6%\ G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
0_)\ e G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
Iu]P^8 X0.0;到矩形右上角处
_TiF}b!hi Y-40.0;到矩形右下角处
awtzt?VtLh X-80.0;到矩形左下角处
n$K_KU v Y0.0;到矩形左上角处
nfR5W~%*: X-40.0;到矩形上边中心处
ul1Vsj Y-20.0;回到矩形的穿丝点(矩形切割的起点)
p^3d1H3 M99;子程序结束返回主程序
('Pd
GV4V TlJF{ <E O0102(P2)子程序P2
a$-ax[:\sm G93 X100.0 Y80.0;坐标平移三角形底边中间处
NiF*h~q G90 G01 Y60.0;到三角形顶点处
{w(N9Va,( X40.0 Y0.0;到三角形右下角处
B;$5*3D+ Y-40.0;到三角形左下角处
7KLq-u-8 X0 Y60.0;到三角形顶点处
SX.v5plhc Y40.0;回到三角形的穿丝点(三角形切割的起点)
f&J*(F*u M99;子程序结束返回主程序
<XU]%}o nfEk ,(: O0103(P3)子程序P3
ME"/%59r G93 X200.0 Y80.0;坐标平移到圆心处
#k6T_ki G90 G01 Y40.0; 到圆以上圆上一点
0o`o'Z V=c G02 J-40.0;顺时针切割圆
B:SRHd{*Wu G01 Y0.0; 回到圆心处
4D5)<3N=d' M99;子程序结束返回主程序