车一圆弧螺纹，圆弧半径8，螺纹深度4.螺纹大直径40.由此可以看出圆弧的圆心不在螺纹大直径上，下面程序通过控制圆弧宽度来达到螺纹深度。圆的方程X的平方加上Z的平方等于R的平方，我们R已经知道是8，要算出每层螺纹宽度我们首先要算出方程中的X值，这里的X值也就是园方程中的Y值，Y=圆弧半径8-圆弧深度4，所以Y值等于4.下面粗加工方法通过减小圆弧半径和Y值来留螺纹宽度和深度的余量，所以程序中的#1=7.95，下面来看下下面的程序，本程序通过分层来加工，当第一层宽度到达，圆弧旋长。在进行下一层加工。直到深度到达R7.95的深度后，通过对#1=7.95圆弧半径从新赋值为8。进行精加工。
M3 S300 G99
T0101M08
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值）
#8=SQRT[#6*#6-#7*#7]（算出螺纹宽度的一半也就是圆弧旋长）
#9=#8(把#8的值给#9，用于下面的条件判断）
N60#10=SQRT[#6*#6-#9*#9]（算出Y值）
G0Z[10+#9]（螺纹起刀位置）
G92X[#2-2*#10]Z-50.F16.
IF[#9EQ-#8]GOTO80（如果车完一个圆弧轮廓跳出循环）
#9=#9-0.05（旋长递减）
IF[#9LT-#8]THEN#9=-#8（防止过切强制赋值）
IF[#9GE-#8]GOTO60（如果没有车完一个螺纹轮廓继续循环）
N80G0X120.Z130.（退刀）
M30
如果你想了解更多的UG编程知识，推荐你们加一个UG编程群726236503，里面有免费的UG编程资料供大家学习，有什么不懂的可以在群里大家相互交流。学好UG编程其实很简单，只要跟对经验丰富的人系统的学习，多跟朋友，同事，同学交流。可以更加强化自己的编程水平，学到的知识是自己的，别人拿不走。
网友评论