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

speed_long

per-shaving 发表于 2017-11-24 02:53
vrey good! 谢谢分享！

        齿形检测时检测范围的计算
(以下内容复制到计算不求人软件里即可使用)
                       
                输入数据
1 模数:                mn=input(5)
2 齿数:                z1=input(20)
                        z2=input(35)
3 螺旋角:                helix=input(0)
4 基本齿廓
        齿形角:                        an=input(20)
        齿顶高系数:                ha_m=input(1)
        径向间隙系数:                c_m=input(0.25)
        齿根圆角半径系数:        p_m=input(0.38)
5 变位系数:        x1=input(0)
                        x2=input(0)

                主要几何参数计算
1 分度(标准)中心距:        a_bz=(z1+z2)*mn/2/cos(helix)
2 变位系数和:                x_sum=x1+x2=
3 端面齿形角:                at=atan(tan(an)/cos(helix))
                                mt=mn/cos(helix)
4 端面啮合角:                at1=ainv[2*x_sum*tan(an)/(z1+z2)+inv(at)]
5 中心距变动系数:        y=(z1+z2)/2/cos(helix)*[cos(at)-cos(at1)]/cos(at1)
6 补偿变位系数:                deta_y=x_sum-y
7 工作中心距:                a_work=a_bz+mn*y
8 分度圆直径:                d1=mn*z1/cos(helix)
                                d2=mn*z2/cos(helix)
9 齿顶圆直径:                da1=d1+2*(ha_m+x1-deta_y)*mn
                                da2=d2+2*(ha_m+x2-deta_y)*mn
10 基圆直径:                db1=d1*cos(at)
                                db2=d2*cos(at)

                检测参数计算
一、起测展开长度确定
1）按与配对齿轮啮合时的工作圆确定
起测展开长度：                gaA1=a_work*sin(at1)-power[da2*da2/4-db2*db2/4,0.5]
                                gaA2=a_work*sin(at1)-power[da1*da1/4-db1*db1/4,0.5]

2）按与齿条相啮合时的工作圆确定
起测展开长度：                gaA1=db1/2*tan(at)-mt/sin(at)
                                gaA2=db2/2*tan(at)-mt/sin(at)

上述二种方法中，当图样未确定检测范围时，
一般按第二种方法确定。

起测展开角：                ψaA1=gaA1/db1*2*180/pi
                                ψaA2=gaA2/db2*2*180/pi

二、终测展开长度的确定
齿顶允许倒棱高度：        Hdl1=input(1)
                                Hdl2=input(1)
                                gaB1=power[(da1/2-Hdl1)^2-db1^2/4,0.5]
                                gaB2=power[(da2/2-Hdl2)^2-db2^2/4,0.5]

终测展开角：                ψaB1=gaB1/db1*2*180/pi
                                ψaB2=gaB2/db2*2*180/pi



注意：神奇的“input()", 把已知参数放在input() 的括号里，可以把计算界面变成窗口式交互，然后在窗口式界面改变参数计算。

w15165682235

很不错的，学习！

chenzl1223

好用！很好用！

speed_long

        任意圆齿厚和任意齿厚计算
                                       
        输入数据
1 模数:                mn=input(5)
2 齿数:                z1=input(20)
                        z2=input(35)
3 螺旋角:                helix=input(0)
4 基本齿廓
        齿形角:                        an=input(20)
        齿顶高系数:                ha_m=input(1)
        径向间隙系数:                c_m=input(0.25)
        齿根圆角半径系数:        p_m=input(0.38)

5 变位系数:        x1=input(0)
                        x2=input(0)

        主要几何参数计算
1 分度(标准)中心距:        a_bz=(z1+z2)*mn/2/cos(helix)= 137.5
2 变位系数和:                x_sum=x1+x2= 0
3 端面齿形角:                at=atan(tan(an)/cos(helix))= 19.200000
4 端面啮合角:                at1=ainv[2*x_sum*tan(an)/(z1+z2)+inv(at)]= 19.200000
5 中心距变动系数:        y=(z1+z2)/2/cos(helix)*[cos(at)-cos(at1)]/cos(at1)= 0
6 补偿变位系数:                deta_y=x_sum-y= 0
7 工作中心距:                a_work=a_bz+mn*y= 137.5

8 分度圆直径:                d1=mn*z1/cos(helix)= 100
                                d2=mn*z2/cos(helix)= 175
9 齿数比(传动比):        u=z2/z1= 1.75
10 节圆直径:                d_node1=2*a_work/(u+1)= 100
                                d_node2=2*a_work*u/(u+1)= 175
11 齿顶圆直径:                da1=d1+2*(ha_m+x1-deta_y)*mn= 108
                                da2=d2+2*(ha_m+x2-deta_y)*mn= 183
12 齿根圆直径:                df1=d1-2*(ha_m+c_m-x1)*mn= 89.5
                                df2=d2-2*(ha_m+c_m-x2)*mn= 164.5
13 齿高:                        h1=(da1-df1)/2= 9.25
                                h2=(da2-df2)/2= 9.25
14 法面分度圆齿厚:        sn1=[pi/2+2*x1*tan(an)]*mn= 7.853982
                                sn2=[pi/2+2*x2*tan(an)]*mn= 7.853982
15 基圆直径:                db1=d1*cos(at)= 94.437637
                                db2=d2*cos(at)= 165.265865
16 基圆螺旋角:                Bb=asin[sin(helix)*cos(an)]= 0

stop
                               
6 任意圆直径:                dy1=input(d1)
对应齿厚：                        sy=dy1/d1*sn1-dy1*[inv(acos(db1/dy1))-inv(at)]
7 任意齿厚:                sy1=input(sn1)
对应直径：                        dy=rote[dy,df1 to da1,dy/d1*sn1-dy*inv(acos(db1/dy))+dy*inv(at)-sy1]

jhoste

可以导出EXCEL表格出来吗。

speed_long

jhoste 发表于 2019-2-26 08:32
可以导出EXCEL表格出来吗。

说说你的具体想法。

land089

看看！！！！！！！！！！！！！！！

speed_long

jhoste 发表于 2019-2-26 08:32
可以导出EXCEL表格出来吗。

如图，计算结果可以通过 write() 输出，可在输出窗口保存后导入EXCEL

hcx7810

在EXCEL绝对计算不了这么详细的参数，请求下载

jhoste

件：计算不求人，机械设计计算