例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 _]#klL
@98;VWY\
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: }Ag|gF!_
3*S[eqMJc
O0100(MAIN) 0`hwmDiB"
G92 X80.0 Y40.0;设定坐标系 O;XG^s@5
M98 P0101;调用子程序P1 '8`T|2
G93 X0.0 Y0.0;坐标平移 ,cHU) j
M50;切断丝 K!{5[G
G90 G00 X100.0 Y120.0;快速移动 W*T{,M@Y
M60;穿丝 {XY3Xo
M98 P0102;调用子程序P2 ,TC~~EWq
G93 X0.0 Y0.0;坐标平移 D!>
d0k,Y
M50;切断丝 v#w _eqg
G90 G00 X200.0 Y80.0;快速移动 Rq)BssdF
M60;穿丝 ^[# &
^[-V
M98 P0103;调用子程序P3 9w^zY;Y
M30;程序结束 
子程序调用切割实例
;_JH:}j W|c.l{A5Q O0101(P1)子程序P1
=G>(~+EA G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
d+2daKi G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
`7Ug/R< X0.0;到矩形右上角处
/)#8)"`nT Y-40.0;到矩形右下角处
D&{
*AH%Q X-80.0;到矩形左下角处
tB6k|cPC Y0.0;到矩形左上角处
%]4-{%v X-40.0;到矩形上边中心处
3{J.xWB@: Y-20.0;回到矩形的穿丝点(矩形切割的起点)
ai ftlY M99;子程序结束返回主程序
/A(NuB<Pq mN1Ssq"B O0102(P2)子程序P2
"n?<2
wso G93 X100.0 Y80.0;坐标平移三角形底边中间处
*3Nn +T
G90 G01 Y60.0;到三角形顶点处
rY70^<z X40.0 Y0.0;到三角形右下角处
2R@%Y/ Y-40.0;到三角形左下角处
l8wF0| X0 Y60.0;到三角形顶点处
-CBD|fo[h Y40.0;回到三角形的穿丝点(三角形切割的起点)
R_e)mkE M99;子程序结束返回主程序
[%8@DC' R{3CW^1 O0103(P3)子程序P3
WcGXp$M G93 X200.0 Y80.0;坐标平移到圆心处
R2^iSl%pj G90 G01 Y40.0; 到圆以上圆上一点
|-kEGLH[*V G02 J-40.0;顺时针切割圆
kV)'a G01 Y0.0; 回到圆心处
:m`/Q_y" M99;子程序结束返回主程序