如下图所示的圆环点阵孔群中各孔的加工，我们曾经用A类宏程序解决过这类问题，这里再试用B类宏程序方法来解决问题。

圆环点阵孔群的加工图

　　宏程序中将用到下列变量：
＃1――第一个孔的起始角度A，在主程序中用对应的文字变量A赋值；
＃3――孔加工固定循环中R平面值C，在主程序中用对应的文字变量C赋值；
＃9――孔加工的进给量值F，在主程序中用对应的文字变量F赋值；
＃11――要加工孔的孔数H，在主程序中用对应的文字变量H赋值；
＃18――加工孔所处的圆环半径值R，在主程序中用对应的文字变量R赋值；
＃26――孔深坐标值Z，在主程序中用对应的文字变量Z赋值；
＃30――基准点，即圆环形中心的X坐标值XO；
＃31――基准点，即圆环形中心的Y坐标值YO；
＃32――当前加工孔的序号i；
＃33――当前加工第i孔的角度；
＃100――已加工孔的数量；
＃101――当前加工孔的X坐标值，初值设置为圆环形中心的X坐标值XO；
＃102――当前加工孔的Y坐标值，初值设置为圆环形中心的Y坐标值YO。

　　用户宏程序编写如下：
O8000
N8010　＃30=＃101　　　　　　　　　　　　　　　　　　//基准点保存
N8020 ＃31=＃102　　　　　　　　　　　　　　　　　　　//基准点保存
N8030 ＃32=1　　　　　　　　　　　　 　　　　　　　　//计数值置1
N8040 WHILE [＃32 LE ABS[＃11]] DO1　 　　　　　　　　//进入孔加工循环体
N8050 ＃33=＃1+360×[＃32－1]/＃11　　 　　　　　　　//计算第i孔的角度
N8060　＃101＝＃30＋＃18×COS[＃33]　　　　　　　　　//计算第i孔的X坐标值
N8070　＃102＝＃31＋＃18×SIN[＃33]　　 　　　　　　　//计算第i孔的Y坐标值
N8080　G90 G81 G98 X＃101 Y＃102 Z＃26 R＃3 F＃9　　　//钻削第i孔
N8090　＃32＝＃32＋1　　　　　　　　　　　　　　　　　//计数器对孔序号i计数累加
N8100　＃100＝＃100＋1　　　　　　　　　　　　　　　　//计算已加工孔数
N8110 END1　　　　　　　　　　　　　　　　　　　　　　//孔加工循环体结束
N8120 #101=#30　　　　　　　　　　　　 　　　　　　　　//返回X坐标初值XO
N8130 #102=#31　　　　　　　　　　　　 　　　　　　　　//返回Y坐标初值YO
M99　　　　　　　　　　　　　　　　　　　　　　　　　 //宏程序结束

　　在主程序中调用上述宏程序的调用格式为：
G65 P8000 A～ C～ F～ H～ R～ Z～
上述程序段中各文字变量后的值均应按零件图样中给定值来赋值。