0002-定量泵式灌裝機(jī)設(shè)計（全套CAD圖14張+說明書）,定量,灌裝,設(shè)計,全套,cad,14,說明書,仿單
吉林大學(xué)學(xué)士學(xué)位論文（電算程序）
1 程序流程圖
圖1 程序流程圖
本電算程序是齒輪的設(shè)計校核程序。輸入相關(guān)參數(shù)后程序按齒輪的齒根彎曲強(qiáng)度設(shè)計齒輪模數(shù)。再對齒輪的接觸疲勞強(qiáng)度進(jìn)行校核，如果滿足則輸出結(jié)果，程序結(jié)束，如果不滿足則加大模數(shù)再次進(jìn)行接觸強(qiáng)度的校核，直到滿足為止。程序的流程圖如圖1.
2 程序定義的變量
表1 變量含義
變量
變量的含義
變量
變量的含義
T1
小齒輪傳遞的轉(zhuǎn)矩
z2
大齒輪的齒數(shù)
z1
小齒輪的齒數(shù)
m
模數(shù)
n1
小齒輪轉(zhuǎn)速
d2
大齒輪分度圓直徑
d1
小齒輪分度圓直徑
P
小齒輪的輸入功率
Ea
端面重合度
Ye
重合度系數(shù)
Qd
齒寬系數(shù)
Yfa1
小齒輪齒形系數(shù)
Yfa2
大齒輪齒形系數(shù)
Ysa1
小齒輪應(yīng)力修正系數(shù)
Ysa2
大齒輪應(yīng)力修正系數(shù)
N1
小齒輪工作應(yīng)力循環(huán)系數(shù)
N2
大齒輪工作應(yīng)力循環(huán)系數(shù)
Yn1
小齒輪彎曲強(qiáng)度壽命系數(shù)
Lh
齒輪工作壽命
Yn2
大齒輪彎曲強(qiáng)度壽命系數(shù)
pflim1
小齒輪彎曲疲勞極限
pflim2
大齒輪彎曲疲勞極限
mt
修正前模數(shù)
Ka
齒輪使用系數(shù)
Kt
初選動載系數(shù)
Kv
動載系數(shù)
Kb
齒向載荷分布系數(shù)
Kaa
齒間載荷分配系數(shù)
K
修正系數(shù)
b
齒寬
ZE
彈性系數(shù)
Zh
節(jié)點(diǎn)區(qū)域系數(shù)
Ze
接觸強(qiáng)度重合度系數(shù)
Zn2
大齒輪接觸強(qiáng)度壽命系數(shù)
Zn1
小齒輪接觸強(qiáng)度壽命系數(shù)
phlim1
小齒輪接觸疲勞強(qiáng)度極限
phlim2
大齒輪接觸疲勞強(qiáng)度極限
Ph2
大齒輪的許用接觸應(yīng)力
Ph1
小齒輪的許用接觸應(yīng)力
程序中定義的變量的含義如表1中所示。
3 程序清單
#include
#include
#define PI 3.1415926
float xuanmo(float mm,int ii)
{
int i;
float a[]={1,1.25,1.5,2,2.5,3,4,5,6,8,10,12,16,20,25,32,40,50};
for(i=0;i<18;i++)
{
if (mmx2)
x1=x1;
else
x1=x2;
mt=pow(2.0*Kt*T1*Ye*x1/Qd/z1/z1,1.0/3);
v=PI*mt*z1*n1/60.0/1000.0;
printf("v=%em/s\n",v);
printf("輸入動載系數(shù)Kv=");
scanf("%lf",&Kv); /*動載系數(shù).P119.T6-7*/
printf("輸入齒向載荷分布系數(shù)Kb=");
scanf("%lf",&Kb); /*齒向載荷分布系數(shù).P120.T6-10*/
printf("輸入齒間載荷分布系數(shù)Kaa=");
scanf("%lf",&Kaa); /*齒間載荷分配系數(shù).P121.B6-4*/
K=Ka*Kaa*Kb*Kv;
m=pow(K/Kt,1.0/3)*mt;
again: m=xuanmo(m,i++);
printf("\n");
printf("*********************************************************\n");
printf("按齒根彎曲疲勞強(qiáng)度設(shè)計結(jié)果\n"); /*按齒根彎曲疲勞強(qiáng)度設(shè)計齒輪模數(shù)*/
printf("模數(shù)m=%emm/n",m);
d1=m*z1;
d2=m*z2;
b=Qd*d1;
B1=xuanchikuan(b);
B2=B1+5;
printf("齒輪主要幾何尺寸：\n");
printf("d1=%emm\n",d1);
printf("d2=%emm\n",d2);
printf("B1=%emm\n",B1);
printf("B2=%emm\n",B2);
printf("*********************************************************\n");
printf("\n");
printf("輸入彈性系數(shù)ZE=");
scanf("%lf",&ZE); /*彈性系數(shù).P122.B6-5*/
printf("輸入節(jié)點(diǎn)區(qū)域系數(shù)Zh=");
scanf("%lf",&Zh); /*節(jié)點(diǎn)區(qū)域系數(shù).P125.T6-14*/
printf("輸入接觸強(qiáng)度重合度系數(shù)Ze=");
scanf("%lf",&Ze); /*接觸強(qiáng)度重合度系數(shù).P124.T6-13*/
printf("輸入小齒輪接觸強(qiáng)度壽命系數(shù)Zn1=");
scanf("%lf",&Zn1); /*接觸強(qiáng)度壽命系數(shù).P126.T6-15*/
printf("輸入大齒輪接觸強(qiáng)度壽命系數(shù)Zn2=");
scanf("%lf",&Zn2); /*接觸強(qiáng)度壽命系數(shù).P126.T6-15*/
printf("輸入小齒輪接觸疲勞極限phlim1= MPa\b\b\b\b\b\b\b\b");
scanf("%lf",&phlim1); /*小齒輪接觸疲勞強(qiáng)度極限.P126-127.T6-16*/
printf("輸入大齒輪接觸疲勞極限phlim2= MPa\b\b\b\b\b\b\b\b");
scanf("%lf",&phlim2); /*大齒輪接觸疲勞強(qiáng)度極限.P126-127.T6-16*/
Ph1=phlim1*Zn1/Shmin;
Ph2=phlim2*Zn2/Shmin;
u=z2/z1;
Ph=pow(2*K*T1*(u+1)/B1/d1/d1/u,1.0/2)*ZE*Ze*Zh;
printf("\n");
printf("*********************************************************\n");
printf("小齒輪的許用接觸應(yīng)力[P]H1=%eMPa\n",Ph1); /*按齒根接觸疲勞強(qiáng)度校核齒輪*/
printf("大齒輪的許用接觸應(yīng)力[P]H2=%eMPa\n",Ph2);
if(Ph1[P]H1\n",Ph);
printf("接觸強(qiáng)度不滿足\n");
printf("程序?qū)⒃龃竽?shù)并再次進(jìn)行校核\n");
goto again;
}
}
else
{
if(Ph[P]H2\n",Ph);
printf("接觸強(qiáng)度不滿足\n");
printf("程序?qū)⒃龃竽?shù)并再次進(jìn)行校核\n");
goto again;
}
}
printf("*********************************************************\n");
printf("\n");
}
/*P=頁,B=表,T=圖,S=式*/
/*參考文獻(xiàn)：機(jī)械設(shè)計*/
/*本程序適用于模數(shù)小于50的閉式硬齒面齒輪*/
/*08.5.28*/
4 運(yùn)行結(jié)果截圖
圖2 程序運(yùn)行結(jié)果截圖
續(xù)圖2 程序運(yùn)行結(jié)果截圖
以上是以主變速箱中的旋耕齒輪為例進(jìn)行的計算，結(jié)果如圖2。
注：本程序的是在Turbo C for Windows 集成實(shí)驗與學(xué)習(xí)環(huán)境中編寫、運(yùn)行的。
9