例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 -G|?Kl
_Qh :*j!
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： vGST{Lz;
VMZUJ2Yj/&
O0100（MAIN） zxD~W"R:s
G92 X80.0 Y40.0；设定坐标系 /
%9DO
M98 P0101；调用子程序P1 7]J7'!Iz
G93 X0.0 Y0.0；坐标平移 &[Zg;r
M50；切断丝 VnU/_# n
G90 G00 X100.0 Y120.0；快速移动 O_S%PX
M60；穿丝 9| {t% F=-
M98 P0102；调用子程序P2 &%=]lP]
G93 X0.0 Y0.0；坐标平移 1*VArr6*6
M50；切断丝 V1]QuQ{&s
G90 G00 X200.0 Y80.0；快速移动 B3';Tcs
M60；穿丝 n)bbEXO
M98 P0103；调用子程序P3 9!>Ks8'.d
M30；程序结束 
子程序调用切割实例
C{<dzooz
2m8|0E|@ O0101（P1）子程序P1
T=W;k<P\k G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
<0h,{28 G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
j8cXv X0.0；到矩形右上角处
HB0DG<c- Y-40.0；到矩形右下角处
.Xcf *$.;s X-80.0；到矩形左下角处
-TT{4\%s Y0.0；到矩形左上角处
QNcbl8@ X-40.0；到矩形上边中心处
%p}xW V . Y-20.0；回到矩形的穿丝点（矩形切割的起点）
a<W.}0ZY M99；子程序结束返回主程序
n~mP7X%wE7 CU+H`-+"J O0102（P2）子程序P2
l2h1CtAU G93 X100.0 Y80.0；坐标平移三角形底边中间处
5\jzIB _? G90 G01 Y60.0；到三角形顶点处
eelkK,4 X40.0 Y0.0；到三角形右下角处
OTmw/ #ug Y-40.0；到三角形左下角处
G pC*w
~ X0 Y60.0；到三角形顶点处
S0]JeP+3! Y40.0；回到三角形的穿丝点（三角形切割的起点）
IW $ qP&a M99；子程序结束返回主程序
9\S,$A{{* }xb?C""q^q O0103（P3）子程序P3
IA3m.Vxj ^ G93 X200.0 Y80.0；坐标平移到圆心处
zEMZz$Y G90 G01 Y40.0； 到圆以上圆上一点
x
T{ s%wE G02 J-40.0；顺时针切割圆
tW[dJKw G01 Y0.0； 回到圆心处
?#obNQ"u] M99；子程序结束返回主程序
