例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 8Ml&lfn_8
`mPmEV<
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: zb9^ii$g
kTQ:k
}%B
O0100(MAIN) b ABx'E
G92 X80.0 Y40.0;设定坐标系 H"(:6
`
M98 P0101;调用子程序P1 3nuf3)
G93 X0.0 Y0.0;坐标平移 M ,V+bt
M50;切断丝 .d`+#1Ot(
G90 G00 X100.0 Y120.0;快速移动 ${'gyD
M60;穿丝 pTq,"}J!+
M98 P0102;调用子程序P2 \V@SCA'
G93 X0.0 Y0.0;坐标平移 rUfW0
M50;切断丝 A2'
G90 G00 X200.0 Y80.0;快速移动 \C.%S +u
M60;穿丝 ,CW]d#P|
M98 P0103;调用子程序P3 2=ZR}8}9Q:
M30;程序结束 
子程序调用切割实例
Rde_I`Ru qG"|,bA
O0101(P1)子程序P1
iU^ 4a G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
-Nmf}`_ G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
7=XQgbY/ X0.0;到矩形右上角处
Qi Wv Y-40.0;到矩形右下角处
^&<~6y}U^ X-80.0;到矩形左下角处
lEi,duS) Y0.0;到矩形左上角处
d$ Mk X-40.0;到矩形上边中心处
.jMm-vox} Y-20.0;回到矩形的穿丝点(矩形切割的起点)
_dqjRhu M99;子程序结束返回主程序
Bp\io$(% zF/}s_><* O0102(P2)子程序P2
Ff>Y<7CQ
v G93 X100.0 Y80.0;坐标平移三角形底边中间处
Gb61X6 G90 G01 Y60.0;到三角形顶点处
jIE>t5 fy X40.0 Y0.0;到三角形右下角处
K-wjQ|*1 Y-40.0;到三角形左下角处
V5rnI\:7 X0 Y60.0;到三角形顶点处
yb/<
7 Y40.0;回到三角形的穿丝点(三角形切割的起点)
kN9S;o@) M99;子程序结束返回主程序
DHpU?;|3 uuj"Er31 O0103(P3)子程序P3
Ary$,3X2 G93 X200.0 Y80.0;坐标平移到圆心处
:w_F<2d0
0 G90 G01 Y40.0; 到圆以上圆上一点
->wY|7 G02 J-40.0;顺时针切割圆
..FUg"sSO G01 Y0.0; 回到圆心处
iM2
EEC M99;子程序结束返回主程序