蝸桿加工

陽光寶寶

蝸桿有模數(shù)M=2.5 頭數(shù)Z1=4 齒頂高系數(shù)h*a1=1導程P=31.4 最大徑=36.5 中經(jīng)=31.5 如何計算小徑  任何編程    第一次接觸蝸桿 一頭霧水

jiaweicz

第一次做就做4個頭的蝸桿，有點難度啊

正在連接...

- D  L! d; M# H7 s4 P6 e- p( G全齒高一般是2.25，既然你齒頂高系數(shù)是1了，底徑=36.5-2.5*2.25，編程的話我不知道你對宏程序了解多少。下面是一個蝸桿宏程序，你自己慢慢研究吧。

7 j- E8 f4 B: m! b2 r. V' o
4 e1 R9 \! Z  V/ H4 `7 j, f$ P

D=52   d=34.4  模數(shù)4 四頭， 牙型角20度，刀寬2mm 角度LE20度 ，

1 }) W9 e, a( y+ f- I" P* a

P=3.14159*4*4=50.26544（導程等于摸數(shù)*3.14159*頭數(shù)）   W=0.7M =2.8（蝸桿底部寬度）

/ ]6 d$ Q) M) h0 X' v& {( Y5 b

   

! F5 U# |6 x, B5 i/ q5 _* C

程序：

O0001

  r& i4 p- R2 y6 j7 H% p" T
# b) B$ W$ T$ R+ |% r

G99M03S300

; l% V5 a; y2 j6 K, Q5 A

G97T0101M8

G0X56Z10

+ \: k9 m8 D# ]; @+ e( X  v5 }
  p7 v4 `9 H' G) ?" ^* D

#1=52（蝸桿大直徑）

0 W+ H' J2 _# l0 G2 x  z- `! C1 x
  n; d7 J9 x0 {8 P) J, X

#2=34.4（蝸桿底直徑）

5 I" i, |; l! k! A
3 u- N1 B3 V# s: Y% a2 w

#3=0.4（底部寬度減去刀寬的一半）

! v' k! ~' {' k- t( [3 \

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

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

#1=#1-#4（大直徑遞減）

3 f/ ^0 \/ U) G. K( \* b

IF[#1LT#2]THEN#1=#2（條件判斷防止過切，強制賦值。當#1小于#2，那么#1等于#2）

  X6 q4 O8 ]+ Z2 i" t

#5=[#1-#2]/2*TAN[20]+#3（三角函數(shù)算出每層需要趕刀的寬度）

#6=0（趕刀初始值）

6 y4 i, ?1 r2 o- A) i
2 _! }2 g  p" p0 k% Y& L" E

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

, O! I+ i: W2 n, Y, I7 E% H
. r8 Y9 f' X$ M: [$ e+ P/ t$ i

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

G0 X56 Z#7（螺紋定位）

N21G0X#1（X進刀）

% ]8 S$ |4 p! q

G32 Z-95 F50.265 Q#12（螺紋車削）

  d9 r% H' ?7 u& y. A0 s6 _% f4 y) p# U
6 ^! G. B7 L: l8 L& `/ ]! G

G0 X56（退刀）

0 I3 C8 B: `- o+ l3 [. j

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

. }' _( ]: n- t" Z. W

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

