机械必威体育网址

 找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
查看: 5883|回复: 14
打印 上一主题 下一主题

蜗杆加工

[复制链接]
跳转到指定楼层
1#
发表于 2017-12-31 00:06:01 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
蜗杆有模数M=2.5 头数Z1=4 齿顶高系数h*a1=1导程P=31.4 最大径=36.5 中经=31.5 如何计算小径  任何编程    第一次接触蜗杆 一头雾水, U1 p5 X6 c  N9 f% [
回复

使用道具 举报

2#
发表于 2017-12-31 11:30:04 | 只看该作者
第一次做就做4个头的蜗杆,有点难度啊
回复 支持 1 反对 0

使用道具 举报

3#
发表于 2017-12-31 15:53:49 | 只看该作者
本帖最后由 正在连接... 于 2017-12-31 15:57 编辑 - q$ d+ D* C+ k: A" ~7 l
8 y  m0 g- X7 C1 B
全齿高一般是2.25,既然你齿顶高系数是1了,底径=36.5-2.5*2.25,编程的话我不知道你对宏程序了解多少。下面是一个蜗杆宏程序,你自己慢慢研究吧。+ m0 ~" z  o! u5 ]" ]9 c; y) ~
  n2 z+ g6 \8 U4 X9 Q! C5 O
  Y' D5 m# v5 K% {
