蜗杆加工

阳光宝宝

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

jiaweicz

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

正在连接...

! [% n$ p7 k5 Z, g  g. r
3 a; G. n5 S3 G% C+ [全齿高一般是2.25，既然你齿顶高系数是1了，底径=36.5-2.5*2.25，编程的话我不知道你对宏程序了解多少。下面是一个蜗杆宏程序，你自己慢慢研究吧。

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

+ C$ E+ B; y$ y# b* U$ m

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

# F5 e3 S# I6 ?% w: @- z

   

$ R) a5 G/ t1 {: E8 y% H
0 G; t  p! [, i- u

程序：

' U) E+ I) g9 [3 f# r/ @: o. N+ b
9 |! V* T( h$ P

O0001

& p2 M$ d) _. T  N! w1 }2 q

G99M03S300

% F; |. @! e# b2 J5 J

G97T0101M8

2 u& g- C5 T! n& ~1 H$ e

G0X56Z10

#1=52（蜗杆大直径）

#2=34.4（蜗杆底直径）

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

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

! L9 Y9 l% C7 Y

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

7 i& X8 C7 W4 \0 E0 u$ g

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

7 n( z. l' K9 ^* q% e
, y/ u/ _" e2 a5 o4 V& E) B

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

3 y3 Y  i* k" E1 x

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

; y, |# z6 E% ~. u! ?7 [

#6=0（赶刀初始值）

7 a) p# Y$ B+ ]+ n5 s$ V4 B2 e

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

5 s3 o3 O3 S4 k" j5 A9 F
0 p  A! w% I* m

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

G0 X56 Z#7（螺纹定位）

" Z: Y! w9 R% f# v
: c8 K# v' M  Z2 Y" T$ k

N21G0X#1（X进刀）

3 B# L! Q4 b2 ~; v! t
+ h. n) T; h& w7 S) v

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

