機(jī)械社區(qū)
標(biāo)題: 蝸桿加工 [打印本頁]
作者: 陽光寶寶 時(shí)間: 2017-12-31 00:06
標(biāo)題: 蝸桿加工
蝸桿有模數(shù)M=2.5 頭數(shù)Z1=4 齒頂高系數(shù)h*a1=1導(dǎo)程P=31.4 最大徑=36.5 中經(jīng)=31.5 如何計(jì)算小徑 任何編程 第一次接觸蝸桿 一頭霧水
2 s2 w: i$ I! n9 p0 W( E% d9 \3 e
作者: jiaweicz 時(shí)間: 2017-12-31 11:30
第一次做就做4個(gè)頭的蝸桿,,有點(diǎn)難度啊
作者: 正在連接... 時(shí)間: 2017-12-31 15:53
本帖最后由 正在連接... 于 2017-12-31 15:57 編輯 & X/ L* u( \, M% o' M# x
* t/ b+ I- i8 X0 F( E, a% B; H- Q
全齒高一般是2.25,既然你齒頂高系數(shù)是1了,,底徑=36.5-2.5*2.25,,編程的話我不知道你對(duì)宏程序了解多少。下面是一個(gè)蝸桿宏程序,,你自己慢慢研究吧,。9 V6 f% A) Q9 {% _/ C) r* s! g
# I6 \9 T( t [0 C2 Z$ q6 V
5 Z! }3 V4 p6 t5 h& F$ y$ w
D=52 d=34.4 模數(shù)4 四頭, 牙型角20度,,刀寬2mm 角度LE20度 ,,
3 Q& `$ O/ D O
! n9 u$ X8 F9 J' \: C
P=3.14159*4*4=50.26544(導(dǎo)程等于摸數(shù)*3.14159*頭數(shù)) W=0.7M =2.8(蝸桿底部寬度)
e& X$ m H: F( b) V6 h5 k
6 N* \5 u; q) l" a7 o" O# W
- z+ V# `6 X. a3 S- }
' C' d, a7 }' D
程序:
3 @0 f) ]5 [5 X0 e9 L/ A" u- k
3 k% d i$ l! }- z3 IO0001
( k0 ]* c# O$ a
& ~7 |: o) G4 WG99M03S300
5 y: u/ N9 W4 c! P9 l, h* D
5 _0 a1 _' y1 w$ }0 }G97T0101M8
) f+ s$ Q# t, c L/ j; V! _! {: v+ ` u. P
G0X56Z10
1 R$ v" ?4 p/ y1 f. z9 l4 }# B3 S- E1 }, Y- P
#1=52(蝸桿大直徑)
9 t! j) n" l9 f! }, J* w* X$ B7 I6 E# V0 _3 o
#2=34.4(蝸桿底直徑)
! f( Q! h( g/ K( ]# Y7 y/ x( \: x
q/ a) `! `2 g: N- D#3=0.4(底部寬度減去刀寬的一半)
% a. H! j5 U: I- } V. f4 ? r2 J/ A0 u8 U5 [% B) _1 @
#13=360000/4(算出每一頭的角度)
- I# O9 ~: C1 v
. q& |" i& \9 ^6 W& I# W
N10#4=0.2(每層吃刀量)
$ k! }: O1 n" E1 k
. `/ [$ m5 C- M0 R$ A
#1=#1-#4(大直徑遞減)
) l; P9 f* \" Z& }' C
7 K4 A. {5 a2 z, E4 Z) P' n0 c2 n
IF[#1LT#2]THEN#1=#2(條件判斷防止過切,強(qiáng)制賦值,。當(dāng)#1小于#2,,那么#1等于#2)
! x& \3 `) W) M7 R0 O
6 ]6 h% h* J8 I7 v4 ^- e#5=[#1-#2]/2*TAN[20]+#3(三角函數(shù)算出每層需要趕刀的寬度)
! U3 i: @/ m$ t
0 g& Z2 q [- X# M, q
#6=0(趕刀初始值)
% U6 C8 U; w; P! b! G
0 u/ P& w( M2 n) r, ]N20 #12=0(Q的初始值,不能亂放)
9 H4 G6 n8 _; q5 F) Z
: O: z) p7 f6 ]3 A1 ^#7=10+#6(計(jì)算右趕刀每次的定位)
6 A5 t+ f% `. O( @( i
. z, ?; d$ ]. ?4 N* j! G$ R
G0 X56 Z#7(螺紋定位)
$ R9 M2 m: i4 _% H! S; l3 a5 G" n
U- ^* `7 M" O- W5 l* K$ U" YN21G0X#1(X進(jìn)刀)
; e" d% n* c9 D3 `* L9 w9 H- f; E
G32 Z-95 F50.265 Q#12(螺紋車削)
9 H$ ~+ K9 p+ C9 y1 A
3 E5 b* j+ Y6 J% xG0 X56(退刀)
* Z& O" U1 F3 ?8 E+ R5 v
% c/ ?8 F0 F2 K4 Z9 j. c& m! R, O
G0 Z#7(定位退刀到起點(diǎn)位置)
/ ?* `" S* V) N. u5 I9 N
6 h: f& v' p( U( ^" `" [# p7 Z+ d#12=#12+#13(角度遞加)
" o4 S+ [; A7 V' X7 u' i2 S3 l9 R+ v+ ` e3 j/ w
IF[#12LT360000]GOTO21(如果Q值小于360度跳到N21執(zhí)行下一頭)
$ R, M: G$ e. j( a4 Y
' c) }3 ?/ ?" Z# e' f# F3 CIF[#6EQ#5]GOTO30(如果右邊趕刀寬度到達(dá)跳出循環(huán))
- f) C- g3 d! q0 l& N+ B1 L1 m3 c
: e u. N8 C9 [/ R P3 x#6=#6+1.5(每刀趕刀量加1.5)
- l3 s4 i' l8 ~' D) J. t
: l5 ?& z/ F5 L4 |& l' o
IF[#6GT#5]THEN#6=#5(防止過切強(qiáng)制賦值)
6 k1 u# Z C) u) s6 x# F8 K( k+ C+ h; Q# G- |/ G. p7 Y
IF[#6LE#5]GOTO20(如果右邊趕刀寬度沒有到達(dá)跳轉(zhuǎn)N20繼續(xù)循環(huán))
6 M8 a0 n( ] f
/ |/ m$ d+ h. k3 r. Y* v& ?. a, W
N30#6=0(趕刀初始從新賦值)
2 F, y i; {" q) R) Q, i6 X
& K6 d! S4 S) J! d3 } F' C# L& HN40#12=0(Q的初始值,從新賦值,不能亂放)
X( D ^8 A w
\: ?8 }7 {& j4 U! w#6=#6+1.5(趕刀寬度遞加)
" T" W9 t& ?% i0 g
. C6 _ A) _# C* C, E2 |
IF[#6GT#5]THEN#6=#5(防止寬度過切,,強(qiáng)制賦值)
& [* q+ h0 n" |% r- n% I8 S% c
$ Y4 a0 T+ x; y6 h#8=10-#6(計(jì)算Z定位向左趕刀)
4 J5 Q: v" b8 D: H% G8 y
$ n/ a$ @% n& K- iG0 X56 Z#8(螺紋定位)
3 G$ V- {; U6 B2 d, S1 O8 I
- P4 }0 e; | @2 }0 ?N41G0X#1(X進(jìn)刀)
% W. t; `8 U6 w2 I) w3 H
! S b4 A) n, R2 W4 d
G32 Z-95 F50.265Q#12(螺紋車削)
' b/ J9 B- X9 M/ q( B
0 [; S. B2 u& L. m3 DG0 X56 (螺紋退刀)
' l) J0 A$ Z8 }/ x! A" O
+ j- F6 x8 a4 G% F" I
Z#8(退回上一次加工起點(diǎn))
' g T1 e' z/ N+ V; v$ E
, @; J; B) t+ ?
#12=#12+#13(左邊趕刀的角度遞加)
; F3 X, {4 \. [ ?( `% S
( z( l! t, a+ ^3 m2 u' I( xIF[#12LT360000]GOTO41(如果Q值角度小于360度跳轉(zhuǎn)N41繼續(xù)下一頭)
' C3 a1 O2 ]- G% [; M3 W. X7 c" ]* J% D' i8 N1 g( v' S) g4 J
IF[#6EQ#5]GOTO50(防止死循環(huán),,如果寬度到達(dá)跳出循環(huán))
7 S4 ?& C; J4 b2 A" r
: o8 |6 R% a$ [) j& s, OIF[#6LE#5]GOTO40(如果左邊趕刀寬度沒有到達(dá)跳轉(zhuǎn)N40繼續(xù)趕刀)
, X, {- b4 Y( e
4 C; `5 W7 o& h h; S( XN50IF[#1EQ#2]GOTO60(如果螺紋深度到達(dá)跳出循環(huán))
3 z3 Z4 y; h4 C0 ^
1 Y( {$ k0 U: n) Y1 U- X% HIF[#1GE#2]GOTO10(如果沒有到達(dá)跳轉(zhuǎn)N10繼續(xù)下一層)
( U- q# o1 d1 d x* I
0 F4 g! t4 E- I! ~' n: X0 ~
N60G0X100.
2 L5 l1 r' F- C. e& z4 P
3 e7 q' Y, T+ W: {" M, n2 W; K- p5 q1 MZ120.
* t. E# S; i9 q: q2 C# H
$ d5 F+ t7 f% w# u6 j+ I' T7 d$ DM30
; l, F& [* U7 @3 _0 w' P2 f- _7 a
* | q% H( R- k9 `. h' W7 w
" U4 p4 I. t" B% [5 X
& v& J |* _0 `完整程序如下:
. n. L7 m" w* p5 f9 k3 W5 Y- O" T5 i2 I9 w$ |+ W
O0001
4 D- u% O4 W$ l! |7 d
: m* o9 u* ]& eG99M03S300
, { d( v% g# w4 \4 \1 j
2 S& s: K' R6 y" V9 K% y) C) I& V
G97T0101M8
! v0 b6 [# L5 H& L9 g4 E
+ _, n! u w- e) R6 k3 a. qG0X56Z10
3 d8 W O, l1 a' u* ^1 \$ Q( g( `7 D Y a0 J" n- f% X+ r2 B' Y1 ]
#1=52
8 N3 H; e' d+ | n- ?1 ~5 E5 C; p9 b) a
#2=34.4
5 W4 v. X/ o+ C& l
6 F2 c. `/ v% C/ f {#3=0.4
- c. F# L! G% e6 Y0 A% L2 r4 R/ b& B n: h3 _! j. A4 ?2 |
#13=360000/4
0 ~5 h9 _* L3 j" Y" \2 U6 W
2 |8 e9 J2 ^* S( |, tN10#4=0.2
! o: B9 `4 Q" e3 j
6 g: l& T3 n, p' A3 C: C: O, E' [#1=#1-#4
6 o$ [* S" f0 G) r, f6 ^; h4 d1 @, k
5 P4 R6 J9 @. W
IF[#1LT#2]THEN#1=#2
& B) x$ F6 C& O+ y2 T
5 f' C* a# Z% A3 M
#5=[#1-#2]/2*TAN[20]+#3
, D2 t2 @7 u! ~. |9 ^
$ l* E0 I9 l! w& I0 ^- `
#6=0
( T I7 @. ~ q# k" v4 }
4 Z$ d1 J+ v( V+ J( L) o9 k8 \& mN20#12=0
9 C5 A' {1 p3 j7 U6 ?0 a! P. n0 f2 M5 w* D/ I
/ a% V6 i) [% d+ [- `
! ~) R- ?- M0 ]4 i* _& T1 ^1 i #7=10+#6
8 d. z& H; T% z T5 z7 b* c
( A5 S1 H [7 s) b7 S& n6 cG0 X56 Z#7
) y; ]/ q+ b/ H5 `9 Y! s* ?) w9 ~( Q' V% q% i; K
N21G0X#1
7 y0 s& j; b! {% r: k( \# C+ T+ o& C7 p8 o: @
G32 Z-95 F50.265 Q#12
5 C( f& f/ x+ }3 P3 i4 H% F6 c8 }+ `9 l% B7 L4 D9 a
G0 X56
. b- m/ C2 V& V. m. J9 S( D0 a, ~( S% O2 o3 k+ x6 D$ o
G0 Z#7
8 b' a, B9 z; r9 y: a6 S
7 S; \- |0 t6 A& v% U5 N#12=#12+#13
; [, g; H4 I0 \/ |0 Q6 u! J5 Z) \0 m9 o q
IF[#12LT360000]GOTO21
% S2 ~! v$ I" g, \3 _5 d6 l
I) |9 `$ v, i" j. A2 RIF[#6EQ#5]GOTO30
. T, s) e2 |: j( I
% m( A g8 F# @) O2 J#6=#6+1.5
, u7 R% i+ p1 |3 z: }3 |. h# S" r3 f5 V# m
IF[#6GT#5]THEN#6=#5
6 n4 ?" g# X0 C5 A }& ]0 G6 h' d' x3 D
IF[#6LE#5]GOTO20
" Q3 J7 V$ ?' q1 j6 y( x3 w% k
F# y; r8 ~* o8 y6 o& P/ ?9 I
N30#6=0
3 c0 P$ M. f1 [, K h1 P$ r
* c$ ~8 t% |% l. ~# Z6 D4 M) r/ C) DN40#12=0
9 |4 ?) q' b# I& O! @# J" x& x% t
7 P$ J4 z8 t: j; b6 O7 l4 o#6=#6+1.5
- N* O' {5 Q( o( b* ^9 E) Q m5 F& d* k8 K3 d5 n, Y U
IF[#6GT#5]THEN#6=#5
. K) S, ~8 M; A8 Y, @% ~
3 P* b( f8 M# [0 ^" T#8=10-#6
. o# c+ V1 M7 \7 M$ t# p5 j9 s
- o4 p* u- V! L g6 Z S
G0 X56 Z#8
7 Y2 D% j- i3 ]" m
: R$ j# \; F+ wN41G0X#1
. t: |( g0 j1 U6 F& z* h
5 \, |7 e- }( \$ HG32 Z-95 F50.265Q#12
5 @( Z& ~5 C0 ]) h G. k- w* T) j, c; c
3 }' W' K7 e1 `: HG0 X56
8 T. u. {/ v. w
, S- f/ s" J6 Y3 {6 w: h8 mZ#8
8 m* ^8 ?/ V& x3 M- z3 ]
1 ~1 ?1 f: x5 i: E6 A#12=#12+#13
( i6 n9 b* f4 G0 z+ H! T& J. F, ^! K i" d
- H: y! B* a. j, y9 }IF[#12LT360000]GOTO41
) K: B9 j! {3 j6 n' d3 c
( h7 C0 k9 H: CIF[#6EQ#5]GOTO50
% r5 Q9 }- J# g7 D! |
0 h7 K+ x9 P9 w5 p% ?5 F K
IF[#6LE#5]GOTO40
' _. n' B1 K$ L7 Q6 f. ?4 t
' i# X4 s: g' WN50IF[#1EQ#2]GOTO60
1 b, C' l8 G7 J4 e3 X5 E& C0 V
' r" A }$ k3 |3 j! K9 f PIF[#1GE#2]GOTO10
+ x2 J7 c9 [: X, o4 a# q" J
/ B2 J4 d$ _# I1 ?' w: [
N60G0X100.
W; r9 S7 L% O# `2 m: ]4 Z h2 ?5 ?/ n7 F7 `
Z120.
1 A s9 _( p R5 d' ~ Z3 f
7 G# d- ?9 d$ i) O; z, ^) d
M30
7 i7 v) C. D4 ~0 { l. x
( l* ~; H* P2 c! ?
作者: 韓寒11 時(shí)間: 2017-12-31 22:46
蝸桿得用宏程序,樓上的宏程序很好,,樓主認(rèn)真研究一下
作者: xiaobing86203 時(shí)間: 2018-1-1 18:01
三樓大神正解,!
作者: aa2852029 時(shí)間: 2018-1-5 11:23
厲害,看一看,。學(xué)一學(xué)
作者: XIEYANG1985 時(shí)間: 2018-1-31 12:33
& f) h2 o& J# `! P; D- P
謝謝樓主
7 [, b2 J) F7 C" h5 o3 S& T
作者: 章華鵬 時(shí)間: 2018-1-31 14:58
謝謝。正好想學(xué)習(xí)一下宏程序,。
作者: wx_lbY2wG5b 時(shí)間: 2018-2-8 08:39
宏不會(huì)用,。我一般做多頭梯形絲桿螺紋。這個(gè)能用G78做嗎,?
作者: 正在連接... 時(shí)間: 2018-2-10 12:21
. ^" e+ s. [& ?; w @只是給他參考
" p. P" K6 @; F( x {9 \
作者: yxj33463346 時(shí)間: 2018-2-24 17:25
厲害!
作者: 冬日夏風(fēng) 時(shí)間: 2018-3-11 10:31
收到,,不錯(cuò)啊,,我感覺很好
作者: 李玉彬 時(shí)間: 2018-11-17 17:58
不錯(cuò)蝸桿就用宏吧
作者: 那座城 時(shí)間: 2018-12-10 18:45
頂一下
歡迎光臨 機(jī)械社區(qū) (http://97307.cn/) |
Powered by Discuz! X3.4 |