例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 Ckelr
) ag8]
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： C9 `J6Uu
AxXFzMW
O0100（MAIN） X)tf3M
{J@
G92 X80.0 Y40.0；设定坐标系 :n4X>YL)
M98 P0101；调用子程序P1 gx* rxid
G93 X0.0 Y0.0；坐标平移 )AX0x1I|E
M50；切断丝 * i}Nb* Z3
G90 G00 X100.0 Y120.0；快速移动 D`t }V
M60；穿丝 <N Lor55.]
M98 P0102；调用子程序P2 #\Q{?F!4
G93 X0.0 Y0.0；坐标平移 GCf 3'u
M50；切断丝 J5J$qCJq
G90 G00 X200.0 Y80.0；快速移动 7, \Uk|
M60；穿丝 X C jYm
M98 P0103；调用子程序P3 :OF:(,J
M30；程序结束 
子程序调用切割实例
~B NLzt3%O ; U)a)l'y O0101（P1）子程序P1
I1H} 5 bf3 G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
A1zqm_X5)P G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
j:yQP# U X0.0；到矩形右上角处
31w9$H N Y-40.0；到矩形右下角处
0]F'k8yLN X-80.0；到矩形左下角处
q;))3aQe Y0.0；到矩形左上角处
V7zF5=w X-40.0；到矩形上边中心处
x<0-'EF/S Y-20.0；回到矩形的穿丝点（矩形切割的起点）
!Cm<K*c"&E M99；子程序结束返回主程序
FyZa1%Tv@ iXN7+QO) O0102（P2）子程序P2
q/o|uAq G93 X100.0 Y80.0；坐标平移三角形底边中间处
$GzTDq
Y9@ G90 G01 Y60.0；到三角形顶点处
4{:W5eT! / X40.0 Y0.0；到三角形右下角处
5$r`e+Nf' Y-40.0；到三角形左下角处
-XVC,.Ly X0 Y60.0；到三角形顶点处
AnbY<&OC1 Y40.0；回到三角形的穿丝点（三角形切割的起点）
!bn uC c M99；子程序结束返回主程序
}),tk?\ ?UX Ky O0103（P3）子程序P3
z2m% L0 G93 X200.0 Y80.0；坐标平移到圆心处
FkdG@7Xf G90 G01 Y40.0； 到圆以上圆上一点
p0KkPE">p4 G02 J-40.0；顺时针切割圆
$J/Z~ (=JT G01 Y0.0； 回到圆心处
O IF0X! M99；子程序结束返回主程序
