例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 zKfY0A R
3jjV
bm
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: ''H;/&nDX
yb) a
O0100(MAIN) w+gPU1|(r
G92 X80.0 Y40.0;设定坐标系 l7#2
e ORm
M98 P0101;调用子程序P1 jIck!
G93 X0.0 Y0.0;坐标平移 I lZ$Jd
M50;切断丝 X#Hl<d2
G90 G00 X100.0 Y120.0;快速移动 RMlx[nsq
M60;穿丝 q9(Z9$a(\
M98 P0102;调用子程序P2 DFp">1@`PR
G93 X0.0 Y0.0;坐标平移 }aL&3[>>
M50;切断丝 g}$B4_sY
G90 G00 X200.0 Y80.0;快速移动 t8.^Y TI
M60;穿丝 xu.TS
M98 P0103;调用子程序P3 `t>:i!s/
M30;程序结束 
子程序调用切割实例
7{p6&xXx HL%|DCo O0101(P1)子程序P1
^00C"58A G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
`#?]g ! G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
o]<J&<WM X0.0;到矩形右上角处
aSIoq}c( Y-40.0;到矩形右下角处
%ZX3:2 X-80.0;到矩形左下角处
YL/B7^fd8 Y0.0;到矩形左上角处
S5[}kfe X-40.0;到矩形上边中心处
MB+a?u0\ Y-20.0;回到矩形的穿丝点(矩形切割的起点)
ufJHC06 M99;子程序结束返回主程序
7*>,BhF# \: R Akf< O0102(P2)子程序P2
#9t3 <H[ G93 X100.0 Y80.0;坐标平移三角形底边中间处
GYtp%<<9; G90 G01 Y60.0;到三角形顶点处
EzU3'x X40.0 Y0.0;到三角形右下角处
%*OQH?pyx} Y-40.0;到三角形左下角处
-'T^gEd)c X0 Y60.0;到三角形顶点处
Z6#(83G4 Y40.0;回到三角形的穿丝点(三角形切割的起点)
a1z*Z/!5 M99;子程序结束返回主程序
8aTo
TA7JA v G~JK[ O0103(P3)子程序P3
IU\h,Ug G93 X200.0 Y80.0;坐标平移到圆心处
o
@nsv&i G90 G01 Y40.0; 到圆以上圆上一点
CP
Ju= G02 J-40.0;顺时针切割圆
{?Cm G01 Y0.0; 回到圆心处
{dwlW`{ M99;子程序结束返回主程序