例：在一塊270mm×165mm的方板上切割出如圖所示的長方形、三解形和圓形。其中P1、P2和P3為穿絲點，電極絲的初始坐標為（80，40）。 )wd~639U  
r+u\
jZ  
這里設計三個子程序，每個子程序完成一個圖形的加工，程序如下： blv6  
_P1-d`b0 a  
O0100（MAIN） |D:0BATRP  
G92 X80.0 Y40.0；設定坐標系 6suc:rp";  
M98 P0101；調用子程序P1 +Wc[$,vk  
G93 X0.0 Y0.0；坐標平移 5{TF6  
M50；切斷絲 ^)~M,rW8c  
G90 G00 X100.0 Y120.0；快速移動 _Tz!~z  
M60；穿絲 #
cb6~AH  
M98 P0102；調用子程序P2 D(|$6J 0  
G93 X0.0 Y0.0；坐標平移 q%Pnx_RB  
M50；切斷絲 &ii =$4"R  
G90 G00 X200.0 Y80.0；快速移動 "(qO}&b>  
M60；穿絲 l/LUwDI{  
M98 P0103；調用子程序P3 w2L)f,X  
M30；程序結束

子程序調用切割實例
k$!&3Rh  
w"|c;E1;_  
O0101（P1）子程序P1 dM$S|,H  
G93 X120.0 Y60.0；坐標原點平移到矩形的右上角處 ppjrm
 
G90 G01 Y0.0；絕對坐標從矩形中心到矩形上邊中心處 LBB[aF,Lr  
X0.0；到矩形右上角處 n3\vq3^?  
Y-40.0；到矩形右下角處 Fu$sfq  
X-80.0；到矩形左下角處 }kDrUnBk  
Y0.0；到矩形左上角處 K<tg+(3  
X-40.0；到矩形上邊中心處 [&:oS35O  
Y-20.0；回到矩形的穿絲點（矩形切割的起點） C
2v7(  
M99；子程序結束返回主程序 a\MJbBXv  

w5Xdq_e3  
O0102（P2）子程序P2 t {}1f  
G93 X100.0 Y80.0；坐標平移三角形底邊中間處 4r*6fJ*bJ  
G90 G01 Y60.0；到三角形頂點處 O"Q=66.CR  
X40.0 Y0.0；到三角形右下角處 m/AN*`V  
Y-40.0；到三角形左下角處 x!+a,+G  
X0 Y60.0；到三角形頂點處 VrK