例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 yY!jkRq%w
R{.ku!w
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: RAe:$Iv$!v
UXd\Q''
O0100(MAIN) ^uYxeQY[
G92 X80.0 Y40.0;设定坐标系 bH&[O`vf
M98 P0101;调用子程序P1 q*2ljcb5 5
G93 X0.0 Y0.0;坐标平移 &AW?!rH
M50;切断丝 6 ,k}v:
G90 G00 X100.0 Y120.0;快速移动 >J4_/p>Qs
M60;穿丝 &cZD{Z
M98 P0102;调用子程序P2 u+hzCCwtR
G93 X0.0 Y0.0;坐标平移 zD?<m
J`
M50;切断丝 K2&pTA~OR
G90 G00 X200.0 Y80.0;快速移动 vQA: \!
M60;穿丝 T1Xm^{
M98 P0103;调用子程序P3 @L`t/OD
M30;程序结束 
子程序调用切割实例
2+0'vIw} =\tg$ O0101(P1)子程序P1
QQqWJq~ G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
"}EydG"= G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
c" yf>0 X0.0;到矩形右上角处
&}rh+z Y-40.0;到矩形右下角处
^G15]Pyw X-80.0;到矩形左下角处
P\SE_*& Y0.0;到矩形左上角处
`6UW?1_Z5 X-40.0;到矩形上边中心处
aVd{XVE Y-20.0;回到矩形的穿丝点(矩形切割的起点)
2OEOb,` M99;子程序结束返回主程序
qW),)i --y.q~d O0102(P2)子程序P2
R:=i/P/ G93 X100.0 Y80.0;坐标平移三角形底边中间处
lepgmQ|oY G90 G01 Y60.0;到三角形顶点处
%A?Ym33 X40.0 Y0.0;到三角形右下角处
;[&g`%-H< Y-40.0;到三角形左下角处
jh9^5"vQ X0 Y60.0;到三角形顶点处
RoPz?,u Y40.0;回到三角形的穿丝点(三角形切割的起点)
74QWGw`, M99;子程序结束返回主程序
Ip|7JL0Z !DD|dVA{ O0103(P3)子程序P3
Ju+r@/y% G93 X200.0 Y80.0;坐标平移到圆心处
#AE'arT< G90 G01 Y40.0; 到圆以上圆上一点
.BZw7
YV G02 J-40.0;顺时针切割圆
87y$=eZ G01 Y0.0; 回到圆心处
9J*m!-hOY M99;子程序结束返回主程序