例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 p<KIF>rf|
?,07;>&
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: KCUU#t|8V\
BwxnDe G)
O0100(MAIN) :y#T9R9
G92 X80.0 Y40.0;设定坐标系 QR"bYQ
M98 P0101;调用子程序P1 +8AvTSgX%
G93 X0.0 Y0.0;坐标平移 3]/.\(2
M50;切断丝 ;
0ko@ \Lq
G90 G00 X100.0 Y120.0;快速移动 \iru7'S
M60;穿丝 s<vs:jna
M98 P0102;调用子程序P2 :CaTP% GW
G93 X0.0 Y0.0;坐标平移 -U-P}6^
M50;切断丝 MzzKJ;wbC6
G90 G00 X200.0 Y80.0;快速移动 L-\ =J
M60;穿丝 Zu21L3
M98 P0103;调用子程序P3 3qi_]*dD
M30;程序结束 
子程序调用切割实例
#cU^U#;= r %d;<2b0 O0101(P1)子程序P1
k4{:9zL1#? G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
`~h4D(n` G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
)(m0cP{7 X0.0;到矩形右上角处
exDkq0u] Y-40.0;到矩形右下角处
|~K(F<;j X-80.0;到矩形左下角处
dz%EM8 Y0.0;到矩形左上角处
6~8F!b2 X-40.0;到矩形上边中心处
XE rUS80 Y-20.0;回到矩形的穿丝点(矩形切割的起点)
;YyXT"6/p M99;子程序结束返回主程序
-M4p\6)Ge +E5=$` O0102(P2)子程序P2
?6P.b6m}0 G93 X100.0 Y80.0;坐标平移三角形底边中间处
>xg5z G90 G01 Y60.0;到三角形顶点处
>7b)y X40.0 Y0.0;到三角形右下角处
3yV'XxC Y-40.0;到三角形左下角处
^jD1vUL 2: X0 Y60.0;到三角形顶点处
dqc1q:k?$ Y40.0;回到三角形的穿丝点(三角形切割的起点)
:243 H M99;子程序结束返回主程序
=Z,5$6%) :%X Ls, O0103(P3)子程序P3
Rc[ 0aj: G93 X200.0 Y80.0;坐标平移到圆心处
Br5o7(AE G90 G01 Y40.0; 到圆以上圆上一点
2.lgT|p G02 J-40.0;顺时针切割圆
'6-$Xq0^E G01 Y0.0; 回到圆心处
}Hcx=}j M99;子程序结束返回主程序