例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 )sV#
b
(la<X<w
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: e982IP
=oQzL
O0100(MAIN) J $e.$ah;
G92 X80.0 Y40.0;设定坐标系 On'3K+(_
M98 P0101;调用子程序P1 J.<eX=<
G93 X0.0 Y0.0;坐标平移 i[\[xfk
M50;切断丝 xh-[]Jz(
G90 G00 X100.0 Y120.0;快速移动 ='VIbE@qC
M60;穿丝 l m
M98 P0102;调用子程序P2 _23sIUN c3
G93 X0.0 Y0.0;坐标平移 E*w 2yWR
M50;切断丝 zl:
u@!'
G90 G00 X200.0 Y80.0;快速移动 {Y0I A97,
M60;穿丝 gE
,j\M*
M98 P0103;调用子程序P3 k oHY
AF
M30;程序结束 
子程序调用切割实例
7_K(xmK Ki=7nKs O0101(P1)子程序P1
"^XN"SUw G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
3LXpe8$lJ G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
N"T8
Pt X0.0;到矩形右上角处
.\d0lJSr Y-40.0;到矩形右下角处
'^/E2+ X-80.0;到矩形左下角处
p9s~WD/K Y0.0;到矩形左上角处
P);Xke X-40.0;到矩形上边中心处
%ly;2HIk Y-20.0;回到矩形的穿丝点(矩形切割的起点)
L}21[ N~ky M99;子程序结束返回主程序
M`>W'< |wLQ)y* O0102(P2)子程序P2
LqUvEq G93 X100.0 Y80.0;坐标平移三角形底边中间处
`+f\Q2]Z G90 G01 Y60.0;到三角形顶点处
?s?uoZ /2 X40.0 Y0.0;到三角形右下角处
eAuJ}U[ Y-40.0;到三角形左下角处
DY07?x7 X0 Y60.0;到三角形顶点处
)_Oc=/c|f Y40.0;回到三角形的穿丝点(三角形切割的起点)
/y!Vs`PZ! M99;子程序结束返回主程序
A0]o/IBz RyhR# O0103(P3)子程序P3
DA
wzXsx G93 X200.0 Y80.0;坐标平移到圆心处
sN g"JQ G90 G01 Y40.0; 到圆以上圆上一点
+[qkG.
O G02 J-40.0;顺时针切割圆
'pe0Q- G01 Y0.0; 回到圆心处
ua[\npz5 M99;子程序结束返回主程序