例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 J*K<FFp3<
@c]Xh:I
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: (3W&AM
+NR n0
z(
O0100(MAIN) ?bI?GvSh
G92 X80.0 Y40.0;设定坐标系 D:m#d.m
M98 P0101;调用子程序P1 FUqt)YHi
G93 X0.0 Y0.0;坐标平移 ~-<:+9m
M50;切断丝 d1bhJK
G90 G00 X100.0 Y120.0;快速移动 P7r4ePtLk{
M60;穿丝 e8q4O|I_
M98 P0102;调用子程序P2 'hIU_
G93 X0.0 Y0.0;坐标平移 <+q$XL0
M50;切断丝 @n@g)`
G90 G00 X200.0 Y80.0;快速移动 s5AgsMq
M60;穿丝 |X 3">U +-
M98 P0103;调用子程序P3 5~s{N
M30;程序结束 
子程序调用切割实例
^*>n4U aDveU)]=1 O0101(P1)子程序P1
De]^&qw( G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
@|=UrKA N G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
OoM_q/oI X0.0;到矩形右上角处
nq@5j0fK Y-40.0;到矩形右下角处
5Eal1Qu X-80.0;到矩形左下角处
=UUd8,C/ Y0.0;到矩形左上角处
aTClw<6} X-40.0;到矩形上边中心处
GX5W^//} Y-20.0;回到矩形的穿丝点(矩形切割的起点)
#_fY4vEO M99;子程序结束返回主程序
EneAX&SG S&01SX6 O0102(P2)子程序P2
jsZY{s= G93 X100.0 Y80.0;坐标平移三角形底边中间处
n$W"=Z;` G90 G01 Y60.0;到三角形顶点处
xlw 2g<s X40.0 Y0.0;到三角形右下角处
"5|\X<f Y-40.0;到三角形左下角处
WIG=D{\Yx X0 Y60.0;到三角形顶点处
,R~eY?{a Y40.0;回到三角形的穿丝点(三角形切割的起点)
g ;LVECk M99;子程序结束返回主程序
k*Pz&8| 5~[N/Gl O0103(P3)子程序P3
B{PLIisc G93 X200.0 Y80.0;坐标平移到圆心处
(#z;(EN0t G90 G01 Y40.0; 到圆以上圆上一点
waQtr,m) G02 J-40.0;顺时针切割圆
PCZ]R G01 Y0.0; 回到圆心处
`:4MMr9 1 M99;子程序结束返回主程序