D=52   d=34.4  模数4 四头, 牙型角20度,刀宽2mm 角度LE20
: x$ b" R0 L& B
+ {7 i- Q% [9 S5 a5 Q( K- u+ a; {
P=3.14159*4*4=50.26544(导程等于摸数*3.14159*头数)   W=0.7M =2.8(蜗杆底部宽度)

, K# B' p; v& \  Z5 V) {& m
8 C- Y5 f3 G8 y1 o
   
4 S+ ^2 p6 f5 j3 A- G1 A( h
; j0 `. {9 L- L3 w6 Z
程序:

1 K# n( x, P  ^, F; }8 L" p* U

8 k' I" Q/ Y: \8 Y0 `9 B2 h
O0001

% f6 Z% N' k# C0 }# e

  u) \' i/ i$ J2 m' Q* ?( y8 g" u
G99M03S300
9 n4 [0 H" R7 \1 d& w' l

" V, A+ e& W0 @: ^! z: J% D  V5 K7 K
G97T0101M8

3 F/ b6 v/ ?2 ]% C0 N/ f; g' F

. C4 G. E7 V$ u' Y. t# t* h- f
G0X56Z10

( h! M! U1 D& S
# ~' v9 ]* z  W3 e" \6 t3 ]
#1=52(蜗杆大直径)
8 @3 T* v/ V) [% y- B

6 j/ i3 C8 M1 B
#2=34.4(蜗杆底直径)
* d' F9 u! P, I, b- J
* x( [1 [0 r, ]2 K
#3=0.4(底部宽度减去刀宽的一半)
8 m% b1 m0 X8 L- i1 b$ }9 e& @7 D' d
: l8 a2 Y$ R0 ~$ R  Q8 {) n" d
#13=360000/4(算出每一头的角度)

1 T. ]( |0 V. h$ g

5 Q* p* C/ s  b6 n1 Y# g7 O- W
N10#4=0.2(每层吃刀量)

3 t6 s( k  C6 d1 E$ p$ D
6 V  h: I* t6 [8 {% S& o3 C
#1=#1-#4(大直径递减)

1 H% z) M3 F" m; C
3 e2 O0 H: w; e. z2 C
IF[#1LT#2]THEN#1=#2(条件判断防止过切,强制赋值。当#1小于#2,那么#1等于#2)
/ K* V- `/ r9 S

' a' |. j& S6 m. l9 h' _6 D8 J
#5=[#1-#2]/2*TAN[20]+#3(三角函数算出每层需要赶刀的宽度)

2 \: D& t% b+ h2 o% N/ {
* @& N2 m- p2 T" n8 R# Y
#6=0(赶刀初始值)

# ?% `7 z0 h) \9 o
. Q7 A( H, C- D/ `) o' z
N20 #12=0(Q的初始值,不能乱放)
2 G6 V: Z+ R0 [8 U& g6 i3 Q7 i
8 e8 O7 d+ H0 ~, m
#7=10+#6(计算右赶刀每次的定位)

* h& z0 G8 Y! Y  Q+ G  J

  @* W2 [% U+ c# R
G0 X56 Z#7(螺纹定位)

0 o! J; D6 r3 I4 F: O7 \
& D( L, `3 O+ t% L( y
N21G0X#1(X进刀)

) x( S0 ^& X% o* g" I5 g$ g! Y
: u% D  A6 |, ^5 P
G32 Z-95 F50.265 Q#12(螺纹车削)
+ p+ v" x4 h, H$ `3 {: S, B$ v
2 Q( `  j0 [; H4 b; K
G0 X56(退刀)

, G, _0 u" q$ Z; ]% t
$ }9 E5 {8 d2 v3 H0 b% c# P& I
G0 Z#7(定位退刀到起点位置)
% W( C" Y% w* x

* [5 M- o7 y; m$ _. U
#12=#12+#13(角度递加)
9 N, U( u( H# o9 A" }2 E# R/ M

. E% w! j: s. p) [# d0 D( D, q3 |
IF[#12LT360000]GOTO21(如果Q值小于360度跳到N21执行下一头)
* R. ~# ?1 j8 \% M, v0 F0 ~; ]
' ~' e% q# }% `: s% S5 M8 {2 a
IF[#6EQ#5]GOTO30(如果右边赶刀宽度到达跳出循环)
' l  ?6 j3 a$ }. e
0 }; [! {  T  y
#6=#6+1.5(每刀赶刀量加1.5)
' e; {9 Y. L  _) S$ O: G
! @' D2 H4 u( p! [3 \- _
IF[#6GT#5]THEN#6=#5(防止过切强制赋值)
5 q2 ]1 w' y+ Q' n

' m- K7 s# }* T
IF[#6LE#5]GOTO20(如果右边赶刀宽度没有到达跳转N20继续循环)
# I0 w; @: F" M7 S
# C7 {# L0 c1 G7 `
N30#6=0(赶刀初始从新赋值)
1 N. Y" `' E+ T" E
. ^; y# W) E& i" }: z  y. F* |
N40#12=0(Q的初始值,从新赋值,不能乱放)

$ n1 m/ Z% `' I, M1 h  }7 t% i; Z" r
& _+ X% b  O/ `7 Y
#6=#6+1.5(赶刀宽度递加)

/ i: U% x( V; {$ ~4 O

5 |. Q* K: R5 J- f
IF[#6GT#5]THEN#6=#5(防止宽度过切,强制赋值)
! V3 _* Y" s, f% f2 t) A9 z. v
# F5 h7 o- V7 z2 p& |
#8=10-#6(计算Z定位向左赶刀)
  x& v8 f3 Z' u* x) U

) F) [. R) ]5 R  m; Q4 p
G0 X56 Z#8(螺纹定位)

$ O9 A2 ^# A, }" A4 W

/ ?9 y0 r7 I) _
N41G0X#1(X进刀)

. a' e. a2 V+ g5 E
0 i# J7 ?6 R  _1 E) d" C4 w
G32 Z-95 F50.265Q#12(螺纹车削)
/ {# T/ t) E7 l0 v+ h. \, S& c" j
8 f- [/ n! z: I  Y# B
G0 X56 (螺纹退刀)
9 T0 o9 p2 ?, g# ?: w8 t
% q( ]* B" b" h
Z#8(退回上一次加工起点)

) j* [4 c4 C' ~! Z! x4 n

: I5 T: }, B6 [2 q# b
#12=#12+#13(左边赶刀的角度递加)

0 {* X! L; W8 r7 m) n
" D8 C1 `* o. s' o4 h
IF[#12LT360000]GOTO41(如果Q值角度小于360度跳转N41继续下一头)
* C" j2 {- v, y% y1 j" i  j& Z
5 N' s6 j( L1 O1 l8 T1 b8 u
IF[#6EQ#5]GOTO50(防止死循环,如果宽度到达跳出循环)
% |- H# K5 [) P6 o, S

3 N' n$ W% c# V' m3 c4 d
IF[#6LE#5]GOTO40(如果左边赶刀宽度没有到达跳转N40继续赶刀)
, L3 p. j7 I1 S& u" \+ P
% X3 `9 Z) G% u' J' q' G6 H2 X
N50IF[#1EQ#2]GOTO60(如果螺纹深度到达跳出循环)
/ W7 W+ p, e, x

0 [& D. I9 a, |7 n8 h3 s
IF[#1GE#2]GOTO10(如果没有到达跳转N10继续下一层)

5 T+ X* n5 F8 Y* k$ R4 M
8 ]$ @! I& Q$ z! X# {: m
N60G0X100.

; B& Q9 U! m6 b4 H

1 W; [) X% s% I7 E" a
Z120.
7 z( s* k1 J4 Q0 C( j

0 q/ s. ~, ~+ N! {9 n6 Q4 ~
M30

6 Y5 s0 Y( B. \% F0 Q' a
6 \6 d" v: F9 S1 `& r

% p5 K+ j: V3 [7 S$ D$ Q9 A
; s' |5 y, }9 C% s' r; [' {
完整程序如下:

* l( }; F2 _; P. D  w* q! Z' S  k
6 |. C* I+ M, U2 j
O0001

4 p! L, P3 V" k" q4 W1 V5 Z! _
; O' `, Q) R! {2 C# c. Y6 a$ x3 `
G99M03S300

* P( N) c4 H  D4 t. x# v8 _

/ a3 _8 F2 }7 V5 V) r
G97T0101M8
/ S$ {* i+ y9 M' J$ Z
! N( l0 R/ h/ J
G0X56Z10

+ ~& V* d$ [9 F. `( p- k; Y, g

% }  ]- B/ v7 E: R
#1=52

9 F: K9 s/ G& I" `
' p! \7 U( }- P
#2=34.4
% p& d* o6 x* E

' ?4 q# h( q, P- n
#3=0.4
7 d: V/ V: @. m; T

  G2 s- ?6 z; V1 O! u
#13=360000/4
9 j3 d8 `. ]7 K, E! O9 y/ r
% Y7 _1 d. d# Z. ?6 r/ u
N10#4=0.2

6 o) P5 s+ O3 l2 l

) M$ i$ Q- n# a  [9 ]
#1=#1-#4
* u3 W! n. |3 f: y3 v# z/ h

& C& h1 g$ W6 D% P
IF[#1LT#2]THEN#1=#2
  P4 [3 Z( c) c; H
$ e6 V$ b' e8 C! {
#5=[#1-#2]/2*TAN[20]+#3

& M7 f; c9 A$ I! z8 e; W
( _) v) p# V6 n6 R+ l
#6=0
, T3 n9 @7 N& Z9 S& b6 `/ T
- M7 J( a% w: V2 K1 B' ]4 k: u
N20#12=0

8 R% D4 y- f3 l" s8 u; r8 f- J3 {
, ]. o" Y9 s: ^( u7 E  \3 b
1 C& l- b9 N2 d
( A3 l/ {; q# {. q* w
#7=10+#6

8 O. }3 e# r4 Y' ]* M4 Z

5 b) p( [3 h) e4 q! f# I8 U7 @
G0 X56 Z#7
5 l  Y: B+ v; V2 t+ C: e8 P
: q; E6 \3 e9 V; g
N21G0X#1
) D, E5 f: P9 ~; r$ a% x3 E
0 o- b" B& k8 {# y6 Y
G32 Z-95 F50.265 Q#12
0 Z  }% S6 R% J; p

7 S0 B2 f% L# y: F- {* i3 x  q* T" f
G0 X56

* Q2 k& K6 m% G- R3 C# N4 A

+ \# D" S1 X- w. ^6 p8 j
G0 Z#7
6 ~; @2 @) @+ B$ @

( x. p# A( C. @
#12=#12+#13

, f( [0 _5 S0 X5 a1 L- J7 [

2 X& M) Q, l$ Q
IF[#12LT360000]GOTO21
9 c, M' i6 ?+ _
) b) L5 k% E. u& q9 A- V
IF[#6EQ#5]GOTO30
7 H) o0 B1 P" @4 V( a

5 F4 R: F6 Z- y- |6 a, G
#6=#6+1.5
1 s3 s8 q! I, F2 K

! q& [# f; Q/ O. A5 B1 X
IF[#6GT#5]THEN#6=#5

9 J5 a, u! ?6 e+ F- ~; w
0 ~& w8 H0 ^7 ^1 ^0 R3 V/ ?2 Z, L$ N) @
IF[#6LE#5]GOTO20

7 P* D' \6 M& ?+ h* V# V

7 [( ~, K1 s% f+ i3 [
N30#6=0
8 F% f+ Y1 l0 j

% S* y' P- V+ m9 T) Z0 O
N40#12=0
7 U  V. F& Z2 \/ F

+ t# [8 p! `; p9 D1 J  N
#6=#6+1.5
, c0 l0 Q8 F0 |' a* A' Z, ?' q

$ t0 d# r% Y6 Y
IF[#6GT#5]THEN#6=#5
* L5 I- T: e5 r+ z/ E: o) V

3 |* J% y9 `& L% ~5 o# q; H% ^; w
#8=10-#6
8 _6 k+ b* s( k2 G- s3 }0 d: W

1 V0 f; y9 x/ Y2 k8 P
G0 X56 Z#8

# x! F8 z  Y* I( s6 c# V

! G' Y0 `) I0 U$ g& K+ l
N41G0X#1
, ]' Q7 Y4 [/ E- B, A

) M" O- `3 e: e% x2 c. w
G32 Z-95 F50.265Q#12
, I: q1 K  J0 C; u

* ^' R' t- W; `( q6 [6 v3 l3 {
G0 X56
- k+ P9 k; Z) s0 n5 Y+ H( O
' i8 d" d6 y( B9 G& T
Z#8

' c2 i: F. W% W# }7 c2 r+ ~! f

; ^3 X- j7 _% f" Q$ k0 W6 w
#12=#12+#13

- B, G4 q- r$ L+ f

2 [4 x0 ^6 ^6 t' u* n# Z7 o
IF[#12LT360000]GOTO41
0 L! }- d; d1 B; `' m. S, q

, V% G- u& c( Q: I! t/ S
IF[#6EQ#5]GOTO50

! U1 B+ a) e3 K) K
$ |5 T1 P* g5 i1 z- a! M5 a5 G
IF[#6LE#5]GOTO40

: g) G' Q4 A0 \( @0 @8 @
  @( c0 D( @; V- [/ G8 q) P/ M
N50IF[#1EQ#2]GOTO60

5 S0 l, Q3 {, n: l/ u5 ]" U

8 ^8 b) B: Z: x3 q+ a
IF[#1GE#2]GOTO10

3 h9 R) I4 f, e0 K3 n. r& `$ R% c1 |
; o4 Q$ ?: G. d* M
N60G0X100.

! v. G/ O! J1 \' `# v

* A1 _* M4 d$ S( N9 u9 b8 E: {8 @( m
Z120.
+ e- F  L5 d2 Z4 t8 ^. G) r

% ]/ w3 M7 V  y/ Z) @9 s
M30
# `/ f% |7 G4 h: C1 _
) N" u7 \8 Z% y; z* R5 E7 h! ?0 k

点评

只是给他参考  详情 回复 发表于 2018-2-10 12:21
变量应用不灵活,程序不能完全通用  发表于 2018-2-2 12:32

评分

参与人数 2威望 +2 收起 理由
aa2852029 + 1 灌水~
东海fyh126 + 1 热心助人,专业精湛!

查看全部评分

回复 支持 1 反对 0

使用道具 举报

4#
发表于 2017-12-31 22:46:42 | 只看该作者
蜗杆得用宏程序,楼上的宏程序很好,楼主认真研究一下
回复 支持 反对

使用道具 举报

5#
发表于 2018-1-1 18:01:08 | 只看该作者
三楼大神正解!
回复 支持 反对

使用道具 举报

6#
发表于 2018-1-5 11:23:16 | 只看该作者
厉害,看一看。学一学
回复 支持 反对

使用道具 举报

7#
发表于 2018-1-31 12:33:40 | 只看该作者
正在连接... 发表于 2017-12-31 15:53
, R6 }3 l' `  c6 s全齿高一般是2.25,既然你齿顶高系数是1了,底径=36.5-2.5*2.25,编程的话我不知道你对宏程序了解多少。下 ...
3 \, ?% z  w3 {0 }2 y) s; a. \
谢谢楼主. q* D7 R6 J1 b: c
回复 支持 反对

使用道具 举报

8#
发表于 2018-1-31 14:58:39 | 只看该作者
谢谢。正好想学习一下宏程序。
回复 支持 反对

使用道具 举报

9#
发表于 2018-2-8 08:39:35 | 只看该作者
宏不会用。我一般做多头梯形丝杆螺纹。这个能用G78做吗?
回复 支持 反对

使用道具 举报

10#
发表于 2018-2-10 12:21:50 | 只看该作者
正在连接... 发表于 2017-12-31 15:53
( o  N. @/ Y& ]0 }全齿高一般是2.25,既然你齿顶高系数是1了,底径=36.5-2.5*2.25,编程的话我不知道你对宏程序了解多少。下 ...

# C) ?# k% q- R  I" [  [4 O. e只是给他参考1 Q  H" F( P# Q  _  O9 y. a9 s0 L/ u
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

小黑屋|手机版|Archiver|机械必威体育网址 ( 京ICP备10217105号-1,京ICP证050210号,浙公网安备33038202004372号 )

GMT+8, 2025-2-19 07:00 , Processed in 0.069052 second(s), 14 queries , Gzip On.

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表