例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 &3YXDNm
R^6^{q
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: {
b7%Zd3-
q>VvXUyK,
O0100(MAIN) >NBwtF>
G92 X80.0 Y40.0;设定坐标系 zUJPINDb
M98 P0101;调用子程序P1 eg>]{`WQ
G93 X0.0 Y0.0;坐标平移 C33=<r[;N<
M50;切断丝 gCW
{$d1=
G90 G00 X100.0 Y120.0;快速移动 EA<x$O
M60;穿丝 p+:MZP -%(
M98 P0102;调用子程序P2 8s6^!e&
G93 X0.0 Y0.0;坐标平移 dijHi
M50;切断丝 U5H5QW +
G90 G00 X200.0 Y80.0;快速移动 W%K=N-kE_
M60;穿丝 (.9H1aO46|
M98 P0103;调用子程序P3 _z&H O
M30;程序结束 
子程序调用切割实例
lD?]D& ob7hNo# O0101(P1)子程序P1
~P+;_ G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
3xpygx9 G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
:ZU-Vi.b X0.0;到矩形右上角处
jN sM&s, Y-40.0;到矩形右下角处
X%Ta?(9|.^ X-80.0;到矩形左下角处
%Yny/O\e% Y0.0;到矩形左上角处
O29GPs X-40.0;到矩形上边中心处
c4FU@^Vv Y-20.0;回到矩形的穿丝点(矩形切割的起点)
r%` |kN M99;子程序结束返回主程序
cu"ge]}, | <- t O0102(P2)子程序P2
W^1)70<y G93 X100.0 Y80.0;坐标平移三角形底边中间处
)<^G]ajn G90 G01 Y60.0;到三角形顶点处
e&F=w`F\ X40.0 Y0.0;到三角形右下角处
w(R+p/RF Y-40.0;到三角形左下角处
\.{ZgL5" X0 Y60.0;到三角形顶点处
+ :k"{I Y40.0;回到三角形的穿丝点(三角形切割的起点)
-!:h] M99;子程序结束返回主程序
]0myoWpi3 4Pr@<S"U O0103(P3)子程序P3
ddvtBAX G93 X200.0 Y80.0;坐标平移到圆心处
4XArpKA G90 G01 Y40.0; 到圆以上圆上一点
*&rV}vVP^ G02 J-40.0;顺时针切割圆
IFF3gh42. G01 Y0.0; 回到圆心处
ci{WyIh M99;子程序结束返回主程序