例:在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点,电极丝的初始坐标为(80,40)。 M;OY+|uA
fIN8::Cs[
这里设计三个子程序,每个子程序完成一个图形的加工,程序如下: Q%KH^<
;ZPAnd:pb
O0100(MAIN) o\vIYQ
G92 X80.0 Y40.0;设定坐标系 G,9osTt/
M98 P0101;调用子程序P1
Z+`mla
G93 X0.0 Y0.0;坐标平移 YNA %/
M50;切断丝 hV#+joT8i
G90 G00 X100.0 Y120.0;快速移动 #~*fZ|sq+3
M60;穿丝 uy)iB'st&
M98 P0102;调用子程序P2 {LYA?w^GT
G93 X0.0 Y0.0;坐标平移 )[yM4QFl
M50;切断丝 htk5\^(X
G90 G00 X200.0 Y80.0;快速移动 A<2_V1
M60;穿丝 p/>}{Q )Y
M98 P0103;调用子程序P3 $J"}7+
M30;程序结束 
子程序调用切割实例
ke_Dd? I$xfCu O0101(P1)子程序P1
P$S>=*`n
U G93 X120.0 Y60.0;坐标原点平移到矩形的右上角处
dDbPM9]5 G90 G01 Y0.0;绝对坐标从矩形中心到矩形上边中心处
6DqV1' X0.0;到矩形右上角处
:]iV*zo_ Y-40.0;到矩形右下角处
#X'!wr|- X-80.0;到矩形左下角处
Z2~;u[0a[ Y0.0;到矩形左上角处
KywDp 37^ X-40.0;到矩形上边中心处
zm4Okg)w@ Y-20.0;回到矩形的穿丝点(矩形切割的起点)
L3iYZ>] M99;子程序结束返回主程序
GV#"2{t
j \_}Y4 O0102(P2)子程序P2
4]0|fi3}> G93 X100.0 Y80.0;坐标平移三角形底边中间处
|K| c G90 G01 Y60.0;到三角形顶点处
9Slx.9f X40.0 Y0.0;到三角形右下角处
b7Jk{x #u Y-40.0;到三角形左下角处
5BR9f3} X0 Y60.0;到三角形顶点处
0][PL%3Z Y40.0;回到三角形的穿丝点(三角形切割的起点)
m-S4"!bl M99;子程序结束返回主程序
wG6>.`: x~C%Hp*# O0103(P3)子程序P3
0FD#9r G93 X200.0 Y80.0;坐标平移到圆心处
u!?cKZw G90 G01 Y40.0; 到圆以上圆上一点
hz{=@jX G02 J-40.0;顺时针切割圆
uq~$HXdc G01 Y0.0; 回到圆心处
&+;z`A'|8 M99;子程序结束返回主程序