例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 Y~Uf2(7b5
Ox)<"8M
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: \(??Ytc<B
X!hzpg(`hR
O0100(MAIN) R(}<W$(TV
G92 X80.0 Y40.0;设定坐标系 5B~]%_gZr
M98 P0101;调用子程序P1 HL{aqT2
G93 X0.0 Y0.0;坐标平移 DlzL(p@r
M50;切断丝 }X9&!A8z
G90 G00 X100.0 Y120.0;快速移动 H7uh"/A
M60;穿丝 ",~ZO<P
M98 P0102;调用子程序P2 'z91aNG]
G93 X0.0 Y0.0;坐标平移 O=K0KOj
M50;切断丝 13@emb
G90 G00 X200.0 Y80.0;快速移动 =o~mZ/ 7=M
M60;穿丝 >JNdtP8s/1
M98 P0103;调用子程序P3 +184|nJ<2
M30;程序结束 
子程序调用切割实例
KEy8EB 2a-]TVL3 O0101(P1)子程序P1
)-I/ej^ G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
}>iNT.Lvd G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
=Fe4-B?I X0.0;到矩形右上角处
iklZ[G%A0 Y-40.0;到矩形右下角处
7Ws88Qs) X-80.0;到矩形左下角处
e>_a
( Y0.0;到矩形左上角处
kh}h(z^ X-40.0;到矩形上边中心处
-I4@6vE, Y-20.0;回到矩形的穿丝点(矩形切割的起点)
;~1xhpTk M99;子程序结束返回主程序
A p zC |Fx *,91 O0102(P2)子程序P2
papMC"<g$ G93 X100.0 Y80.0;坐标平移三角形底边中间处
g\B ?
|% G90 G01 Y60.0;到三角形顶点处
n"?*"Ya X40.0 Y0.0;到三角形右下角处
iYiTkq Y-40.0;到三角形左下角处
SDbkPx X0 Y60.0;到三角形顶点处
C6g p}% Y40.0;回到三角形的穿丝点(三角形切割的起点)
+b_[JP2 M99;子程序结束返回主程序
mCn:{G8+ |)d%3s\ O0103(P3)子程序P3
M]%dFQ G93 X200.0 Y80.0;坐标平移到圆心处
pSAtn G90 G01 Y40.0; 到圆以上圆上一点
?}KD<R G02 J-40.0;顺时针切割圆
Mp
js G01 Y0.0; 回到圆心处
bp" @p: M99;子程序结束返回主程序