例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 zXf+ie o
_0j}(Q>|H#
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: G =4 y!y
Z "=(uwM
O0100(MAIN) &lS0"`J=
G92 X80.0 Y40.0;设定坐标系 eB@i)w?@o
M98 P0101;调用子程序P1 V=*J9~K
G93 X0.0 Y0.0;坐标平移 |8`;55G
M50;切断丝 B+DRe 8
G90 G00 X100.0 Y120.0;快速移动 #f~a\}$I
M60;穿丝 Y-c~"#
M98 P0102;调用子程序P2 ;VFr5.*x
G93 X0.0 Y0.0;坐标平移 o%QQ7S3P
M50;切断丝 yK7>^p}V
G90 G00 X200.0 Y80.0;快速移动 .}<B*e=y
M60;穿丝 .M{[J]H`t
M98 P0103;调用子程序P3
Y)*lw
M30;程序结束 
子程序调用切割实例
.-Lqo=o\ YPy))>Q>cK O0101(P1)子程序P1
enz Q}^ G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
&"h!SkX/ G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
bg*{1^ X0.0;到矩形右上角处
*pD;AU Y-40.0;到矩形右下角处
6qJB"_. X-80.0;到矩形左下角处
XfrnM^oty Y0.0;到矩形左上角处
`s_TY%&_}g X-40.0;到矩形上边中心处
` ;=Se_ Y-20.0;回到矩形的穿丝点(矩形切割的起点)
=5M>\vt] M99;子程序结束返回主程序
L K~, ZtLn*M O0102(P2)子程序P2
(*x"6)` G93 X100.0 Y80.0;坐标平移三角形底边中间处
;MJ1Q G90 G01 Y60.0;到三角形顶点处
~=mM/@HD X40.0 Y0.0;到三角形右下角处
bC{8yV=) Y-40.0;到三角形左下角处
v+sbRuo8 X0 Y60.0;到三角形顶点处
\-0` %k"& Y40.0;回到三角形的穿丝点(三角形切割的起点)
!~l%6Z5 M99;子程序结束返回主程序
k9xKaJ%1 "y0A<-~ O0103(P3)子程序P3
6 {Z\cwP)c G93 X200.0 Y80.0;坐标平移到圆心处
!gf3%!% G90 G01 Y40.0; 到圆以上圆上一点
//@=Q!MW G02 J-40.0;顺时针切割圆
,AM-cwwT:u G01 Y0.0; 回到圆心处
0cUt"(] M99;子程序结束返回主程序