例1：用宏程序和子程序功能順序加工圓周等分孔。設(shè)圓心在O點(diǎn)，它在機(jī)床坐標(biāo)系中的坐標(biāo)為(X₀,Y₀)，在半徑為r的圓周上均勻地鉆幾個(gè)等分孔，起始角度為α，孔數(shù)為n。以零件上表面為Z向零點(diǎn)。見圖4.35。

使用以下保持型變量：
#502：半徑r；
#503：起始角度α；
#504：孔數(shù)n，當(dāng)n>0時(shí)，按逆時(shí)針方向加工，當(dāng)n<0時(shí)，按順時(shí)針方向加工；
#505：孔底Z坐標(biāo)值；
#506：R平面Z坐標(biāo)值；
#507：F進(jìn)給量。
使用以下變量進(jìn)行操作運(yùn)算：
#100：表示第i步鉆第i孔的記數(shù)器；
#101：記數(shù)器的最終值(為n 的絕對值)；
#102：第i個(gè)孔的角度位置θ_i的值；
#103：第i個(gè)孔的X坐標(biāo)值；
#104：第i個(gè)孔的Y坐標(biāo)值；
用用戶宏程序編制的鉆孔子程序如下：
O9010
N110 G65 H01 P#100 Q0 　　　　　　 //#100 = 0
N120 G65 H22 P#101 Q#504　　　　　 //#101 = │#504│
N130 G65 H04 P#102 Q#100 R360　　　//#102 = #100 ×360^o
N140 G65 H05 P#102 Q#102 R#504 　　//#102 = #102 / #504
N150 G65 H02 P#102 Q#503 R#102     //#102 = #503 + #102當(dāng)前孔角度位置θ_i =α+ (360^o×i) / n
N160 G65 H32 P#103 Q#502 R#102 　　//#103 = #502 ×COS(#102)當(dāng)前孔的 X坐標(biāo)
N170 G65 H31 P#104 Q#502 R#102 　　//#104 = #502 ×SIN(#102) 當(dāng)前孔的Y坐標(biāo)
N180 G90 G00 X#103 Y#104 　　　　　//定位到當(dāng)前孔（返回開始平面）
N190 G00 Z#506 　　　　　　　　　　//快速進(jìn)到R平面
N200 G01 Z#505 F#507 　　　　　　　//加工當(dāng)前孔
N210 G00 Z#506 　　　　　　　　　　//快速退到R平面
N220 G65 H02 P#100 Q#100 R1 　　　 //#100 = #100+1孔計(jì)數(shù)
N230 G65 H84 P-130 Q#100 R#101     //當(dāng)#100 < #101時(shí)，向上返回到130程序段
N240 M99                           //子程序結(jié)束

調(diào)用上述子程序的主程序如下：
O0010
N10 G54 G90 G00 X0 Y0 Z20 　　　　　　　//進(jìn)入加工坐標(biāo)系
N20 M98 P9010 　　　　　　　　　　　　　//調(diào)用鉆孔子程序，加工圓周等分孔
N30 Z20 　　　　　　　　　　　　　　　　//抬刀
N40 G00 G90 X0 Y0 　　　　　　　　　　　//返回加工坐標(biāo)系零點(diǎn)
N50 M30 程序結(jié)束
設(shè)置G54：X=-400，Y=-100，Z=-50。
變量#500～#507可在程序中賦值，也可由MDI方式設(shè)定。

例2：根據(jù)以下數(shù)據(jù)，用用戶宏程序功能加工圓周等分孔。如圖4.36：在半徑為50mm的圓周上均勻地鉆8個(gè)ф10的等分孔，第一個(gè)孔的起始點(diǎn)角度為30^o，設(shè)圓心為O點(diǎn)，以零件的上表面為Z向零點(diǎn)。

首先在MDI方式中，設(shè)定以下變量的值：　　　　
#502：半徑r為50；
#503：起始角度α為30；
#504：孔數(shù)n為8；
#505：孔底Z坐標(biāo)值為－20；
#506：R平面Z坐標(biāo)值為5；
#507：F進(jìn)給量為50。
加工程序?yàn)椋?BR>O6100
N10 G54 G90 G00 X0 Y0 Z20
N20 M98 P9010
N30 G00 G90 X0 Y0
N40 Z20
N50 M30
設(shè)置G54：X＝-400，Y＝-100，Z＝-50v