在圆上打8个孔每个孔45度（极坐标，铣螺纹M22*2.5）

比如在直径100的圆上打8个M22*2.5的孔然后再每个孔内铣个螺纹。用极坐标怎么编。请教一下。每个孔都要铣螺纹，不是攻牙，因为对螺纹要求比较高。

G90 G80 G40 G21 G17 G00
G91 G28 Z0. //回换刀点
M06 T01  //1号刀：中心钻
G54 G90 G00 X0. Y0.
G43 H01 Z50.
M03 S1500
M08
G16  //极坐标模式
G00 Z10.
G99 G81 X50. Y0. Z-3. R5. F150
Y45.
Y90.
Y135.
Y180.
Y225.
Y270.
G98 Y315.
G15 G80  //取消固定循环，取消极坐标模式
M05
M09
G91 G28 Z0. //回Z轴参考点

N20
M06 T02  //2号刀：D19.5麻花钻
G90 G00 X0. Y0.
G43 H02 Z50.
M03 S350
M08
G16
G00 Z10.
G99 G81 X50. Y0. Z-20. R5. F60
Y45.
Y90.
Y135.
Y180.
Y225.
Y270.
G98 Y315.
G15 G80
M05
M09
G91 G28 Z0.

N30
M06 T03  //3号刀：直径18的螺纹铣刀
G90 G00 X0. Y0.
G43 H03 Z50.
M03 S6000
M08
G16
#500 =0. //第一个孔的极角
N10
#501 =-20.  //螺纹孔深度
#502 =#501+2.5  //第一圈螺纹深度，每铣一圈增加一个螺距
N20
G90 G00 X50. Y#500  
G00 Z#501. //刀具直接落到螺孔底部
G01 Y2. F500 //切入
G03 J-2. Z#502 F500 //铣螺纹
#502 =#502+2.5 //z向每次步进一盒螺距
IF [#501 LE 2.5] GOTO20 
G00 X50. Y#500 Z10. //一个螺孔铣完后刀具回螺孔中心并抬刀到Z10.处
#500 =#500+45. //极角步进45度
IF [#500 LE 270] GOTO10
G00 Z100. 
G15
M05
M09
G91 G28 Z0.
G28 Y0.
M30