神奇的计算软件：计算不求人，机械设计计算样样行.

ljdqe

speed_long 发表于 2010-9-27 20:42

                               
登录/注册后可看大图

创新计算软件: 计算不求人, 机械设计手册等技术资料里的计算工作都可以做!
国产正版软件,免费使用.全 ...

下载下来研究学习，谢谢哈

speed_long

        外啮合渐开线圆柱齿轮传动计算
                                        --给定中心距

        输入数据
1 模数:             mn=1.75
2 齿数:             z1=16
                        z2=43
3 螺旋角:         helix=19+31/60+33/3600= 19.5258333333333
4 基本齿廓
        齿形角:                       an=20
        齿顶高系数:                ha_m=1.0
        径向间隙系数:            c_m=0.25
        齿根圆角半径系数:     p_m=0.38

5 工作中心距:    a_work=54.275
6 精度等级:        pgrade=7
7 齿宽:               gw1=25
                          gw2=20

8 工作齿宽:        gw_work=MIN[gw1,gw2]= 20
9 当量齿数:        zv1=z1/(cos(helix)^3)= 19.111223880291
                           zv2=z2/(cos(helix)^3)= 51.3614141782821
10 传动比:         u=z2/z1= 2.6875

        主要几何参数计算
1 分度(标准)中心距:      a_bz=(z1+z2)*mn/cos(helix)*0.5= 54.7750652796414
2 中心距变动系数:        ya=(a_work-a_bz)/mn= -0.2857515883665
3 端面齿形角:               at=atan(tan(an)/cos(helix))= 21.1155161391519
4 端面啮合角:               at1=acos[a_bz/a_work*cos(at)]= 19.7033347150266
5 变位系数和:               x_sum=[(z1+z2)*(inv(at1)-inv(at))/(2*tan(an))]= -0.2767334599442
6 补偿变位系数:            deta_y=x_sum-ya= 0.0090181284223

7 分度圆直径:           d1=mn*z1/cos(helix)= 29.7085099821784
                                d2=mn*z2/cos(helix)= 79.8416205771045
8 基圆直径:              db1=d1*cos(at)= 27.7137621059231
                                db2=d2*cos(at)= 74.4807356596683
9 分配变位系数(原则:大小轮的滑动比相等):
        x1=rote[x1,-1 to 1,(1+u)*(tan(acos(db2/(d2+2*mn*(ha_m+x_sum-x1-deta_y))))-tan(at1))/(tan(at1)-u*(tan(acos(db2/(d2+2*mn*(ha_m+x_sum-x1-deta_y))))-tan(at1)))-(1+u)*(tan(acos(db1/(d1+2*mn*(ha_m+x1-deta_y))))-tan(at1))/(u*tan(at1)-(tan(acos(db1/(d1+2*mn*(ha_m+x1-deta_y))))-tan(at1)))]= 0.2738631591201
        也可以自选小轮变位系数:        x1=x1= 0.2738631591201
        x2=x_sum-x1= -0.5505966190643

10 节圆直径:            d_node1=2*a_work/(u+1)= 29.4372881355932
                                d_node2=2*a_work*u/(u+1)= 79.1127118644068
11 齿顶圆直径:        da1=d1+2*(ha_m+x1-deta_y)*mn= 34.1354675896207
                                da2=d2+2*(ha_m+x2-deta_y)*mn= 81.3829689609014
12 齿根圆直径:        df1=d1-2*(ha_m+c_m-x1)*mn= 26.2920310390987
                                df2=d2-2*(ha_m+c_m-x2)*mn= 73.5395324103795
13 齿高:                   h1=(da1-df1)/2= 3.921718275261
                                h2=(da2-df2)/2= 3.921718275261
14 法面分度圆齿厚:  sn1=[pi/2+2*x1*tan(an)]*mn= 3.0977667055276
                                sn2=[pi/2+2*x2*tan(an)]*mn= 2.0474908403966

15 基圆螺旋角:                Bb=asin[sin(helix)*cos(an)]= 18.3049931369041

南方乔木

怎么用

speed_long

回复 南方乔木 的帖子

把上面的内容复制到里面,后改变齿数,模数等,按计算即可.

风飞扬

