例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 lK;|ciq"c7
\=Rw/[lR
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: ad+@2-Y
P&@ 2DI3m
O0100(MAIN) 1vk&;
G92 X80.0 Y40.0;设定坐标系 c}v>Mx
M98 P0101;调用子程序P1 A.vWGBR
G93 X0.0 Y0.0;坐标平移 HJWk%t<
M50;切断丝 M6l S2
G90 G00 X100.0 Y120.0;快速移动 qIIc>By(\"
M60;穿丝 C ioM!D
M98 P0102;调用子程序P2 ~3bH2,{L[
G93 X0.0 Y0.0;坐标平移 MWTzJGRT
M50;切断丝 TR}ztf[e
G90 G00 X200.0 Y80.0;快速移动 '0|0rwx
M60;穿丝 DdDwMq
M98 P0103;调用子程序P3 *gF8"0s
M30;程序结束 
子程序调用切割实例
*{[jO&&J 5q4sxY9T O0101(P1)子程序P1
TK^9!3 G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
uflRW+-2 G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
Zpc R X0.0;到矩形右上角处
fGGGz$;N Y-40.0;到矩形右下角处
=E$Hq4I X-80.0;到矩形左下角处
C]H'z Y0.0;到矩形左上角处
0*$? =E X-40.0;到矩形上边中心处
|uL"/cMW7 Y-20.0;回到矩形的穿丝点(矩形切割的起点)
L
*",4! M99;子程序结束返回主程序
%Y!31oC#
6j
uNn} O0102(P2)子程序P2
=, kH(rp2 G93 X100.0 Y80.0;坐标平移三角形底边中间处
QE8;Jk- G90 G01 Y60.0;到三角形顶点处
*O6q=yg;K: X40.0 Y0.0;到三角形右下角处
N;N,5rxV Y-40.0;到三角形左下角处
93I.Wp_{ X0 Y60.0;到三角形顶点处
K`%{(^}. Y40.0;回到三角形的穿丝点(三角形切割的起点)
(.[HE
~ s? M99;子程序结束返回主程序
)/uu~9SFd O$SQzLZx& O0103(P3)子程序P3
V% -wZL/ G93 X200.0 Y80.0;坐标平移到圆心处
>Vp# G90 G01 Y40.0; 到圆以上圆上一点
DVC<P}/ G02 J-40.0;顺时针切割圆
BuwJR
Ql. G01 Y0.0; 回到圆心处
y*K]z M99;子程序结束返回主程序