利用三角函数分层车削T型曹

利用三角函数分层车削T型曹

  看上图我们可以看出,T槽的大直径为30,小直径为12,槽底宽度为20,平面的槽中间的长度为30长,我们选用3毫米切刀,用三角函数算出每一层的槽宽,分层车削。,下面我们来看一下编程思路:

M3S800G99

T0101M08

G0X31.Z10.

Z-30.(平面到槽中间长度为30

#1=30(大直径30

#2=12(曹底直径)

#3=1(吃刀量为1毫米)

N10#1=#1-#3(深度递减)

IF[#1LT#2]THEN#1=#2(防止深度过切,强制赋值)

#4=[#1-#2]/2*TAN[15]+8.5(运用三角函数算出锥度的宽度,槽底宽度为20,减去一个3毫米刀宽所以左右加上8.5

#5=0(赶刀量初始值)

N20G0X[#1+#3+0.2](每一层的X定位)

Z[-30+#5]Z方向的定位,往右赶刀)

G1X#1F0.12(径向车削)

IF[#5EQ#4]GOTO30(防止宽度死循环,宽度到达跳到N30实现往左赶刀)

#5=#5+2.5(赶刀宽度每次加2.5

IF[#5GT#4]THEN#5=#4(防止宽度过切,强制赋值)

IF[#5LE#4]GOTO20(条件判断,如果赶刀宽度没有达到继续跳转N20循环继续右赶刀)

N30G0X31.(退刀)

Z-30.Z退刀到起刀点)

#5=0(赶刀宽度从新赋值)

N40#5=#5+2.5(赶刀宽度递加防止中间浪费一刀)

IF[#5GT#4]THEN#5=#4(防止宽度过切,强制赋值)

G0X[#1+#3+0.2]

Z[-30-#5]Z定位往左赶刀)

G1X#1F0.12(径向车削)

IF[#5EQ#4]GOTO50(防止宽度死循环,如果宽度到达跳到N50

IF[#5LE#4]GOTO40(条件判断,如果左边宽度没有到达,跳转N40继续往左赶刀)

N50IF[#1EQ#2]GOTO60(防止深度死循环,如果深度到达跳转N60退刀)

IF[#1GE#2]GOTO10(如果深度没有到达跳转N10深度递减继续循环)

N60G0X100.X退刀)

Z130.

M30

完整程序如下:

 

M3S800G99

T0101M08

G0X31.Z10.

Z-30.

#1=30

#2=12

#3=1

N10#1=#1-#3

IF[#1LT#2]THEN#1=#2

#4=[#1-#2]/2*TAN[15]+8.5

#5=0

N20G0X[#1+#3+0.2]

Z[-30+#5]

G1X#1F0.12

IF[#5EQ#4]GOTO30

#5=#5+2.5

IF[#5GT#4]THEN#5=#4

IF[#5LE#4]GOTO20

N30G0X31.

Z-30.

#5=0

N40#5=#5+2.5

IF[#5GT#4]THEN#5=#4

G0X[#1+#3+0.2]

Z[-30-#5]

G1X#1F0.12

IF[#5EQ#4]GOTO50

IF[#5LE#4]GOTO40

N50IF[#1EQ#2]GOTO60

IF[#1GE#2]GOTO10

N60G0X100.

Z130.

M30

如果掌握以上编程思路,我们就可以轻松的对我们实际加工中的大螺距T牙和蜗杆实现分层车削,合理保护刀具,减少程序的烦琐。请仔细研究程序中的编程思路,以及三角函数的用法,只有搞懂编程思路,和三角函数的运用,我们在实际加工中才能合理的编制出程序,实现加工。              

                          


发表评论

您的电子邮箱地址不会被公开。 必填项已用*标注