螺距6以上的最好不要用G76 特别是机床刚性不是很好的情况下 更不要用
+ i/ I! U* R8 p$ [ J( @) {1 m# @* {( r5 T3 i" J
大螺距建议你用宏程序 下面这个是 一生有你 编写 的 我用过 效果很好
5 D+ }0 Y6 X% G" R7 c, U- `
9 E! `' k8 |/ z! x8 l9 v+ w( QM3S200T101 a8 ^1 Y+ D t2 i
G0X100. E. S6 \6 K0 R5 a8 l
Z10
* f7 i- K9 {4 j5 uG65 P9003 A4 B3.1 C48 I20 J8.8 K70 T2.5 F0.08 D1% m' u2 k7 N" M5 P
A模数 B槽底宽 C齿顶外径 I 牙型角 J 全齿高 K螺纹长度 T 刀宽F进给D头数8 k' ?1 H; Q* c1 t# s& p! @
G0X200 M5
- ? Z# W5 Q+ s9 [. i! lZ10
6 O! {3 S3 }* ~ bM30/ N5 ], R# T7 e% \+ m/ f0 Z+ g
%5 [, p0 E' `% I4 d
(******************************)7 p$ ^2 f u& K ^8 L
O9003
" ^1 A& }8 f2 A1 _/ e) @* g% r#100=#4
/ C( _# q* M) ?+ V: U* w0 e#28=#5* U) K7 }, `9 z0 n0 C3 K
#144=#3
. O5 _ y7 [5 t7 c) E# JIF[#7LE1]THEN#7=1 $ x4 |3 \/ v$ R5 |% I7 P
IF[#7EQ#0]THEN#7=1+ a: m0 }6 L. y9 d3 _$ {
#10=#1*3.141593*#7
' o. n1 b0 I, s#130=1- K5 K' l4 l/ d) U- D1 N$ J
WHILE[#130LE#7]DO1, F& u- R v- x7 O( S
#131=#10/#7 ' q4 c! i! o1 P9 U3 F
#132=#130-1 8 d9 c" }$ j! o
WHILE[#28GE0]DO21 |, H V( \, t8 o) b8 W
#101=TAN[#100]*#28+#2/2-#20/2
+ i. E1 u$ o, h1 F$ D; m3 I) f#30=1
: _- V9 F1 q6 N# K1 {, GWHILE[#30LE2]DO3" i% N. w6 h( x4 [" C2 K* _
IF[#30EQ1]THEN#29=ABS[#101] + K) w3 u: I% ] {( W4 R7 H2 S
IF[#30EQ2]THEN#29=-[ABS[#101]]
' C4 S8 B2 g" N9 V, _, M$ a#150=#10/2+#29+#132*#1310 n1 Y* I- p7 w1 C& m/ `
#151=#6+#1/2( J! o+ E, F$ F, x3 s
#152=#1*5+#3
1 y: }1 U2 s" i3 }4 m( b1 XG0Z#150
' f) l) F* F4 e" H$ w: U( ?1 QX#3
' I! e+ c0 i- l+ @; Z6 kG32Z-#151F#10
6 |# M; H, b' ?, G: HG0X#152
# A1 g2 _; l" T$ p+ \5 ~#30=#30+1
1 N1 |7 O' ^% w6 wEND34 r g& K2 O. A# M+ P" \' U6 H
#3=#3-#9*2
! d2 s% S- O+ }5 j#28=#28-#9% T$ z$ o- D, c! n
END29 e& F# G8 i% K5 Z. R: k6 v! s
#28=#58 i3 U: H _: p" S
#3=#144
: V- u. ]/ K$ S; T! p2 g9 e; b#130=#130+1
0 ]2 {% V6 _7 z1 JEND15 G$ k. C' M0 ]4 v4 W: r
M99
c+ d' J6 e' x%
; a! n8 G1 A5 y' W$ c这里的F进给不是螺距,是每次的切刀深度,一般0.08-0.12左右,根据你齿面粗糙度决定数据大小
( X8 w$ d5 i4 g5 Y( E1 A# j! A5 |
|
发表于 2012-5-12 21:40:27
