例：在一块270mm×165mm的方板上切割出如图所示的长方形、三解形和圆形。其中P1、P2和P3为穿丝点，电极丝的初始坐标为（80，40）。 Qe[ai?iJkt
H_JT"~_2
这里设计三个子程序，每个子程序完成一个图形的加工，程序如下： ,J*#Ixe}
"(F:'J} X
O0100（MAIN） USf;}F:-C
G92 X80.0 Y40.0；设定坐标系 TGPdi5Eq
M98 P0101；调用子程序P1 r-BqIoVT
G93 X0.0 Y0.0；坐标平移 D//Ts`}+n
M50；切断丝 U,/9fzg d
G90 G00 X100.0 Y120.0；快速移动 wW/w vC-
M60；穿丝 1p>&j%dk
M98 P0102；调用子程序P2 (j}Wt 8
G93 X0.0 Y0.0；坐标平移 K0^+2lx
M50；切断丝 Izfj
9h ?
G90 G00 X200.0 Y80.0；快速移动 n RZ T~S4
M60；穿丝 Wm58[;%LTw
M98 P0103；调用子程序P3 5o~AUo{
M30；程序结束 
子程序调用切割实例
q|;+Wp? D2Kh+~l O0101（P1）子程序P1
VN4H+9E G93 X120.0 Y60.0；坐标原点平移到矩形的右上角处
fl9J G90 G01 Y0.0；绝对坐标从矩形中心到矩形上边中心处
1K$8F ~%Z X0.0；到矩形右上角处
`WU"*HqW Y-40.0；到矩形右下角处
W$Z"" X-80.0；到矩形左下角处
bF3}L=z Y0.0；到矩形左上角处
7^8<[8 X-40.0；到矩形上边中心处
Y'LIk Q\ Y-20.0；回到矩形的穿丝点（矩形切割的起点）
DCt rTX M99；子程序结束返回主程序
Z"<tEOs/En 'r`-J4i cX O0102（P2）子程序P2
{wf e!f G93 X100.0 Y80.0；坐标平移三角形底边中间处
zTt6L6:u G90 G01 Y60.0；到三角形顶点处
b{d@:" X40.0 Y0.0；到三角形右下角处
8BJ&"y8H Y-40.0；到三角形左下角处
4~{q=-]V X0 Y60.0；到三角形顶点处
|N>TPK&Xt Y40.0；回到三角形的穿丝点（三角形切割的起点）
1@0ZP~LTB M99；子程序结束返回主程序
a)8M'f_z E^jb#9\R O0103（P3）子程序P3
,NaNih 1 G93 X200.0 Y80.0；坐标平移到圆心处
V5LzUg] G90 G01 Y40.0； 到圆以上圆上一点
1~q|%"J G02 J-40.0；顺时针切割圆
t7DT5SrR G01 Y0.0； 回到圆心处
0l ]K%5# M99；子程序结束返回主程序