IF[#12LT360000]GOTO21（如果Q值小于360度跳到N21執(zhí)行下一頭）

$ e, M) ?2 y8 G5 ~
- F& K6 [' j* @. j2 T7 b

IF[#6EQ#5]GOTO30（如果右邊趕刀寬度到達跳出循環(huán)）

8 y8 P: z( b0 @1 A# W

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

: f* m2 }* s. R) H" a

IF[#6GT#5]THEN#6=#5（防止過切強制賦值）

3 @- W# N$ e, M& s6 i$ Y, ?- l
, U2 B* b/ \, N! }" E

IF[#6LE#5]GOTO20（如果右邊趕刀寬度沒有到達跳轉N20繼續(xù)循環(huán)）

. V3 y$ I( g- p  T

N30#6=0（趕刀初始從新賦值）

N40#12=0（Q的初始值,從新賦值，不能亂放）

& F3 ?  F/ Y+ f5 Y% N' I

#6=#6+1.5（趕刀寬度遞加）

! T6 D. Q) s# Z8 a
9 _2 ^6 S! I( R, V, {6 L

IF[#6GT#5]THEN#6=#5（防止寬度過切，強制賦值）

. z" Y0 {( v6 O) u, z: O/ r
6 {9 f* }; k9 I# J2 c

#8=10-#6（計算Z定位向左趕刀）

G0 X56 Z#8（螺紋定位）

3 z2 ?+ a0 ?7 ?) o- C

N41G0X#1（X進刀）

8 j+ ^4 S* }; V- F4 @
9 T" q' ?  c4 A, r0 B' _- K  A6 `; ]

G32 Z-95 F50.265Q#12（螺紋車削）

G0 X56 （螺紋退刀）

3 G# G" k) P7 P- }4 _

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

& w# C* J* I/ W0 f4 d1 x2 \

#12=#12+#13（左邊趕刀的角度遞加）

IF[#12LT360000]GOTO41（如果Q值角度小于360度跳轉N41繼續(xù)下一頭）

IF[#6EQ#5]GOTO50（防止死循環(huán)，如果寬度到達跳出循環(huán)）

) D' a0 P% I0 j) S. `8 E& Z) X- C" ~
5 |  }8 f$ u8 B  J. W

IF[#6LE#5]GOTO40（如果左邊趕刀寬度沒有到達跳轉N40繼續(xù)趕刀）

; G; @0 w- X9 S" z0 J- x
# J' u2 e) k2 ~' V

N50IF[#1EQ#2]GOTO60（如果螺紋深度到達跳出循環(huán)）

, M* J$ n, c7 l' a5 y. }0 y

IF[#1GE#2]GOTO10（如果沒有到達跳轉N10繼續(xù)下一層）

N60G0X100.

! h" S) H) c# p: N- d
' c9 D$ k0 m; [3 |3 v: x: |$ D

Z120.

M30

2 h# s+ G  p+ A2 b; Z
: z: J+ j2 `4 i$ \+ Z( _, z( V- F

6 E# I/ x: ~9 m& @5 y5 ]

完整程序如下：

O0001

G99M03S300

G97T0101M8

- Z" h& |9 Z3 ?1 ~

G0X56Z10

, M4 c' l: E1 M( S5 K& \$ f0 Z

#1=52

  P% ^# d: A5 h) B: ?( I% B' H8 I8 \

#2=34.4

7 R4 c* M- f. \4 r$ U
& F2 v; ?7 G6 Z" m1 b/ u

#3=0.4

5 y/ K& J( j* y5 ^. g

#13=360000/4

N10#4=0.2

1 Y% j8 E6 z/ u

#1=#1-#4

  @' C& n& k% O& ]/ x! H  G# Z

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

" y3 F" y  }: l
# e2 m  @7 q: t6 H, y" M1 P

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

#6=0

N20#12=0

3 F* U6 h8 d  a7 V% Y+ e

#7=10+#6

7 E6 ^9 P/ a9 |# r% B

G0 X56 Z#7

. q# ~0 P/ b9 l* c6 _

N21G0X#1

G32 Z-95 F50.265 Q#12

3 x4 v4 O0 d( o" w- o
& I- P' Y) M7 T/ {

G0 X56

G0 Z#7

1 S3 M; q! U* [$ g4 g/ l* ~

#12=#12+#13

* h8 C5 I) A$ |. o) t/ F; U9 Z
( @% T7 `! v$ |

IF[#12LT360000]GOTO21

4 Q" i+ Q3 R' ^2 U
  |* X) g5 V- n8 j7 g

IF[#6EQ#5]GOTO30

#6=#6+1.5

) P/ e- Y/ o2 |; l; ^
( K0 r. A. W, v% @* n5 ]+ R

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

* B& s% H7 b0 l8 C
8 \' B0 b  r6 Z) Q% i. |. m3 E

IF[#6LE#5]GOTO20

6 @, \; \6 s' g

N30#6=0

0 K9 b- f+ H/ T8 h  i( R

N40#12=0

; j  N( t- V1 Y4 R1 Q5 W; ^" d
6 A. D- h! A% F

#6=#6+1.5

: R! b( [1 J7 {+ I/ R  z7 l

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

& t" E& @! B2 h0 v8 c

#8=10-#6

: @3 C; b. y; O2 w  C
  j9 g0 t9 L3 V- h2 A, g

G0 X56 Z#8

; Z/ w2 p3 _8 @0 V) D# N6 v

N41G0X#1

3 q$ u0 p. L; k# v+ _+ C, u
( O1 k8 V$ U6 @0 z' j/ f5 q- w

G32 Z-95 F50.265Q#12

7 A- ~' l3 _( r) m5 w. X
& ?' k1 z* u5 V  S* w7 S

G0 X56

Z#8

$ |6 m' Z: p* D6 ~9 Q8 Q; e$ ?

#12=#12+#13

- w5 [/ W3 v, v5 i

IF[#12LT360000]GOTO41

. Z/ f  Y* R4 P& h9 G

IF[#6EQ#5]GOTO50

; k- I8 N. J3 f" B, A2 G
- K7 u8 q4 F% k$ c0 I

IF[#6LE#5]GOTO40

3 V% A2 y7 ^) P8 {

N50IF[#1EQ#2]GOTO60

IF[#1GE#2]GOTO10

6 R: O3 `3 T2 g6 `8 ?1 T
0 u( y7 W; H# c4 }$ S

N60G0X100.

Z120.

M30

2 X& X2 I0 W+ u7 v9 V; v" ?

韓寒11

蝸桿得用宏程序，樓上的宏程序很好，樓主認真研究一下

xiaobing86203

三樓大神正解！

aa2852029

厲害，看一看。學一學

XIEYANG1985

正在連接... 發(fā)表于 2017-12-31 15:53
8 S( W1 l) H' O. I/ J4 \+ C6 v6 [全齒高一般是2.25，既然你齒頂高系數(shù)是1了，底徑=36.5-2.5*2.25，編程的話我不知道你對宏程序了解多少。下 ...

6 ^6 z# O" {- s: ?/ v2 l3 }: |# D謝謝樓主

章華鵬

謝謝。正好想學習一下宏程序。

wx_lbY2wG5b

宏不會用。我一般做多頭梯形絲桿螺紋。這個能用G78做嗎？

正在連接...

正在連接... 發(fā)表于 2017-12-31 15:53
全齒高一般是2.25，既然你齒頂高系數(shù)是1了，底徑=36.5-2.5*2.25，編程的話我不知道你對宏程序了解多少。下 ...

2 k8 O  z( [8 h: O# I: k只是給他參考
  [- e; T- a" q% A( m- I