MATLAB.rar 10-轴系设计计算-2.m
www.pudn.com > MATLAB.rar > 10-轴系设计计算-2.m
% ---- 2-轴的设计计算(弯扭组合) ----
c=112; % 45钢的材料系数
d0=c*(p2/n2)^(1/3)*1.05; % 按扭转估算轴径,并考虑键槽影响
d=round(d0/5)*5;
alf=20; % 齿轮分度圆压力角
ft=round(2000*t1/d1); % 齿轮传递的圆周力(N)
fr=round(ft*tan(alf*hd)/cos(bat*hd)); % 齿轮传递的径向力(N)
fa=round(ft*tan(bat*hd)); % 齿轮传递的轴向力(N)
l1=36; % 齿宽中心线到A轴承支座反力作用点的距离(mm)
l2=36; % 齿宽中心线到B轴承支座反力作用点的距离(mm)
fah=round(ft*l2/(l1+l2)); % A支座H面反力(N)
fbh=ft-fah; % B支座H面反力(N)
mch=fah*l1; % H面弯矩(Nmm)
fav=round((fr*l2+fa*d2/2)/(l1+l2)); % A支座V面反力(N)
fbv=fr-fav; % B支座V面反力(N)
mcv1=fav*l1; % V面弯矩1(Nmm)
mcv2=fbv*l2; % V面弯矩2(Nmm)
mc12=mcv1-mcv2; % V面弯矩突变值(Nmm)
mcm=round(fa*d2/2); % 在截面C的集中力偶矩(Nmm)
mc1=round(sqrt(mch^2+mcv1^2)); % 合成弯矩1(Nmm)
mc2=round(sqrt(mch^2+mcv2^2)); % 合成弯矩1(Nmm)
if mc1>=mc2 % 确定最大弯矩(Nmm)
mc=mc1;
else
mc=mc2;
end
t2=round(9.55*1e6*p2/n2); % 大齿轮传递转矩(Nmm)
me=round(sqrt(mc^2+(0.6*t2)^2)); % 当量弯矩(Nmm)
cp=60; % 对称循环许用弯曲应力(MPa)
de=(me/0.1/cp)^(1/3)*1.05; % 按弯扭组合需要轴径,并考虑键槽影响
dc=48; % 危险截面C的实际直径(mm)
if de '满足轴的弯扭组合强度要求'
else
'不满足轴的弯扭组合强度要求,需要加大轴的直径'
end
disp ' ========== 轴弯扭组合强度计算 ==========';
fprintf(1,' 轴的最小直径 d = %3.3f mm \n',d);
fprintf(1,' 齿轮传递的圆周力 ft = %3.3f N \n',ft);
fprintf(1,' 径向力 fr = %3.3f N \n',fr);
fprintf(1,' 轴向力 fa = %3.3f N \n',fa);
fprintf(1,' H面-A支座反力 fah = %3.3f N \n',fah);
fprintf(1,' B支座反力 fbh = %3.3f N \n',fbh);
fprintf(1,' 弯矩 mch = %3.3f Nmm \n',mch);
fprintf(1,' V面-A支座反力 fav = %3.3f N \n',fav);
fprintf(1,' B支座反力 fbv = %3.3f N \n',fbv);
fprintf(1,' 弯矩1 mcv1 = %3.3f Nmm \n',mcv1);
fprintf(1,' 弯矩2 mcv2 = %3.3f Nmm \n',mcv2);
fprintf(1,' 弯矩突变值 mc12 = %3.3f Nmm \n',mc12);
fprintf(1,' 集中力偶值 mcm = %3.3f Nmm \n',mcm);
fprintf(1,' 合成弯矩1 mc1 = %3.3f Nmm \n',mc1);
fprintf(1,' 合成弯矩2 mc2 = %3.3f Nmm \n',mc2);
fprintf(1,' 大齿轮传递转距 t2 = %3.3f Nm \n',t2);
fprintf(1,' 轴危险截面的当量弯矩 me = %3.2f Nm \n',me);
fprintf(1,' 弯扭组合强度需要的轴径 de = %3.2f mm \n',de);
fprintf(1,' 轴危险截面的实际直径 dc = %3.2f mm \n',dc);
