直齿圆锥齿轮的表达式

liuyu831227

这里面有哪位高手可以给个直齿圆锥齿轮的表达式，只要能把大端的齿面的截面形状画出来就好。我用齿轮模块好象画不出来，不能设置齿顶高和齿根高这些参数

200501010329

Ag=arctan(z1/z2)
Ag_2=arctan(rad(sf2))
Ag_a=Ag+Ag_g
Ag_f=Ag-Ag_g
Ag_g=arctan(hf/R)
Ag_p=20
: P1 F0 z0 v/ t. |+ oAg_t=if(ss_c=1)(arctan((1.2-x2)*m/R))else(arctan(ha/R))
/ \3 c# ?+ @" T8 ]( p- q4 hIa_2=sf2-Ag_2
' c) O8 N& O, l, W% k4 W* `R=m/2*sqrt(z1^2+z2^2)
: i- T: h8 l4 N- k. I5 ?( C' jRo=360/(4*zv1)-2*Ia_2
a=if(x1<x_cri)(-k)else(sf1)
' t2 I5 Q8 h. M1 Oc=x1*m
d=m*zv1
) r; v) K0 h! b$ jd_b=m*z1
1 z# c0 z$ @  n9 z& ]+ v' L: Dd_f=d_b-2*(1.2-x1)*m
d_a=m*(z1+2)
db=d*cos(Ag_p)
df=d-2*hf
dr=d+2*x1*m
4 V1 c& s; R; S: P4 k5 H$ M6 rda=d+2*ha
4 ?; O; Z* s# lh=(2+x1)*m
ha=1*m
hf=(1+x1)*m
6 b2 n2 Z; R8 i  o) Ik=if(x1<x_cri)(1-df/db)else(1)
9 [- a0 r; _+ f* t, s1 @4 l/ Mm=4.77
: J2 b& w2 v1 L; `p=(90-a)*t+a
rb=db/2
' C5 ]( G) r; u/ }' C( Zs=3.14159265*m/2
sf1=if(x1>x_cri)(sqrt((df/db)^2-1))else(0)
sf2=sqrt((dr/db)^2-1)
9 r  [& R, F& m! I) \# ^; ?5 i/ Kss_c=1
% F4 C  ?  n2 n$ L& h% Z5 {- tt=1
u=pi()/180
" D" C* g9 G  m2 @9 G  G& Y0 `  dx1=0.25
x2=-0.25
: ~: h! K  }6 C  ?x_cri=1.2-((0.5*z1)/cos(Ag))*(1-cos(Ag_p))
xt1=if(p<0)(rb+(rb/k-0.5*df/k)*p)else(rb*cos(p)+rb*p*u*sin(p))
# P: \( {4 J5 l. e" i3 fxt2=xt1
/ s" m( @7 i6 Z  v; P$ u# fxt11=xt1*cos(Ro)-yt1*sin(Ro)
xt22=xt2*cos(Ro)+yt2*sin(Ro)
yt1=if(p<0)(0)else(rb*sin(p)-rb*p*u*cos(p))
yt2=-yt1
" y$ _7 m9 m( S: E6 jyt11=xt1*sin(Ro)+yt1*cos(Ro)
yt22=-xt2*sin(Ro)+yt2*cos(Ro)
7 d. u+ h+ N0 k8 [% f& mz1=10
z2=16
& N' l" w; t) k6 \6 k: Vzt1=0
% D+ @5 L" z) wzt2=zt1
2 d1 y' `; [* U- M7 g) fzt11=zt1
7 @% P* g# V  Y# R, I- Gzt22=zt2
zv1=z1/cos(Ag)

200501010329

试试看

mjtppf

没有注释的代码用起来很吃力，呵呵。

ranqiang

谢谢 ~~~学习了

zbjghl

NUMBER OF TEETH  齿数7 W- H8 ?5 J) O8 L! M
. }! n+ y0 V7 H  ^8 TNORMAL MOUDULE   法向模数
- _" k+ w, H$ O' Y1 V* [0 W' g1 D* a% Z% r" X, e$ {PNORMAL PRESSURE ANGLE 法向压力角
8 h7 |, w5 `" c. L4 ePITCH DIA 节圆直径
) B/ V( e0 ^- ]. tBASE DIA  基圆直径
! q, ?9 k0 h! |4 `# C" HMAJOR DIA 大径, t6 F0 O. |. n1 o2 l" |8 d
MINOR DIA 小径* F* x) n5 V, q; M8 o7 f
FORM DIA MIN 渐开线起始圆直径(前提是渐开线齿轮)
, O0 h' v3 ^7 U6 m: LMIN EFF CIRC SPACE WIDTH 最小作用齿槽宽( v% }& i) M0 U7 L
, }  v8 K' k8 y# G6 [1 {+ a4 q. AMAX EFF CIRC SPACE WIDTH 最大作用齿槽宽
  U! [) Y$ y* o, [" n, RMIN ACTL CIRC SPACE WIDTH 最小实际齿槽宽
  r% M8 T$ ]3 A3 G) h* Z; ~! e, l- X" y% _, `; m" rMAX ACTL CIRC SPACE WIDTH 最大实际齿槽宽- c7 Z3 [" q" a5 `" E  h
4 Y" k- V) v' F; \* w- n/ ZMEAS BETWEEN TWO 1.5 DIA PINS 跨棒距（也叫M值，是2滚棒的）

changeso

试试看

zhangmingjuni2

学习模具软件的好地方，免费教程随便看，免费发布信息
) x9 O4 a! G  I7 r6 z4 t
+ I( _+ h- X2 o# g学软件到努果模具网  http://bbs.nuguo.com/?fromuid=13557

jd803007

最新汽车防盗器/GPS跟踪器追踪/www.803007.com
5 o3 c3 \; C: S/ _3 T# w

孩子出去玩耍，这么久还没有回来，是不是被坏人拐卖？父母心急如焚！
老人出去散步，天黑了怎么还没回家，是不是又走失啦？儿女忧心忡忡！
% I! G3 ?* s  z3 R可爱的狗狗，一不留神怎么不见啦？这可是名贵品种啊！主人追悔莫及！
高档的汽车，停在那里却被盗啦！这可是一笔巨额财产！车主捶胸顿足！

有了GPS追踪器，这些悲剧将不再重演，一切尽在您的掌控之中！

选择我们的理由：
# Z' i$ _  H0 @6 v　　 ①、 有实物图可供客户参考；
　　 ②、 信誉保证，质量保证，货眞价实；
　　 ③、 长年经营，货源稳定；货到付款/无需定金/开箱验货
     ④、 款式最齐全，更新最快；
0 V+ l  F1 t; `- _( L7 O; S　　 ⑤、 厂家现货，当天即可发货！收到货在付款 ，你还担心什么呢
- [; J9 O9 T) p- S　　 本店的综旨：【热情服务】【顾客至上】【诚信经营】【品质保证】
4 U" q" z! h* F  G( R/ l" P: `
3 \. p  p4 h$ T. C- P 更多产品/详细说明/产品图片公司网址：http://www.803007.com
) r* L$ D1 s, ~7 o) y客服QQ：228968110
      客服专线：13944821007
- Q' T: \5 y* M" ?% S         金盾之光科技实业有限公司广告推销勿扰

changeso

好多哦