用宏程序和R参数编程实现螺纹的粗、精加工

编程示例：对图2-2所示的圆柱螺纹编程。螺纹螺距为C，螺纹升速段长为I，螺纹减速段长为J，螺纹最终精加工切削余量为D，每次背吃刀量（直径值）分别为（n-1）D、（n-2）D、…、3D、2D、D。

解：

1.零件图的工艺分析

螺纹轴加工时先粗、精车螺纹大径，螺纹大径一般应车的比基本尺寸小0.2～0.4mm（约0.13C，C为螺纹螺距）；保证车好螺纹后牙顶处有0.125C的宽度；再车削退刀槽；最后分层粗、精车螺纹。采用直进法车削螺纹，升速进刀段为I，降速退刀段为J，最后螺纹精加工余量D，根据精加工余量确定每次背吃刀量（直径值）分别为（n-1）D、（n-2）D、…、3D、2D、D，车削次数等于螺纹背吃刀量（=0.65C）除以螺纹精加工余量D后求整。

图2-2 螺纹轴编程示例图

2.参考程序

（1）HNC—21/22T华中世纪星数控系统对实现螺纹的粗、精加工的用户宏程序

局部变量含义：

#1=A；A—螺纹大径

#2=B；B—螺纹长度

#3=C；C—螺纹螺距

#4=I；I—螺纹升速段长

#5=J；J—螺纹减速段长

#6=K；K—螺纹背吃刀量（K=0.65*#3）半径值

#7=D；D—螺纹最终精加工背吃刀量

主程序如下：

O××××；文件名

%××××；程序号

N10 G18 G99 G97 G21 G90 G95 G54 G40；工艺加工状态设置

︙

N40 T0404；调换螺纹车刀

N45 M03 S800；换切螺纹车削转速

N50 M98 P222 A__B__C__D__I__J__K__；调用实现螺纹粗、精加工的用户宏程序

︙

N75 M05；主轴停止

N80 M30；程序结束并返回程序开头

宏程序如下：

%222；程序号

N10 #30=INT[#6/#7]；切削次数（取整）

#31=#6/#30；背吃刀量递减均值

#32=#1；将螺纹外径（#1）赋给变量#32

N15 WHILE#30GT1；如果#30小于或等于1，则程序跳转到N45程序段

N20 #30=#30-1；切削次数递减1次

#33=#30*#31；背吃刀量计算

#32=#32-#33；第n次加工螺纹的X坐标计算

N25 G90 G00 X[#1+5] Z[#4]；到螺纹起点，升速段#4

N30 G00 X[#32]；背吃刀量#32

N35 G32 W[-[#2+#5]] F[#3]；切削螺纹到螺纹切削终点，降速段#5

N40 G90 G00 X[#1+5]；X轴方向快退

N45 ENDW；返回循环体

N50 G00 X[2*#1] Z100.0；退离工件

N55 M99；子程序结束，返回主程序

（2）SINUMERIK 802D数控系统对实现螺纹的粗、精加工的用户R参数程序

R参数含义：

R1=A；A—螺纹大径

R2=B；B—螺纹长度

R3=C；C—螺纹螺距

R4=I；I—螺纹升速段长

R5=J；J—螺纹减速段长

R6=K；K—螺纹背吃刀量（K=0.65*R3）半径值

R7=D；D—螺纹最终精加工背吃刀量

主程序如下：

××××××××；主程序名

N10 G18 G99 G97 G71 G95 G90 G54 G40；工艺加工状态设置

︙

N40 T04 D04；调换螺纹车刀(www.xing528.com)

N45 M03 S800；换切螺纹车削转速

N50 R1=A R2=B R3=C R7=D R4=I R5=J R6=K；参数设置

N55 L222；调用实现螺纹粗、精加工的用户R参数程序

︙

N75 M05；主轴停止

N80 M02；程序结束并返回程序开头

R参数程序如下：

L222；R参数程序名

N10 R30=TRUNC[R6/R7]；切削次数（取整）

R31=R6/R30；背吃刀量递减均值

R32=R1；将螺纹外径（R1）赋给变量R32

N15 MARKE1：R30=R30-1；切削次数递减1次

N20 R33=R30*R31；背吃刀量计算

R32=R32-R33；第n次加工螺纹的X坐标计算

N25 G90 G00 X=R1+5 Z=R4；到螺纹起点，升速段R4

N30 G00 X=R32；背吃刀量R32

N35 G91 G33 Z=-[R2+R5]K=R3；切削螺纹到螺纹切削终点，降速段R5

N40 G90 G00 X=R1+5；X轴方向快退

N45 IF R30＞1；如果R30大于1，则程序跳转到MARKE1标志符程序段

N50 G00 X=2*R1 Z=100.0；退离工件

N55 RET；子程序结束，返回主程序

（3）FANUC 0i数控系统对实现螺纹的粗、精加工的用户宏程序

自变量含义：

#1=A；A—螺纹大径

#2=B；B—螺纹长度

#3=C；C—螺纹螺距

#4=I；I—螺纹升速段长

#5=J；J—螺纹减速段长

#6=K；K—螺纹背吃刀量（K=0.65*#3）半径值

#7=D；D—螺纹最终精加工背吃刀量

主程序如下：

O××××；主程序名

N10 G18 G99 G97 G21 G95 G90 G54 G40；工艺加工状态设置

︙

N40 T0404；调换螺纹车刀

N45 M03 S800；换切螺纹转速

N50 G65 P222 ABCDIJK；调用实现螺纹粗、精加工的用户宏程序

︙

N75 M05；主轴停止

N80 M30；程序结束并返回程序开头

宏程序如下：

O222；程序名

N10 #30=FUP[#6/#7]；切削次数上取整

#31=#6/#30；背吃刀量递减均值

#32=#1；将螺纹外径（#1）赋给变量#32

N15 WHILE[#30LE1] DO1；如果#30小于或等于1，则跳转到N50程序段

N20 #30=#30-1；切削次数递减1次

#33=#30*#31；背吃刀量计算

#32=#32-#33；第n次加工螺纹的X坐标计算

N25 G00 X[#1+5] Z#4；到螺纹起点，升速段#4

N30 G00 X[#32]；背吃刀量#32

N35 G32 W-[#2+#5] F#3；切削螺纹到螺纹切削终点，降速段#5

N40 G00 X[#1+5]；X轴方向快退

N45 END1；返回循环体

N50 G00 X[2*#1] Z100.0；退离工件

N55 M99；子程序结束，返回主程序