如下图所示
宏程序使用说明
G65 P8583 X0. Y0. Z-10. R2. Q1. I50. J0. K12. F1000
X、Y：圆周孔均布所在圆的圆心坐标
Z：钻孔深度
R：钻孔安全平面
Q：每次钻孔深度
I：圆周均布孔所在圆的半径
J：需钻的第一个孔的角度
K：孔的数量（正值为逆时针，负值为顺时针钻孔）
F：进给
——《Dream Catcher》
宏程序主体
当程序出现3099（SET ERROR）报警时，请检查主程序调用设置是否正确！！！
%
O8583
IF[#4 EQ #0] GOTO9999
IF[#6 EQ #0] GOTO9999
IF[#24 EQ #0] GOTO9999
IF[#25 EQ #0] GOTO9999
#31=360./#6
#30=0.
WHILE[#30 LT ABS[#6]]DO1
#1=[#30*#31+#5]
G99 G83 X[#4*COS[#1]+#24] Y[#4*SIN[#1]+#25] Z[#26] R[#18] Q[#17] F[#9]
#30=#30+1.
END1
M99
N9999
#3000=99(SET ERROR)
%
著作：CNC编程工程师（ID：LENS-CNC）
由此可将上图编程如下：
G65 P8583 X0. Y0. Z-10. R2. Q1. I50. J0. K12. F1000
（逆时针钻孔）
模拟效果如下图所示
顺时针钻孔编程如下：
G65 P8583 X0. Y0. Z-10. R2. Q1. I50. J0. K-12. F1000