殊途同归，各有千秋。有用就行。

欧阳空空

给力啊！

speed_long

speed_long 发表于 2011-5-24 21:38

                               
登录/注册后可看大图

外啮合渐开线圆柱齿轮传动计算
                                        --给定中心距

    齿厚测量尺寸计算
1 固定弦齿厚:        s_c1=mn*[pi/2*cos(an)^2+x1*sin(2*an)]= 2.7353968381878
                s_c2=mn*[pi/2*cos(an)^2+x2*sin(2*an)]= 1.8079799105097
2 固定弦齿高:        h_c1=0.5*[da1-d1-s_c1*tan(an)]= 1.7156772897181
                h_c2=0.5*[da2-d2-s_c2*tan(an)]= 0.4416487561101
3 分度圆弦齿厚:   
                deta1=tod[pi/2/z1+2*x1*tan(an)/z1]*[cos(helix)^3]= 5.306947500129
                deta2=tod[pi/2/z2+2*x2*tan(an)/z2]*[cos(helix)^3]= 1.3051774997506
    齿厚:            s_1=mn*z1*sin(deta1)/[cos(helix)^3]= 3.093339237034
                s_2=mn*z2*sin(deta2)/[cos(helix)^3]= 2.0473137669923
4 分度圆弦齿高:        ha_1=0.5*{da1-[cos(deta1)-sin(helix)^2]/[cos(helix)^2]*d1}= 2.2851591943281
                ha_2=0.5*{da2-[cos(deta2)-sin(helix)^2]/[cos(helix)^2]*d2}= 0.7823339661499
