例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 xZ,g6s2o
?]3`WJOj
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: Iupk+x>
I9>1WT<Yy
O0100(MAIN) Y/@4|9!
G92 X80.0 Y40.0;设定坐标系 R_@yj]%H=
M98 P0101;调用子程序P1 [%QJ6
G93 X0.0 Y0.0;坐标平移 R
)?8A\<E
M50;切断丝 Yj0Ss{Ep
G90 G00 X100.0 Y120.0;快速移动 ;AG5WPI
M60;穿丝 JN3Oe5yB2@
M98 P0102;调用子程序P2 %X[|7D-
G93 X0.0 Y0.0;坐标平移 U8<GD|
M50;切断丝
ND21;
G90 G00 X200.0 Y80.0;快速移动 M}%0=VCY7
M60;穿丝 }GGFJ"
M98 P0103;调用子程序P3 SrHRpxy
M30;程序结束 
子程序调用切割实例
/ebYk-c pazFVzT O0101(P1)子程序P1
EzG7RjW G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
WfO6Fvx% G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
xQJdt$]U@ X0.0;到矩形右上角处
z
^a,7}4 Y-40.0;到矩形右下角处
,GR(y^S X-80.0;到矩形左下角处
9IIe: Y0.0;到矩形左上角处
:5CwRg X-40.0;到矩形上边中心处
&1B)mj Y-20.0;回到矩形的穿丝点(矩形切割的起点)
x%x[5.CT M99;子程序结束返回主程序
5RlJybN"o J@yy2AZnO O0102(P2)子程序P2
;o8cfD .z G93 X100.0 Y80.0;坐标平移三角形底边中间处
Iqo4INGIi G90 G01 Y60.0;到三角形顶点处
{}lw%d?A X40.0 Y0.0;到三角形右下角处
a(BC(^1! Y-40.0;到三角形左下角处
k92189B9j/ X0 Y60.0;到三角形顶点处
lWOB!l Y40.0;回到三角形的穿丝点(三角形切割的起点)
l"ih+%S M99;子程序结束返回主程序
~'T]B{.+J 5IMh$!/uc O0103(P3)子程序P3
^M?uv{354 G93 X200.0 Y80.0;坐标平移到圆心处
GbNVcP.ocP G90 G01 Y40.0; 到圆以上圆上一点
Re.fS6y$> G02 J-40.0;顺时针切割圆
R8HA X G01 Y0.0; 回到圆心处
O'5(L9, M99;子程序结束返回主程序