蜗杆加工

阳光宝宝

蜗杆有模数M=2.5 头数Z1=4 齿顶高系数h*a1=1导程P=31.4 最大径=36.5 中经=31.5 如何计算小径 任何编程 第一次接触蜗杆 一头雾水

jiaweicz

第一次做就做4个头的蜗杆，有点难度啊

正在连接...

) S7 e" m7 b6 k( h) \* }全齿高一般是2.25，既然你齿顶高系数是1了，底径=36.5-2.5*2.25，编程的话我不知道你对宏程序了解多少。下面是一个蜗杆宏程序，你自己慢慢研究吧。
. Q8 l2 M$ e6 S4 w
6 Z& g0 E% {# ^+ | x i$ q
$ W3 x4 H! |4 p0 u: \

D=52 d=34.4模数4四头，牙型角20度，刀宽2mm角度LE20度，

P=3.14159*4*4=50.26544（导程等于摸数*3.14159*头数）W=0.7M =2.8（蜗杆底部宽度）

- T& l' R8 S! P# a

/ _. P0 `7 W2 |) x) A
0 b/ Z q8 W( x$ s" [/ n

程序：

O0001

' ?: k- s' X1 y5 Z! S* M" h
8 Z' Z o9 q% R

G99M03S300

G97T0101M8

9 D* x, m0 ?* }8 h/ j

G0X56Z10

#1=52（蜗杆大直径）

6 q; E0 v3 \1 |2 W* m8 t2 Y& \5 m/ X

#2=34.4（蜗杆底直径）

Z. I% }. |* e6 ~7 ^8 m
+ R" ^( z- n. C% w5 \8 l

#3=0.4（底部宽度减去刀宽的一半）

0 _' e" t3 c8 N8 r2 Q3 h' u

#13=360000/4（算出每一头的角度）

3 |5 b7 f2 U8 G8 n l; w

N10#4=0.2（每层吃刀量）

8 ~* p4 x! V1 c
2 ]. w2 H- o3 m' r5 `/ _

#1=#1-#4（大直径递减）

IF[#1LT#2]THEN#1=#2（条件判断防止过切，强制赋值。当#1小于#2，那么#1等于#2）

% ^. t, P# e! q/ q. c4 e0 J

#5=[#1-#2]/2*TAN[20]+#3（三角函数算出每层需要赶刀的宽度）

8 l7 {4 `3 c! b- r
- V; S8 ]3 \2 [* O; c5 g$ y9 g1 ~

#6=0（赶刀初始值）

, O5 o( S) L: D* G

N20 #12=0（Q的初始值,不能乱放）

#7=10+#6（计算右赶刀每次的定位）

# V" K1 c5 M6 H9 G" e* ~, @

G0 X56 Z#7（螺纹定位）

N21G0X#1（X进刀）

/ }6 D0 H! S! m& d2 @7 x

G32 Z-95 F50.265 Q#12（螺纹车削）

# a( c" I& s. W. k3 j1 H+ _- s

G0 X56（退刀）

: u2 J: \1 B6 B$ p" o
: H! T9 s+ G4 G2 h

G0 Z#7（定位退刀到起点位置）

' L4 Y& {) }; l: D/ t$ N
! N6 [1 J2 y' `

#12=#12+#13（角度递加）

8 |: h0 ~' o" Z7 u3 |

IF[#12LT360000]GOTO21（如果Q值小于360度跳到N21执行下一头）

b5 Q- T( |% ~0 E' Z2 ]3 x

IF[#6EQ#5]GOTO30（如果右边赶刀宽度到达跳出循环）

7 ?- n! ?3 R3 }6 }/ X) j
; J3 h0 |3 v X0 {3 a

#6=#6+1.5（每刀赶刀量加1.5）

2 n' L: [' W% ~9 Y4 S; [5 U

IF[#6GT#5]THEN#6=#5（防止过切强制赋值）

IF[#6LE#5]GOTO20（如果右边赶刀宽度没有到达跳转N20继续循环）

N30#6=0（赶刀初始从新赋值）

# l/ m0 y1 a) U7 R* H

N40#12=0（Q的初始值,从新赋值，不能乱放）

#6=#6+1.5（赶刀宽度递加）

) d7 }+ e+ i4 _. s7 T' Y6 p

IF[#6GT#5]THEN#6=#5（防止宽度过切，强制赋值）

) q0 j" A7 [$ _& Z" s

#8=10-#6（计算Z定位向左赶刀）

G0 X56 Z#8（螺纹定位）

N41G0X#1（X进刀）

/ S6 ]$ A( V2 P2 B6 _

G32 Z-95 F50.265Q#12（螺纹车削）

6 \! C% V* q. j3 z2 w
+ G: Q( G0 O( v5 n: h& a; H5 w& I

G0 X56 （螺纹退刀）

Z#8（退回上一次加工起点）

2 Y& z0 b W1 N* N" { U
: l9 x c8 f/ @9 q6 Z

#12=#12+#13（左边赶刀的角度递加）

: @5 ]9 E" [5 R1 X

IF[#12LT360000]GOTO41（如果Q值角度小于360度跳转N41继续下一头）

* I& d, q2 R8 ^

IF[#6EQ#5]GOTO50（防止死循环，如果宽度到达跳出循环）

. p7 `: t1 l- P2 M; D! @% O* q8 g% v
5 {% \0 B9 D% B* p3 z

IF[#6LE#5]GOTO40（如果左边赶刀宽度没有到达跳转N40继续赶刀）

# b* R3 `. f4 x& p0 k5 G3 Y( M

N50IF[#1EQ#2]GOTO60（如果螺纹深度到达跳出循环）

( O! L" j: ^% r

IF[#1GE#2]GOTO10（如果没有到达跳转N10继续下一层）

& r( ?3 }. b) A8 M& M% V- n5 ~

N60G0X100.

Z120.

2 Q" G6 \4 Y9 H T/ }

M30

1 O8 ], m b. m; \

: D- N" |9 V _9 B, P) K

完整程序如下：

& R) c3 H, a+ a5 [) g

O0001

6 c) F3 {; D9 j. E5 Q$ F
. w. I/ a/ }- I0 E7 p+ m2 W% M& ^

G99M03S300

G97T0101M8

7 n& Q+ L7 i5 P' o% X

G0X56Z10

' O, S) c: C& n! D+ i8 a0 Q) f. |7 m5 l ]
$ Z1 Y5 D' Y; _- b' s! E1 I

#1=52

! C% }, B# ~" a

#2=34.4

#3=0.4

8 J/ C9 ^9 ?; |" D$ q

#13=360000/4

3 k, {1 \5 S( `9 c
# p; Y+ S) _' V5 G

N10#4=0.2

6 [1 n5 X' M% q5 B+ N
5 L/ X2 e' r* @( ^5 P! K

#1=#1-#4

4 ^2 q' R% c1 n5 c
$ f1 h$ A; w0 [

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

6 c6 Y: h& C3 a2 x

#5=[#1-#2]/2*TAN[20]+#3

( [' _; ^) k1 G. x, q

#6=0

N20#12=0

#7=10+#6

$ |# v% X# }) |/ U- o
# D8 _# X1 Y; T/ B8 J j

G0 X56 Z#7

N21G0X#1

G32 Z-95 F50.265 Q#12

7 I9 i$ `5 y1 [- q# q5 B4 z* A

G0 X56

* |9 L9 y- b+ p- n9 F+ [& V

G0 Z#7

, r9 s: q1 [ d- C6 e1 B
; s/ P* c) x& u

#12=#12+#13

& d' d4 V! z$ b2 L% a
# f' P& z, ~9 ^) B. e# d

IF[#12LT360000]GOTO21

* l* v l, q8 M( r/ q& Z+ i9 R% H8 Z

IF[#6EQ#5]GOTO30

' \' `9 q% ?0 U, ~0 U5 Z8 C
# v4 D/ @4 Y9 J; \) C0 x

#6=#6+1.5

! l w# L* {, c4 F/ o& Y

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

0 V% a; z! f+ I( @- Q
\, |3 I2 n* x+ U

IF[#6LE#5]GOTO20

N30#6=0

" I2 m# Y- w1 M: `* j H3 N

N40#12=0

. m; R. Q9 m$ V* `, c S7 l. @
$ [* u+ z; U' ~5 M

#6=#6+1.5

# |% N% Z+ {7 C$ h0 h
- v! ?/ N3 L3 V: J! X3 `! Z( C/ Y+ B

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

#8=10-#6

7 F" @- f) ]8 C, x" b
! @3 s* a! }7 y" {3 S" n

G0 X56 Z#8

N41G0X#1

f# Q4 H$ p" I& x

G32 Z-95 F50.265Q#12

G0 X56

% J* K0 m7 |4 L

Z#8

#12=#12+#13

8 i) o- R) M3 \( P! `* P- o

IF[#12LT360000]GOTO41

3 {( ?7 `" b0 o1 m
& \& ^- N) l4 `0 J9 M$ ]) d

IF[#6EQ#5]GOTO50

IF[#6LE#5]GOTO40

3 b: O/ ]1 n: g" P# X5 F
% k& i" ^: C4 ?+ e( z0 E0 s8 L

N50IF[#1EQ#2]GOTO60

1 f8 z+ I. ?/ D/ w m8 G7 a: h

IF[#1GE#2]GOTO10

" Q/ _; x: q+ l; H$ f3 c0 h
5 {$ e8 H" ?2 L1 n( p/ d* T3 l

N60G0X100.

Z120.

' w0 d+ ]6 U+ y8 n
! p1 Y6 V1 d& i, h. K( v! {8 g$ H

M30

韩寒11

蜗杆得用宏程序，楼上的宏程序很好，楼主认真研究一下

xiaobing86203

三楼大神正解！

aa2852029

厉害，看一看。学一学

XIEYANG1985

正在连接... 发表于 2017-12-31 15:53
% o2 c0 g) h; H. A" m% S& L全齿高一般是2.25，既然你齿顶高系数是1了，底径=36.5-2.5*2.25，编程的话我不知道你对宏程序了解多少。下 ...

1 {' P+ [4 ^" e# g9 b) g谢谢楼主

章华鹏

谢谢。正好想学习一下宏程序。

wx_lbY2wG5b

宏不会用。我一般做多头梯形丝杆螺纹。这个能用G78做吗？

正在连接...

正在连接... 发表于 2017-12-31 15:53
6 d# _% e4 u2 V* m全齿高一般是2.25，既然你齿顶高系数是1了，底径=36.5-2.5*2.25，编程的话我不知道你对宏程序了解多少。下 ...

: F0 f7 I I- f; r) Z# c/ B7 `只是给他参考
7 Y" _- Y1 F) d' S' j: ?5 H