螺距6以上的最好不要用G76 特别是机床刚性不是很好的情况下 更不要用
# `5 R8 m$ t5 ?( S: R# E5 U; n" w! n2 e0 v- L* k3 U0 ?, P
大螺距建议你用宏程序 下面这个是 一生有你 编写 的 我用过 效果很好) U$ t- p( c$ n: }
* u! U! F7 r& t; W( t0 _% E1 rM3S200T1017 P4 w9 P) P( z+ Z% p7 T
G0X100
: g+ M( Q' d0 N6 `Z10% @4 W6 r5 ] M5 \$ U4 U. A4 r
G65 P9003 A4 B3.1 C48 I20 J8.8 K70 T2.5 F0.08 D1) c! E: i) z0 w0 s8 _. r
A模数 B槽底宽 C齿顶外径 I 牙型角 J 全齿高 K螺纹长度 T 刀宽F进给D头数- x; @% `6 [" H% ~, X" j( S0 y! E
G0X200 M5* E$ W4 m z; W+ \$ j( O+ n/ h8 e- U
Z10* S8 p& u7 h) G: [/ F
M307 B# B+ m+ M8 T( ]( K
%
. {& _: ]( `1 ^: w% u1 V(******************************)
: \3 R3 ~/ e6 D/ o6 `9 LO9003 * S% {- J/ a) N# c3 {3 \
#100=#4 ' L1 f1 {, A2 `* Z$ ?3 E
#28=#5
# S+ y3 o6 J8 M5 T- u/ [#144=#3 3 z& J4 ^8 p3 g1 n* u% y
IF[#7LE1]THEN#7=1
2 e y2 D% T* M% C4 kIF[#7EQ#0]THEN#7=14 y2 P; _1 P2 R
#10=#1*3.141593*#7
1 b2 o" R, B/ x#130=1
+ h" A2 a# S& Y3 n7 WWHILE[#130LE#7]DO1
0 b8 L2 A8 Y$ R' B6 @4 ~( @#131=#10/#7
3 @4 R! a* C e d4 N#132=#130-1
% x& ~4 c+ w* uWHILE[#28GE0]DO2
6 ]! r$ T: ]& O/ |#101=TAN[#100]*#28+#2/2-#20/2
/ n) d% d0 _1 l$ E' I0 F#30=1 9 Q- O- I# [6 x: l
WHILE[#30LE2]DO3
4 J+ I7 j5 d6 P+ i1 ]IF[#30EQ1]THEN#29=ABS[#101] 7 L ?( F. c: E5 g. k- F1 i2 E# a
IF[#30EQ2]THEN#29=-[ABS[#101]]( v2 O6 D4 b7 h; d- L
#150=#10/2+#29+#132*#131
" [# R. c+ G. T5 R+ R#151=#6+#1/24 r/ k, h* U& y: D
#152=#1*5+#3* F0 T; i! D% p6 j% G/ o
G0Z#150
( Y8 g0 i9 k' pX#3
$ j& E) p. z7 T# S3 j' M9 SG32Z-#151F#10
. U* f" M+ j0 k( G) qG0X#152
; ^& y6 {3 f' S#30=#30+1 3 Z' p% }9 d; n( V( Q" F; L
END3
$ ]( M+ l, S" ?1 q3 J+ K3 k: i#3=#3-#9*25 m0 I- C( q2 f n* G9 z I
#28=#28-#9
5 n5 [' \! {5 ^( T. K# eEND2) E7 \; B a; P3 y ?! ]/ L
#28=#5/ l |2 Y6 k7 |- w
#3=#144
; q, P) }2 V4 A5 l. z* u#130=#130+1 {/ a. C% \- n. t; |
END1
0 O' a$ u/ R( A% e0 JM99
6 j( V5 P- I2 Z& F3 E%
! L/ }- ?# s9 M' x7 R) F这里的F进给不是螺距,是每次的切刀深度,一般0.08-0.12左右,根据你齿面粗糙度决定数据大小! D0 S3 c" X+ G' U
1 m0 R3 N" b1 \6 M. L
|
发表于 2012-5-12 21:40:27
