今天我们介绍一种用角度法的方法来车削圆弧螺纹，已知上图圆弧螺纹为R5半圆，大直径为50.这里我们选用R2球刀来加工这个螺纹，刀具对刀以球刀，圆心对刀。通过每次增大圆弧半径，通过角度法车削圆弧轮廓来编制这个程序，我们首先想想如果用球刀圆心对刀的话，我们第一刀加工会吃刀量过大，所以我们首先采用把圆弧圆心往上移动一个球刀半径的X值来车削，去除大量余量后，在通过依次递减X值，让它与图纸圆弧圆心X50重合。下面我们来看下我们编制的加工程序：
M3S500G99
T0101M08
G0X60.Z10.（定位)
#1=54(往上移动一个刀具圆弧半径的圆心X值）
#2=2.5（初始圆弧半径）
#10=2（刀具圆弧半径）
N10#3=0（角度初始值）
N20#4=#1-[#2-#10]*SIN[#3]*2（利用三角函数算出程序中的X值）
#5=10 [#2-#10]*COS[#3]（算出Z值）
G0Z#5（螺纹每次定位）
G92X#4Z-150.F15.（螺纹车削）
#3=#3 3（角度每次递加3度，60次正好180度，为半圆角度）
IF[#3LE180]GOTO20（条件判断如果没车完180度一个半圆，跳转N20继续循环）
#2=#2 0.5（圆弧半径每次递加0.5）
IF[#2LE5]GOTO10（条件判断，如果圆弧半径没有到达R5，跳转N10车削下一个个圆弧轮廓）
#6=5（圆弧半径从新赋值为5）
N30#3=0（角度从新赋值为0度）
#1=#1-0.5（往上移动的圆心X值每次递减0.5）
N40#4=#1-[#6-#10]*SIN[#3]*2（算出螺纹X值）
#5=10 [#6-#10]*COS[#3]（算出Z值）
G0Z#5（螺纹Z定位）
G92X#4Z-150.F15.（螺纹车削）
#3=#3 3（角度递加）
IF[#3LE180]GOTO40（如果没车完一个轮廓跳转N40继续循环）
IF[#1EQ50]GOTO50（如果往上移动的圆心X值与图纸圆心X值重合跳出循环）
IF[#1GE50]GOTO30（条件判断，如果往上移动的圆心X值还大于图纸圆心X值，跳转N30继续循环）
N50G0X120.Z130.（螺纹车削结束退刀）
M30（程序结束）
完整程序如下：
M3S500G99
T0101M08
G0X60.Z10.
#1=54
#2=2.5
#10=2
N10#3=0
N20#4=#1-[#2-#10]*SIN[#3]*2
#5=10 [#2-#10]*COS[#3]
G0Z#5
G92X#4Z-150.F15.
#3=#3 3
IF[#3LE180]GOTO20
#2=#2 0.5
IF[#2LE5]GOTO10
#6=5
N30#3=0
#1=#1-0.5
N40#4=#1-[#6-#10]*SIN[#3]*2
#5=10 [#6-#10]*COS[#3]
G0Z#5
G92X#4Z-150.F15.
#3=#3 3
IF[#3LE180]GOTO40
IF[#1EQ50]GOTO50
IF[#1GE50]GOTO30
N50G0X120.Z130.
M30
更多宏程序资料请微信关注 zgsklm
,
