例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 Q%. F Mf
zOsk'ZE&
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： #J|DW C!#d
jQ& 82X%m
O0100（MAIN） U^ Ul j/%6
G92 X80.0 Y40.0；设定坐标系 >8=rD
M98 P0101；调用子程序P1 WwAvR5jq
G93 X0.0 Y0.0；坐标平移 Hq oCl
M50；切断丝 R~! md
G90 G00 X100.0 Y120.0；快速移动 4 elA<<
M60；穿丝 MGfIA?u
M98 P0102；调用子程序P2 xG~7kj3
G93 X0.0 Y0.0；坐标平移 la{Iqm{i
M50；切断丝 Kr eF\M%Ke
G90 G00 X200.0 Y80.0；快速移动 }& Kl)2:O
M60；穿丝 NhF<2[mt
M98 P0103；调用子程序P3 i Zn<j'u
M30；程序结束 
子程序调用切割实例
PCZ %<>v X(dHh O O0101（P1）子程序P1
L6n<h G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
EB2 5N~7 G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
P?$Iht.^ X0.0；到矩形右上角处
JLu>w:\ Y-40.0；到矩形右下角处
o*Kl`3=] X-80.0；到矩形左下角处
qfa[KD)!aB Y0.0；到矩形左上角处
W'}^m*F X-40.0；到矩形上边中心处
_(0GAz%9 Y-20.0；回到矩形的穿丝点（矩形切割的起点）
Eq6.
s)10 M99；子程序结束返回主程序
X\HP&;Wd k\A[p\ O0102（P2）子程序P2
vR?E'K 3 G93 X100.0 Y80.0；坐标平移三角形底边中间处
1,Ji|&Pwf G90 G01 Y60.0；到三角形顶点处
:!< U"AC X40.0 Y0.0；到三角形右下角处
_&}z+(Ug Y-40.0；到三角形左下角处
gQ=l\/ H X0 Y60.0；到三角形顶点处
l$DQkbOj Y40.0；回到三角形的穿丝点（三角形切割的起点）
%W,V~kb M99；子程序结束返回主程序
R/@n+tb e WN3] xw3 O0103（P3）子程序P3
6'6,ySo] G93 X200.0 Y80.0；坐标平移到圆心处
BZ}_ G90 G01 Y40.0； 到圆以上圆上一点
t:yJ~En]= G02 J-40.0；顺时针切割圆
c'&\[b(m G01 Y0.0； 回到圆心处
H-5h-p k M99；子程序结束返回主程序
