宏程序与R参数优化孔加工钻削循环

编程示例：编写图2-3所示零件的钻孔程序。

图2-3 深孔钻削加工的钻削路线示意图

解：

1.零件图的工艺分析

首先将刀具沿X和Z轴移动到钻孔循环起始点，将U定义为孔的深度，K为钻削深度，F为钻孔时的切削进给速度。零件外圆右侧中心定为工件坐标X、Z的零点，通过分步钻入达到最后的钻孔深度，钻孔深度的最大值事先确定。

2.参考程序

（1）HNC—21/22T华中世纪星数控系统对深孔钻削加工的用户宏程序

局部变量含义：

#2=C；C—安全距离

#5=F；F—刀具进给速度（mm/r）

#10=K；K—每次循环的钻削深度

#20=U；U—孔最终钻削深度

#25=Z；Z—零件右端面的工件Z向坐标值

主程序如下：

O××××；文件名

%××××；程序号

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

︙

N40 T0202；调用钻孔刀具

N45 M03 S1000；主轴正转，转速1000r/min

N50 M98 P223 C__F__K__U__Z__；调用深孔钻削加工的用户宏程序

︙

N85 M05；主轴停止

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

宏程序如下：

%223；宏程序名

N010 #1=1；计数器置初始值1

N015 #28=INT[#20+#2]/#10；根据钻削深度和安全距离计算循环次数（取整）

N020 #29=[#20+#2]/#28；计算每次钻削深度

N025 #30=#29；将#29的值赋给中间变量#30

N030 G00 Z[#2]；刀具快速移动到工件右端面钻孔安全距离处

N040 WHILE#1LE#28；如果#1大于#28，程序跳转到N120程序段

N045 G01 G91 Z[-#30] F[#5]；钻孔

N050 G00 Z[#29—]；将刀具移至钻孔起始点

N055 G04 P100；暂停1s

N060 G00 Z[-#29+1]；以快速进给速度将刀具移动到上次孔深前1mm处

N090 #1=#1+1；计数器累加1

N100 #29=#29*#1；钻削深度叠加

N110 ENDW；返回循环体

N115 G90 G00 Z[#2]；将刀具移至钻孔起始点

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

（2）SINUMERIK 802D数控系统对深孔钻削加工的用户R参数程序

R参数含义：

R3=C；C—安全距离

R9=F；F—刀具进给速度（mm/r）

R6=K；K—每次循环的钻削深度

R21=U；U—孔最终钻削深度

R26=Z；Z—零件右端面的工件Z向坐标值

主程序如下：

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

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

︙

N40 G90 G00 T02 D02；调用钻孔刀具

N45 M03 S1000；主轴正转，转速1000r/min

N50 R3=C R9=F R6=K R21=U R26=Z；参数设置(www.xing528.com)

N55 L223；调用深孔钻削加工的用户R参数程序

︙

N85 M05；主轴停止

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

R参数程序如下：

L233；R参数子程序名

N010 R1=1；计数器置初始值1

N015 R28=TRUNC[R21+R3]/R6；根据钻削深度和安全距离计算循环次数（取整）

N020 R29=[R21+R3]/R28；计算每次钻削深度

N025 R30=R29；将R29的值赋给中间变量R30

N030 G00 Z=R3；刀具快速移动到工件右端面钻孔安全距离处

N035 MARKE1：G01 G91 Z=-R30 F=R9；钻孔

N040 G00 Z=R29；将刀具移至钻孔起始点

N045 G04 P100；暂停1s

N050 G00 Z=-R29+1；以快速进给速度将刀具移动到上次孔深前1mm处

N055 R1=R1+1；计数器累加1

N060 R29=R29*R1；钻削深度叠加

N065 IF R1＜=R28 GOTOB MARKE1；如果R1小于或等于R28，则跳转到MARKE1标志符

N070 G90 G00 Z=R2；转换成绝对方式，将刀具移至钻孔起始点

N075 RET；R参数子程序结束，返回主程序

（3）FANUC 0i数控系统对深孔钻削加工的用户宏程序

自变量含义：

#3=C；C—安全距离

#6=K；K—每次循环的钻削深度

#9=F；F—刀具进给速度（mm/r）

#21=U；U—孔最终钻削深度

#26=Z；Z—零件右端面的工件Z向坐标值

主程序如下：

O××××；主程序名

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

︙

N40 T0202；调用钻孔刀具

N45 M03 S1000；主轴正转，转速1000r/min

N50 G65 P223 C__F__K__U__Z__；调用深孔钻削加工的用户宏程序

︙

N85 M05；主轴停止

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

宏程序如下：

O233；宏程序名

N010 #1=1；计数器置初始值1

N015 #28=FUP[#21+#3]/#6；根据钻削深度和安全距离计算循环次数（上取整）

N020 #29=[#21+#3]/#28；计算每次钻削深度

N025 #30=#29；将#29的值赋给中间变量#30

N030 G00 Z#3；刀具快速移动到工件右端面钻孔安全距离处

N040 WHILE [#1LE#28] DO1；如果#1大于#28，则程序跳转到N120程序段

N045 G01 W-#30 F#9；钻孔

N050 G00 W#29；将刀具移至钻孔起始点

N055 G04 P100；暂停1s

N060 G00 W[-#29+1]；以快速进给速度将刀具移动到上次孔深前1mm处

N090 #1=#1+1；计数器累加1

N100 #29=#29*#1；钻削深度叠加

N110 END1；返回循环体

N115 G90 G00 Z#3；刀具快速移动至工件右端面钻孔安全距离处

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