r8圆弧深度计算方法

G0X45.Z10.

#1=7.95（粗加工圆弧半径）

#2=48（圆心的X绝对值）

#3=#1-3.95（计算出圆的方程中的Y值）

N10#3=#3+0.2（Y值递加，也可以理解为X值递减）

IF[#3GT#1]THEN#3=#1（条件判别，防止过切，强制赋值）

#4=SQRT[#1*#1-#3*#3]（圆的标准方程，算出Z值，也就是旋长，也可以理解为当前螺纹宽度的一半）

#5=#4（用于条件判断）

N20G0Z[10+#4]（Z定位螺纹起刀点）

G92X[#2-2*#3]Z-50.F16.（X值用圆心X值减去每层减去的值等于当前X值）

IF[#4EQ-#5]GOTO30（防止死循环）

#4=#4-0.3（宽度递减）

IF[#4LT-#5]THEN#4=-#5（防止过切）

IF[#4GE-#5]GOTO20（如果没有切完一层的宽度继续循环）

N30IF[#3EQ#1]GOTO40（如果深度到达跳出死循环）

IF[#3LE#1]GOTO10（如果Y值不等于圆弧半径或则理解为深度没有到位继续循环）

N40G0Z10.（Z定位回到螺纹中心）

#6=8（精车圆弧半径赋值）

#7=#6-4（圆弧半径减去螺纹深度等于Y值）