例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。
Skk3M?
)qe$rD;N
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: P :7l#/x_
S{"6PXzb
O0100(MAIN) 3$kv%uf{
G92 X80.0 Y40.0;设定坐标系 :hl}Zn~jt
M98 P0101;调用子程序P1 }07<(,0n
G93 X0.0 Y0.0;坐标平移 `MpC<sit
M50;切断丝 |$|n V^y
G90 G00 X100.0 Y120.0;快速移动 D)/XP
M60;穿丝 z5o9\.y({
M98 P0102;调用子程序P2 /xrq'|r?C
G93 X0.0 Y0.0;坐标平移 !Pi?
!
M50;切断丝 w_z^5\u0
G90 G00 X200.0 Y80.0;快速移动 Z#cU#)`y1
M60;穿丝 ee d\0
M98 P0103;调用子程序P3 )H37a
M30;程序结束 
子程序调用切割实例
Med"dHo7 C"m0"O> O0101(P1)子程序P1
^kR^
QL$ G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
H{tOCYyD G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
c&I,eds X0.0;到矩形右上角处
d8 BK/b Y-40.0;到矩形右下角处
@SQ*/sw (c X-80.0;到矩形左下角处
dXK~
Z: Y0.0;到矩形左上角处
PEQvEruZ} X-40.0;到矩形上边中心处
nO.+&kA Y-20.0;回到矩形的穿丝点(矩形切割的起点)
Ci#5@Q9#w M99;子程序结束返回主程序
Kn9=a -b?, YT 03>!B O0102(P2)子程序P2
fPk9(X;G!p G93 X100.0 Y80.0;坐标平移三角形底边中间处
aab4c^Ms= G90 G01 Y60.0;到三角形顶点处
Kp=3\) & X40.0 Y0.0;到三角形右下角处
U-]PWt?C{ Y-40.0;到三角形左下角处
YDzF( ']o: X0 Y60.0;到三角形顶点处
F0ivL` Y40.0;回到三角形的穿丝点(三角形切割的起点)
uF.\dY\xv M99;子程序结束返回主程序
pvwnza1 U+}9X^ O0103(P3)子程序P3
1.d9{LO [- G93 X200.0 Y80.0;坐标平移到圆心处
:c/=fWM% G90 G01 Y40.0; 到圆以上圆上一点
my\oC^/9 G02 J-40.0;顺时针切割圆
[@FeRIu8 G01 Y0.0; 回到圆心处
WO*WAP)n M99;子程序结束返回主程序