例：在一塊270mm×165mm的方板上切割出如圖所示的長方形、三解形和圓形。其中P1、P2和P3為穿絲點(diǎn)，電極絲的初始坐標(biāo)為（80，40）。 >fWGiFmlk  
5h/,*p6Nje  
這里設(shè)計(jì)三個(gè)子程序，每個(gè)子程序完成一個(gè)圖形的加工，程序如下： 0\:=KIY.  
}qso} WI  
O0100（MAIN） _l9

fNf!@  
G92 X80.0 Y40.0；設(shè)定坐標(biāo)系 g0j)k6<6(Y  
M98 P0101；調(diào)用子程序P1 KV$&qM.  
G93 X0.0 Y0.0；坐標(biāo)平移 A]!0Z:{h%  
M50；切斷絲 J-tq
EK*  
G90 G00 X100.0 Y120.0；快速移動(dòng) 8^}/T#l  
M60；穿絲 k!x|oC0  
M98 P0102；調(diào)用子程序P2 %CHw+wT&  
G93 X0.0 Y0.0；坐標(biāo)平移 ~Pw9[ycn3  
M50；切斷絲 =F$?`q`  
G90 G00 X200.0 Y80.0；快速移動(dòng) eZOR{|z  
M60；穿絲 4&cQW)  
M98 P0103；調(diào)用子程序P3 pL1ABvBB  
M30；程序結(jié)束

子程序調(diào)用切割實(shí)例 }y6@YfV${  
V?S}%-a  
O0101（P1）子程序P1 zA9q`ePS  
G93 X120.0 Y60.0；坐標(biāo)原點(diǎn)平移到矩形的右上角處 # &.syD#  
G90 G01 Y0.0；絕對坐標(biāo)從矩形中心到矩形上邊中心處 _jG|kjFTc  
X0.0；到矩形右上角處 AB/${RGf+  
Y-40.0；到矩形右下角處 AuQ|CXG-\  
X-80.0；到矩形左下角處 -c&=3O!  
Y0.0；到矩形左上角處 nrKAK^  
X-40.0；到矩形上邊中心處 [@lK[7 u  
Y-20.0；回到矩形的穿絲點(diǎn)（矩形切割的起點(diǎn)） ]]
:K l  
M99；子程序結(jié)束返回主程序 ij0I!ilG4  
v_5qE  
O0102（P2）子程序P2 sPi  
G93 X100.0 Y80.0；坐標(biāo)平移三角形底邊中間處 UUDUda  
G90 G01 Y60.0；到三角形頂點(diǎn)處 z)hK