. L. ^' I+ p/ |+ z
. @/ O* B7 d9 N8 h5 Y$ c% v( x' A& ]

G0 X56（退刀）

; v* r0 h, F3 |) g! _0 [

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

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

8 U3 I7 P% U( j  U8 Z/ C
: Z% z; K( a9 ^: g

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

# b. o5 [) e. ~

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

* \( c# B7 P3 [5 P) i/ J# S
/ q3 @8 C" v: T- N) k

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

* l& d6 A, a, f8 I

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

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

; k0 n% s. p/ r) ^0 z" i" w# V+ F
2 H9 j( j$ Z# m# K

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

+ [* E4 b) W! F
+ m! Q% @% d6 E) ?. L0 J9 y

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

' }* l0 u0 g0 x' u; m& }! I* ~
/ e. ~% m3 B# K

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

6 S: v) n8 A  F; F4 X/ {$ b
) Q( l- w' M# b0 b8 Q9 z! I( p

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

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

: n# n+ S  b- p% I# x, }
5 C9 h, C; S: B

G0 X56 Z#8（螺纹定位）

/ A, P1 ?  {- y4 ~; a2 |, E$ m& g" D

N41G0X#1（X进刀）

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

G0 X56 （螺纹退刀）

1 q6 Z! A1 @; ?

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

/ R5 g# U. c: w( K) W# n; z  I" @
) p) T' i7 w1 W- p$ W4 e% A

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

% @+ V! ~- R8 y; m
5 W- L* R4 y1 l! W

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

7 m5 M! g8 R2 X

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

, Q, x1 l" K7 H( a% P  m

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

# a2 |+ ?* L. e7 ]' g, i* {

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

2 H+ u' |$ [; {0 L/ a

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

1 A6 {  H, C( }2 V  T

N60G0X100.

4 [6 @1 N, b3 P& D0 u

Z120.

* Z. W3 _5 z( M+ a( Y& `& k1 e

M30

7 \6 E3 [6 A. A) D6 s

完整程序如下：

" z  A' l) {) F$ c
) K" a6 o# e  K- I5 e6 V+ u3 k

O0001

G99M03S300

G97T0101M8

* {% e  G4 C1 s( N4 R
. p" X' F3 F, m$ [1 g

G0X56Z10

$ F3 W$ y& J! h( Z& `% e* _; K

#1=52

7 H! p2 q, R6 q' @7 y- v
. q3 P' x# R; }% X" L

#2=34.4

#3=0.4

9 v! C+ p; e+ c  q( R% L

#13=360000/4

- c) ]- w" Z1 d2 o' V* W

N10#4=0.2

$ P$ e) T# N+ g6 K; N8 ]

#1=#1-#4

6 x2 r: M" ]: f) |8 x) j: B

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

4 p  e9 t' y) i

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

+ ~$ I4 }; q( F! a: L

#6=0

N20#12=0

: H4 k9 s/ A$ e6 ~. Y

0 r, J- n% {& a
  I9 L" H5 Z5 z! v

#7=10+#6

2 E. d( q" }) |/ b/ j9 V

G0 X56 Z#7

/ M: B# ^! n  p1 z

N21G0X#1

) W8 ~: j* F. U; p

G32 Z-95 F50.265 Q#12

; K) Y+ T4 ~& m2 U/ {$ Z
5 y/ @+ C0 A% @: U) p

G0 X56

0 w6 o6 P* A) X: E' A+ R- x8 e

G0 Z#7

# p7 w. u" O$ B: l8 O" p

#12=#12+#13

! d4 b7 H4 O  [# s- C7 @1 _' ^; W

IF[#12LT360000]GOTO21

( l/ w# e  o$ p9 X! R* t7 X$ u# T) o

IF[#6EQ#5]GOTO30

#6=#6+1.5

- B  P1 S6 I: C- q0 P3 b5 r6 w
, G8 R7 y* R) \$ ]: B/ V; N0 q

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

( N/ R; P$ l+ W+ N1 Q. h* C
$ A6 R3 ?" L, P) P( x5 U3 b4 n4 @" o

IF[#6LE#5]GOTO20

5 A9 h* Q5 M% g& n* R/ D

N30#6=0

: K" O9 o3 c9 g3 D; ~9 h9 D

N40#12=0

#6=#6+1.5

3 c) D; M! O. A  c4 y9 R7 \
+ e) b' n4 d8 J% X* h

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

#8=10-#6

G0 X56 Z#8

2 J: r0 }7 Z1 H

N41G0X#1

7 D6 n! y( H8 ~4 j; Z8 e' I! `) X

G32 Z-95 F50.265Q#12

0 N* p9 ^& m3 x+ w+ P% O

G0 X56

6 \$ c1 y- T# u! V3 u' p" f
  d2 R! C7 n1 R" }' P' V

Z#8

; |* t8 C4 I9 d, T) X8 l

#12=#12+#13

- `  B$ N. X: i6 m8 Y$ O7 z3 h8 P

IF[#12LT360000]GOTO41

: ]) t* U. A6 b1 r

IF[#6EQ#5]GOTO50

; Z3 W. z9 j8 p6 `" G

IF[#6LE#5]GOTO40

; d4 b  `( G9 m$ d9 H
; U0 T- a* `4 ?# J4 w' N2 _

N50IF[#1EQ#2]GOTO60

7 c3 H" ~0 f" v

IF[#1GE#2]GOTO10

  w. f  }. h" D+ \, H3 i& j9 ]

N60G0X100.

2 b+ B# ~# O* B! }
  Q# u7 N( B6 a  {

Z120.

7 A8 h" @# F7 u% u6 u

M30

/ k+ O) ?3 a7 N* O% E

韩寒11

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

xiaobing86203

三楼大神正解！

aa2852029

厉害，看一看。学一学

XIEYANG1985

正在连接... 发表于 2017-12-31 15:53
3 Q! n0 o9 `  {; c全齿高一般是2.25，既然你齿顶高系数是1了，底径=36.5-2.5*2.25，编程的话我不知道你对宏程序了解多少。下 ...

谢谢楼主

章华鹏

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

wx_lbY2wG5b

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

正在连接...

正在连接... 发表于 2017-12-31 15:53
- m  X9 K" }4 Y; J2 M2 e' M全齿高一般是2.25，既然你齿顶高系数是1了，底径=36.5-2.5*2.25，编程的话我不知道你对宏程序了解多少。下 ...

只是给他参考
, s) P( K6 k- u" v, v