例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 )np:lL$$
#?U}&Bd
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: {yTGAf-DV
J9--tJ?[>o
O0100(MAIN) ;s = l52
G92 X80.0 Y40.0;设定坐标系 @su^0 9n
M98 P0101;调用子程序P1 O'p9u@kc
G93 X0.0 Y0.0;坐标平移 ios&n)W&
M50;切断丝 $kdB |4C
G90 G00 X100.0 Y120.0;快速移动 a8e6H30Sm
M60;穿丝 ~]IOK$1F%
M98 P0102;调用子程序P2 (&Kk7<#`
G93 X0.0 Y0.0;坐标平移 T?CdZc.
M50;切断丝 .,|G7DGH]
G90 G00 X200.0 Y80.0;快速移动 6RU~"C
M60;穿丝 t:x\kp
M98 P0103;调用子程序P3 ~~/|dh5
M30;程序结束 
子程序调用切割实例
I3{PZhU. Fh&G;aEq O0101(P1)子程序P1
!7O+ogL G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
vFzRg5lH G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
hohfE3rd X0.0;到矩形右上角处
Zgp4`)}: Y-40.0;到矩形右下角处
hn7#
L X-80.0;到矩形左下角处
g-4M3of Y0.0;到矩形左上角处
S:#lH?<_ X-40.0;到矩形上边中心处
e9Wa<i8 Y-20.0;回到矩形的穿丝点(矩形切割的起点)
cN-?l7 M99;子程序结束返回主程序
Jc&{`s^Nu &T?RZ2 O0102(P2)子程序P2
ehGLk7@7& G93 X100.0 Y80.0;坐标平移三角形底边中间处
c)6m$5] G90 G01 Y60.0;到三角形顶点处
lne4-(DJ X40.0 Y0.0;到三角形右下角处
,a{P4Bq Y-40.0;到三角形左下角处
RtkEGxw*^ X0 Y60.0;到三角形顶点处
DD+7V@ Y40.0;回到三角形的穿丝点(三角形切割的起点)
?um;s-x) M99;子程序结束返回主程序
rQ{7j!Im 0I-9nuw,^; O0103(P3)子程序P3
niMsQ G93 X200.0 Y80.0;坐标平移到圆心处
TM__I\+Q G90 G01 Y40.0; 到圆以上圆上一点
L81ZbNU?$ G02 J-40.0;顺时针切割圆
<6%?OJhp G01 Y0.0; 回到圆心处
nY[WRt w M99;子程序结束返回主程序