5 公法线长度:
                z'1=z1*inv(at)/inv(an)= 18.9407552069996
                z'2=z2*inv(at)/inv(an)= 50.9032796188113
    跨齿数:        k1=toint{z'1/180*acos[z'1*cos(an)/(z'1+2*x1)]+0.5}= 3
                k2=toint{z'2/180*acos[z'2*cos(an)/(z'2+2*x2)]+0.5}= 5
               
                w1=mn*cos(an)*[pi*(k1-0.5)+z1*inv(at)+2*x1*tan(an)]= 13.7076406512908
                w2=mn*cos(an)*[pi*(k2-0.5)+z2*inv(at)+2*x2*tan(an)]= 23.8365558892589
    公法线长度可以测量吗？结果为True(真),表示可以测量;结果为False(假),表示不能测量,需要减少跨齿数再计算:
                CanMeasure1=among[helix>0,w1 < gw1/sin(Bb),True]= True
                CanMeasure2=among[helix>0,w2 < gw2/sin(Bb),True]= True
    改变跨齿数,计算公法线:
                k1_change=among[k1>2,k1-1,k1]= 2
                k2_change=among[k2>2,k2-1,k2]= 4
                w1_change=mn*cos(an)*[pi*(k1_change-0.5)+z1*inv(at)+2*x1*tan(an)]= 8.5414106416271
                w2_change=mn*cos(an)*[pi*(k2_change-0.5)+z2*inv(at)+2*x2*tan(an)]= 18.6703258795952
    公法线长度可以测量吗？结果为True(真),表示可以测量;结果为False(假),表示不能测量:
                CanMeasure1=among[helix>0,w1_change < gw1/sin(Bb),True]= True
                CanMeasure2=among[helix>0,w2_change < gw2/sin(Bb),True]= True
6 量棒(球)跨距M值计算:
    量棒直径:        dp=1.728*mn= 3.024
    或自定直径:    dp=dp= 3.024
    量棒中心所在圆上的压力角:
                ad1=ainv{dp/[z1*mn*cos(an)]+inv(at)-pi/2/z1+2*x1*tan(an)/z1}= 28.7544393871094
                ad2=ainv{dp/[z2*mn*cos(an)]+inv(at)-pi/2/z2+2*x2*tan(an)/z2}= 19.8488433357492

                M1=among[ceil(z1/2) eq z1/2 ,d1*cos(at)/cos(ad1)+dp,d1*cos(at)/cos(ad1)*cos(90/z1)+dp]= 34.6358335803297
                M2=among[ceil(z2/2) eq z2/2 ,d2*cos(at)/cos(ad2)+dp,d2*cos(at)/cos(ad2)*cos(90/z2)+dp]= 82.1561556591562
7 斜齿轮轴向齿距:    px=among[helix > 0 , pi*mn/sin(helix),0]= 16.4490227419999
8 斜齿轮导程:        pz1=among[helix > 0 ,z1*px,0]= 263.1843638719980
                pz2=among[helix > 0 ,z2*px,0]= 707.307977905996

speed_long

speed_long 发表于 2011-5-29 11:01

                               
登录/注册后可看大图

齿厚测量尺寸计算
1 固定弦齿厚:        s_c1=mn*= 2.7353968381878
                s_c2=mn*=  ...

        传动质量指标计算
1 齿顶点压力角:        aa1=acos(db1/da1)= 35.7203850069259
                aa2=acos(db2/da2)= 23.7675270426088
2 端面重合度:        ea=0.5*/pi*[ z1*tan(aa1)+z2*tan(aa2)-(z1+z2)*tan(at1)]= 1.4822137061791
3 斜齿轮纵向重合度:    eB=among[helix > 0 ,gw_work/px,0]= 1.2158777037212
4 总重合度:        er=ea+eB= 2.6980914099003
5 斜齿轮齿顶螺旋角:    Ba1=atan[da1/d1*tan(helix)]= 22.1694217995614
                    Ba2=atan[da2/d2*tan(helix)]= 19.8735120975199
6 法面齿顶厚:            san1=da1*{[0.5*pi+2*x1*tan(an)]/z1+inv(at)-inv(aa1)}*cos(Ba1)= 1.0306774895614
                    san2=da2*{[0.5*pi+2*x2*tan(an)]/z2+inv(at)-inv(aa2)}*cos(Ba2)= 1.4770605888661
    判断齿顶厚度是否足够?
    齿面类型(硬或软):    Tooth_face="硬齿面"
                    Thickness1_OK=among[Tooth_face  eq  "硬齿面",san1 >= 0.25*mn, san1 > 0.4*mn]= True
                    Thickness2_OK=among[Tooth_face  eq  "硬齿面",san2 >= 0.25*mn, san2 > 0.4*mn]= True
7 滑动比:
                    η1=(1+u)*[tan(aa2)-tan(at1)]/[tan(at1)-u*(tan(aa2)-tan(at1))]= 2.2132821367258
                    η2=(1+u)*[tan(aa1)-tan(at1)]/[u*tan(at1)-(tan(aa1)-tan(at1))]= 2.2132821341187
    滑动比的绝对值是否小于等于3?
                    η1_Ok=abs(η1) <= 3= True
                    η2_Ok=abs(η2) <= 3= True

speed_long

speed_long 发表于 2011-6-2 21:35

                               
登录/注册后可看大图

传动质量指标计算
1 齿顶点压力角:        aa1=acos(db1/da1)= 35.7203850069259
           ...

齿轮精度数据计算(GB/T10095-2001):
1 齿距累积总公差Fp:    Fp1=table[GB10095_2001_Fp,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.029
                Fp2=table[GB10095_2001_Fp,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.037
2 齿圈径向跳动公差Fr:    Fr1=table[GB10095_2001_Fr,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.023
                Fr2=table[GB10095_2001_Fr,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.029
3 单个齿距极限偏差±fpt:    fpt1=table[GB10095_2001_fpt,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.01
                    fpt2=table[GB10095_2001_fpt,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.011
4 齿廓总公差Fa:        Fa1=table[GB10095_2001_Fa,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.01
                Fa2=table[GB10095_2001_Fa,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.012
5 齿廓形状公差ffa:        ffa1=table[GB10095_2001_ffa,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.008
                    ffa2=table[GB10095_2001_ffa,分度圆1<d2,分度圆2 >=  d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.009
6 齿廓倾斜极限偏差±fHa:    fHa1=table[GB10095_2001_fHa,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.0065
                    fHa2=table[GB10095_2001_fHa,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.0075
7 螺旋线总公差FB:        FB1=table[GB10095_2001_FB,分度圆1<d1,分度圆2 >= d1,齿宽1<gw1,齿宽2>= gw1,精度等级 eq pgrade,公差值]/1000= 0.016
                    FB2=table[GB10095_2001_FB,分度圆1<d2,分度圆2 >= d2,齿宽1<gw2,齿宽2>= gw2,精度等级 eq pgrade,公差值]/1000= 0.015
8 螺旋线形状公差ffB:    ffB1=table[GB10095_2001_ffB,分度圆1<d1,分度圆1<d1,分度圆2 >= d1,齿宽1<gw1,齿宽2>= gw1,精度等级 eq pgrade,公差值]/1000= 0.012
                ffB2=table[GB10095_2001_ffB,分度圆1<d2,分度圆2 >= d2,齿宽1<gw2,齿宽2 >= gw2,精度等级 eq pgrade,公差值]/1000= 0.011
9 螺旋线倾斜极限偏差±fHB:    fHB1=table[GB10095_2001_fHB,分度圆1<d1,分度圆2 >= d1,齿宽1<gw1,齿宽2 >= gw1,精度等级 eq pgrade,公差值]/1000= 0.012
                        fHB2=table[GB10095_2001_fHB,分度圆1<d2,分度圆2 >= d2,齿宽1<gw2,齿宽2 >= gw2,精度等级 eq pgrade,公差值]/1000= 0.011

speed_long

speed_long 发表于 2011-6-2 21:35

                               
登录/注册后可看大图

传动质量指标计算
1 齿顶点压力角:        aa1=acos(db1/da1)= 35.7203850069259
           ...

齿轮精度数据计算(GB/T10095-2001):
1 齿距累积总公差Fp:    Fp1=table[GB10095_2001_Fp,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.029
                Fp2=table[GB10095_2001_Fp,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.037
2 齿圈径向跳动公差Fr:    Fr1=table[GB10095_2001_Fr,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.023
                Fr2=table[GB10095_2001_Fr,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.029
3 单个齿距极限偏差±fpt:    fpt1=table[GB10095_2001_fpt,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.01
                    fpt2=table[GB10095_2001_fpt,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.011
4 齿廓总公差Fa:        Fa1=table[GB10095_2001_Fa,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.01
                Fa2=table[GB10095_2001_Fa,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.012
5 齿廓形状公差ffa:        ffa1=table[GB10095_2001_ffa,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.008
                    ffa2=table[GB10095_2001_ffa,分度圆1<d2,分度圆2 >=  d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.009
6 齿廓倾斜极限偏差±fHa:    fHa1=table[GB10095_2001_fHa,分度圆1<d1,分度圆2 >= d1,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.0065
                    fHa2=table[GB10095_2001_fHa,分度圆1<d2,分度圆2 >= d2,模数1<mn,模数2 >= mn,精度等级 eq pgrade,公差值]/1000= 0.0075
7 螺旋线总公差FB:        FB1=table[GB10095_2001_FB,分度圆1<d1,分度圆2 >= d1,齿宽1<gw1,齿宽2>= gw1,精度等级 eq pgrade,公差值]/1000= 0.016
                    FB2=table[GB10095_2001_FB,分度圆1<d2,分度圆2 >= d2,齿宽1<gw2,齿宽2>= gw2,精度等级 eq pgrade,公差值]/1000= 0.015
8 螺旋线形状公差ffB:    ffB1=table[GB10095_2001_ffB,分度圆1<d1,分度圆1<d1,分度圆2 >= d1,齿宽1<gw1,齿宽2>= gw1,精度等级 eq pgrade,公差值]/1000= 0.012
                ffB2=table[GB10095_2001_ffB,分度圆1<d2,分度圆2 >= d2,齿宽1<gw2,齿宽2 >= gw2,精度等级 eq pgrade,公差值]/1000= 0.011
9 螺旋线倾斜极限偏差±fHB:    fHB1=table[GB10095_2001_fHB,分度圆1<d1,分度圆2 >= d1,齿宽1<gw1,齿宽2 >= gw1,精度等级 eq pgrade,公差值]/1000= 0.012
                        fHB2=table[GB10095_2001_fHB,分度圆1<d2,分度圆2 >= d2,齿宽1<gw2,齿宽2 >= gw2,精度等级 eq pgrade,公差值]/1000= 0.011