用宏程序车削外圆

   2018-06-26 627
核心提示:[db:简介]

宏程序编程指令格式
G65P8090X(U) Z(W)   D   E   F
其中X(U)   Z(W)   外圆终点坐标,X轴为直径值编程
D-----每次切深,半径值指令;
E-----退刀量
F------切削速度

宏程序主程序
08090
#31=#5041 保存X值初值
#32=#5042 保存Z值初值
IF[#8NE#0]GOTO1
#8=0.2     退刀量
N1IF[#24EQ#0]GOTO2
#1=#24     X值绝对值指令
GOTO3
N2IF[#21EQ#0]GOTO9   X轴未赋值则报警
#1=#31+#21         X轴绝对值坐标
N3IF[#26EQ#0]GOTO4
#2=#26          
GOTO5
N4IF[#23EQ#0]GOTO9   Z轴未赋值则报警
#2=#32+#23         Z轴绝对值坐标
N5IF[#7EQ#0]GOTO9   每次切深不赋值则报警
IF[#9NE#0]GOTO6    
#9=#4109           F未赋值则用前面的值
N6#30=#31         X轴初值
WHILE[#30GT#1]DO1
#30=#30-2*#7
IF[#30GT#1]GOTO7
#30=#1
N7GOOX#30       切削循环
GOIZ#2F#9
U-2*#8
G00Z#32         切削循环结束
END1
X#31           退回起始点
GOTO10
N9#3000=1       赋值错误报警
N10M99

 
举报收藏 0打赏 0
 
更多>同类数控技术
推荐图文
推荐数控技术
点击排行
网站首页  |  关于我们  |  升级会员  |  联系客服  |  广告合作  |  广告位图  |  使用协议  |  隐私政策  |  版权隐私  |  网站地图  |  排名推广  |  广告服务  |  RSS订阅  |  违规举报  |  蜀ICP备2021024440号