宏程序
- 格式:doc
- 大小:23.00 KB
- 文档页数:3
深孔钻程序:
L1
R1=-40 R2=-10 R3=-120
G0 Z3
N15 G1Z=R1 F100
/G0Z30 ;(跳过为断屑,执行排屑)
G0Z=R1+1
R1=R1+R2
IF R1>=R3 GOTOB N15
G1 Z=R3 F100
G00 Z30
M17
螺旋线钻铣闭孔1
R1=150 园直径
R2=80 刀具直径
R3=(R1-R2)/2 实际计算半径
R4=50 孔深度
R5=1 每圈下刀深度
R6=3 起始深度 R1R2R2R1=200;设置铣圆半径G91G2X=R1CR=R1/2F200;圆弧方式进刀,增量I=-R1;铣削整圆X=-R1CR=RI/2F500;圆弧方式退刀G90;恢复绝对坐标RETR7=0 X坐标值
R8=0 Y坐标值
TRANS X=R7 Y=R8
G0 X0 Y0
G111 X0 Y0
G0 Z=R6
G1 AP=0 RP=R3
N5 G2AP=0 RP=R3 Z=-R5
R5=R5+1
IF R5<=R4 GOTOB N5
G1 AP=0 RP=R3
G2 AP=0 RP=R3
G1 RP=0
TRANS
G90
M17
螺旋线钻铣闭孔2
R1=150 园直径
R2=80 刀具直径
R3=(R1-R2)/2 实际计算半径
R4=50 孔深度
R5=1 每圈下刀深度
R6=3 起始深度
R7=(R4+R6)/R5
G91 G1 X=R3/2 Y0 200
G2 X=R3/2 Y0 I=-R3 J0 Z=-R4 TURN=R7
G1 X=-R3/2 Y0
G90
M17
镗孔
R1=0 初始进刀深度
R2=-6 试刀深度
R3=-100 孔最终深度
R4=200 退刀安全距离
G1Z=R1+3F5000
G1Z=R1+R2F20
G0Z=R4
M5
M00
M3
G1Z=R1+3F5000
G1Z=R3F20
G4S2 G0Z=R4
M5
M17
铣内圆内圆弧子程序
N00 R1=0
N05 R2=10 圆弧半径
N10 R3=560 内圆直径
N15 R4=80 刀具直径
N20 R5=0.5 每次进刀深度
N25 G55 G0 G64 X0 Y0 M3S500 F2000
N30 AA:
N35 R6=SQRT(R2*R2-R1*R1)
N40 R7=(R3-R4)/2-2*R2
N45 R8=(R3-R4)/2+R6
N50 G1X=R7
N55 Z=R2-R1
N60 G2 X=R8 I=R8/2
N65 G2 I=-R8
N70 R1=R1+R5
N75 IF R1<=R2 GOTOB AA
N80 M30
铣内圆外圆弧子程序
N00 R1=0
N05 R2=10 圆弧半径
N10 R3=560 内圆直径
N15 R4=80 刀具直径
N20 R5=0.5 每次进刀深度
N25 G55 G0 G64 X0 Y0 M3S500 F2000
N30 AA:
N35 R6=R2-SQRT(R2*R2-(R2-R1)*(R2-R1))
N40 R7=(R3-R4)/2-2*R2
N45 R8=(R3-R4)/2+R6
N50 G1X=R7
N55 Z=R2-R1
N60 G2 X=R8 I=R8/2
N65 G2 I=-R8
N70 R1=R1+R5
N75 IF R1<=R2 GOTOB AA
N80 M30