螺距6以上的最好不要用G76 特别是机床刚性不是很好的情况下 更不要用
b1 X+ J: w5 j( u: Q0 I9 D; v+ Y+ I4 h- |: I7 `' _% X1 S
大螺距建议你用宏程序 下面这个是 一生有你 编写 的 我用过 效果很好
$ L' E, X! q4 P1 ^6 {3 d, I. Y. |0 N) U1 A" m
M3S200T1011 K( s. h& `( }' ^
G0X100
# a( g! w- {1 X4 z1 D; LZ10
7 ?3 m; a" d1 H7 QG65 P9003 A4 B3.1 C48 I20 J8.8 K70 T2.5 F0.08 D1
' P/ L1 n8 u4 {A模数 B槽底宽 C齿顶外径 I 牙型角 J 全齿高 K螺纹长度 T 刀宽F进给D头数" K1 z2 ~, d0 R; v+ r3 n
G0X200 M5: g$ ]1 J4 ]# o, g2 g! g1 E! U
Z10
+ \1 @( p& _; XM309 |' s" Z3 x1 b- `5 x
%
: T8 b3 S$ x" }) F: X( y! S, J(******************************)
! |3 g, W' ?, X: j$ hO9003
& T; a4 t# I/ ?/ H) |1 S, ~7 W3 e#100=#4 $ S: i! F! i: D1 A! ? |% B
#28=#5
' y D' M: T$ [8 Z ` m#144=#3
) g, g0 ^% x# f% zIF[#7LE1]THEN#7=1
: p' N2 }) R! |: m- V- B- xIF[#7EQ#0]THEN#7=1
7 U, R# R# Q& a5 G4 _5 G#10=#1*3.141593*#7: g1 I" N; ^0 Q( s: k
#130=1
! k( |0 |! s" cWHILE[#130LE#7]DO1! X |6 H" B5 q) E& a( o
#131=#10/#7 # ]' y" x2 b N; j3 X
#132=#130-1 ) S2 G" K# z9 B# ^3 W% S8 E
WHILE[#28GE0]DO2
/ @" Z' M: w4 x. t/ t2 l( ^1 ~5 l#101=TAN[#100]*#28+#2/2-#20/2
* p1 G9 H0 _ d4 N3 A; L#30=1
, h) P. w* q5 l' ZWHILE[#30LE2]DO3
4 d' R6 ~1 b+ lIF[#30EQ1]THEN#29=ABS[#101] + g2 \7 T/ ~, E* f7 w4 Y: l/ s8 `0 {
IF[#30EQ2]THEN#29=-[ABS[#101]]
, V1 p6 ]6 [% y% L#150=#10/2+#29+#132*#131( b1 H: g& V9 u7 D( C
#151=#6+#1/2; P. f: h' P* D
#152=#1*5+#36 T" Q A* r6 h5 Q
G0Z#150* @! i5 Y( f( w; O, i9 C( e& r1 F) q
X#3
( C3 j7 g+ B: [1 nG32Z-#151F#10
# y/ Y7 K8 m3 A/ y0 e8 hG0X#152
7 F% i! k3 k0 {+ U+ v#30=#30+1 " G2 C0 k4 A& B$ @
END31 h5 y- N5 _3 O6 w/ `
#3=#3-#9*2 |4 f* y# b3 U2 n( m/ [/ r
#28=#28-#9 q+ s: X ?1 {, d4 D
END2/ s/ C3 z* b1 J4 k* s
#28=#5
+ r. F& h) S+ H$ y% M! X! U#3=#144
- y' r: a" { L7 `- W#130=#130+1
4 Z9 f- q7 c6 A/ pEND1
; J" K3 o4 ~ l9 xM99
8 P! N$ i- U/ O7 Y%
) I6 J9 n$ w4 s7 _这里的F进给不是螺距,是每次的切刀深度,一般0.08-0.12左右,根据你齿面粗糙度决定数据大小2 R8 j5 Z: p* |7 F0 L, q1 u
& q7 |6 U' Z: o* p; g2 I3 u# t
|
发表于 2012-5-12 21:40:27
