三章三角函数分层车削加工工艺.pdfVIP

看上图我们可以看出，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继续往左赶刀）

Lookingatthepictureabove,wecanseethatthelargediameteroftheTgrooveis30,thesmall

diameteris12,thegroovebottomwidthis20,andthelengthofthemiddleoftheflatgrooveis30long.

Wechoosea3mmcutter,usetrigonometricfunctionstocalculatethegroovewidthofeachlayer,and

performlayeredturning.,let’stakealookattheprogrammingideas:

M3S800G99T0101M08G0X31.Z10.Z-30.(Thelengthfromthenetothemiddle

ofthegrooveis30)#1=30(largediameter30)#2=12(caobottomdiameter)#3=1

(cuttingamountis1mm)N10#1#1-#3(Dependingdepth)IF[#1LT#2]THEN#1#2

(preventdepthovercutting,forcedassignment)#4=[#1-#2]/2*TAN[15]+8.5(use

trigonometricfunctiontocalculatethewidthofthetaper,thewidthofthegroove

bottomis20,subtracta3mmtoolwidth,soadd8.5totheleftandright)#5=0

(initialvalueofthetoolrushamount)N20G0X[#1+#3+0.2](Xpositioningofeach

layer)Z[-30+#5](PositioninginZdirection,drivethetooltothe