例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 s\_
,aI
Q']:k}y
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: WC0@g5;1[
J=5G<
O0100(MAIN) UEt#;e
G92 X80.0 Y40.0;设定坐标系 {V,rWg
M98 P0101;调用子程序P1 Jt@7y"<
G93 X0.0 Y0.0;坐标平移 zAS&L%^ tV
M50;切断丝 [p|-G*=00
G90 G00 X100.0 Y120.0;快速移动 DtR-NzjB
M60;穿丝 's+ Fd~'
M98 P0102;调用子程序P2 ++BVn[ 1
G93 X0.0 Y0.0;坐标平移 W%@6D|^
M50;切断丝 ~%m-}Sxc
G90 G00 X200.0 Y80.0;快速移动 |{<g-)
M60;穿丝 *[k7KG2_U
M98 P0103;调用子程序P3 qbpvTTF
M30;程序结束 
子程序调用切割实例
"3W!p+W I"y=A7Nq O0101(P1)子程序P1
BB>3Kj:| G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
VWaI!bK G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
p~En~?< X0.0;到矩形右上角处
Fn yA;,* Y-40.0;到矩形右下角处
D\bW' k]! X-80.0;到矩形左下角处
6(VCQ{ Y0.0;到矩形左上角处
@?f3(Gh, X-40.0;到矩形上边中心处
N_U Zu Y-20.0;回到矩形的穿丝点(矩形切割的起点)
G/bWn@ M99;子程序结束返回主程序
Lr V)}1&5 [_#9PH33 O0102(P2)子程序P2
M8Q-x-7 G93 X100.0 Y80.0;坐标平移三角形底边中间处
V.>'\b/# G90 G01 Y60.0;到三角形顶点处
IX,/ZOZ| X40.0 Y0.0;到三角形右下角处
o
*S"`_ Y-40.0;到三角形左下角处
=AUR]&_B X0 Y60.0;到三角形顶点处
<{JHFU`^ Y40.0;回到三角形的穿丝点(三角形切割的起点)
)W(?wv!, M99;子程序结束返回主程序
25o + ?Y< m&EwX ^1- O0103(P3)子程序P3
H'P1EZtq G93 X200.0 Y80.0;坐标平移到圆心处
HFB2ep7N G90 G01 Y40.0; 到圆以上圆上一点
ej]^VS7w[r G02 J-40.0;顺时针切割圆
(G*--+Gn G01 Y0.0; 回到圆心处
1BmevEa) M99;子程序结束返回主程序