阿基米德螺旋铣孔宏请大神指点修改，找不到问题的原因。

CAM小菜

    1.问题是阿基米德螺旋线怎么按照孔深度分层。2.阿基米德螺旋线步距更改后，圆孔直径会改变。3.步距为0.5刀直径只能加工29倍刀直径的圆孔。4阿基米德螺旋线最大包围圆孔有限制（按理说可以无限螺旋下去）。
%
O0001
#1=G54(WCS)
#2=1(Tool NO.)
#3=10(Tool Dia)
#4=290(hole Dia)
#5=20(hole depth)
#6=0.15(Depth Per Cut HELIX)
#66=0.5(Spiral Step)
#7=1.2(Safty Min Rotate Dia Rate)
#8=3500(S)
#9=1500(F)
#10=[#3*#6](Depth Per Cut HELIX)
#11=[#4-#3]/2(Tool Rotate Dia)
#12=0(Z)
#13=[#3*#7](Min Dia)
IF[#13GE#4]GOTO2
IF[#4GT#3*2]GOTO3
N1
G17 G49 G40 G80
G91 G28 Z0.
T#2 M06
G54 G90 G0 X0. Y0.
G43 Z50. H#2
S#8 M03
X#11
Z10
G1 Z#10 F800
G3 I-#11 Z0 F#9
#14=FIX[#5/#10]
#15=0
WHILE[#15LT#14]DO1
#15=#15+1
#12=#12+#10
G3 I-#11 Z-#12 F#9
END1
G3 I-#11 Z-#5
I-#11
G1 X0
G0 Z50.
N2
G91 G28 Z0.
M05
M30
N3(HOLE DIA GT DUBLE TOOL DIA)
G17 G49 G40 G80
G91 G28 Z0.
T#2 M06
G54 G90 G0 X0. Y0.
G43 Z50. H#2
S#8 M03
X[#3*0.5]
Z10
G1 Z#10 F800
G3 I-[#3*0.5] Z0 F#9
#14=FIX[#5/#10]
#15=0
WHILE[#15LT#14]DO1
#15=#15+1
#12=#12+#10
G3 I-[#3*0.5] Z-#12 F#9
END1
G3 I-[#3*0.5] Z-#5
I-[#3*0.5]
#16=[#3*0.5](DIA)
#17=0(ANGLE)
#18=[#3*#66](SPIRAL STEP)
#100=#18/360
N4
#80=#16(START DIA)
#81=[#4-#3]/2(HOLE DIA)
WHILE[#86LE#81]DO1
#101=[#80+#100*#17]*COS[#17]
#102=[#80+#100*#17]*SIN[#17]
#17=#17+1
#16=#16+#100
G1X#101Y#102
#82=#101*#101
#83=#102*#102
#84=ABS[#82]
#85=ABS[#83]
#86=SQRT[#84+#85]
END1
G3 I-#101 J-#102
G0 Z50
G91 G28 Z0
M30
%