哈工大 机械设计电算

哈尔滨工业大学上机电算设计说明书HarbinInstituteofTechnology上机电算说明书课程名称：机械设计电算电算题目：普通V带传动设计院系：机电学院班级：1208107设计者：学号：指导教师：设计时间：2014.12.03哈尔滨工业大学哈尔滨工业大学上机电算设计说明书目录一普通V带传动设计内容和任务…………………………………………1二变量标示符……………………………………………………………………….1三程序框图…………………………………………………………………………...1四源程序代码………………………………………………………………………..2五程序运行结果……………………………………………………………………8六参考文献………………………………………………………………………….13哈尔滨工业大学上机电算设计说明书一、普通V带传动设计内容和任务1、普通V带传动设计内容给定原始数据：传递的功率P，小带轮转速n1，传动比i，各种必要的修正系数及工作条件。设计内容：带型号，基准长度Ld，根数Z，传动中心距a，小带轮基准直径dd1、大带轮基准直径dd2，初拉力F0，和压轴力Q，带轮轮缘宽度B。2、电算的任务：（1）编制V带传动设计程序框图。（2）编制V带传动设计原程序。（3）按习题或作业中数据运行程序，进行计算并输出所有结果。二、变量标识符序号名称代号标识符单位1名义功率PPkw2设计功率PdPdkw3工作情况系数KAKA4小带轮转速n1n1r/min5工作机载荷特性GZJ6原动机类型YDJ7工作时间TMIE8带型号Z、A…ETYPE9小带轮基准直径dd1dd1mm10大带论基准直径dd2dd2mm11带速vVm/s12最大带速vmaxVMAXm/s13预估中心距a0a0mm14实际中心距aamm15基准长度LdLdmm16小带轮包角α1ALF1度17V带根数ZZ18基本额定功率P0P0kw19功率增量ΔP0DIFP0kw20传动比系数KiKi21长度系数KLKL22包角系数KαKalf23弯曲影响系数KbKb24初拉力F0F0N25压轴力QQN26轮缘宽度BBmm27圆周率πPAI三、程序框图哈尔滨工业大学上机电算设计说明书四、程序源代码（MATLAB语言编写）源程序所有程序过多，所以只附上主程序代码i=str2double(get(handles.In_i,'String'));ifi=2开始输入原始数据P,n,i并选择电机计算设计功率由带型号确定最大带速，小带轮直径系，带的相关参数m，f，e相关系数Kb确定带型号选择小带轮直径验算带速vvm计算大带轮直径给定范围，预估中心距AA计算Ld并取标准值，计算实际中心距并圆整计算小带轮包角计算选择相关系数：Kα，Ki。插值计算P0，计算ΔP0计算带根数ZZ1计算相关参数结束下一型号下一带轮BB哈尔滨工业大学上机电算设计说明书Ki=1.1373;elseifi=1.52Ki=1.1202;elseifi=1.35Ki=1.1036;elseifi=1.25Ki=1.0875;elseifi=1.19Ki=1.0719;elseifi=1.13Ki=1.0567;elseifi=1.09Ki=1.0419;elseifi=1.05Ki=1.0276;elseifi=1.02Ki=1.0136;elseifi=1Ki=1.0000;endset(handles.Out_Ki,'String',num2str(Ki));dx=get(hObject,'Value')ifdx==1set(handles.Out_Vmax,'String',25);set(handles.Out_Kb,'String',0.0002925);set(handles.Out_ddmin,'String',50);set(handles.Out_m,'String',0.06);elseifdx==2set(handles.Out_Vmax,'String',25);set(handles.Out_Kb,'String',0.0007725);set(handles.Out_ddmin,'String',75);set(handles.Out_m,'String',0.1);elseifdx==3set(handles.Out_Vmax,'String',25);set(handles.Out_Kb,'String',0.0019875);set(handles.Out_ddmin,'String',125);set(handles.Out_m,'String',0.17);elseifdx==4set(handles.Out_Vmax,'String',25);set(handles.Out_Kb,'String',0.005625);set(handles.Out_ddmin,'String',200);set(handles.Out_m,'String',0.3);elseifdx==5set(handles.Out_Vmax,'String',30);set(handles.Out_Kb,'String',0.01995);set(handles.Out_ddmin,'String',355);哈尔滨工业大学上机电算设计说明书set(handles.Out_m,'String',0.6);elseifdx==6set(handles.Out_Vmax,'String',30);set(handles.Out_Kb,'String',0.03735);set(handles.Out_ddmin,'String',500);set(handles.Out_m,'String',0.9);enddd1=str2double(get(handles.In_dd1,'String'));n=str2double(get(handles.In_n,'String'));Vmax=str2double(get(handles.Out_Vmax,'String'));v=3.1415*dd1*n/60/1000;i=str2double(get(handles.In_i,'String'));ddd2=i*dd1;set(handles.Out_v,'String',num2str(v));set(handles.dd2,'String',num2str(ddd2));ifvVmaxset(handles.Attention,'String','“v”istoohuge.Pleasedecreasedd1!');elseset(handles.Attention,'String','OK!Pleasegoon!');enddd1=str2double(get(handles.In_dd1,'String'));dd2=str2double(get(handles.In_dd2,'String'));a0=str2double(get(handles.In_a0,'String'));Ld0=2*a0+3.1415*(dd1+dd2)/2+(dd2-dd1)^2/(4*a0);set(handles.Out_Ld0,'String',num2str(Ld0));Ld=str2double(get(handles.In_Ld,'String'));Ld0=str2double(get(handles.Out_Ld0,'String'));a0=str2double(get(handles.In_a0,'String'));dd1=str2double(get(handles.In_dd1,'String'));dd2=str2double(get(handles.In_dd2,'String'));a=a0+(Ld-Ld0)/2;alf1=180-(dd2-dd1)/a*57.3;set(handles.Out_a,'String',num2str(a));set(handles.Out_alf1,'String',num2str(alf1));dx=get(handles.Out_dx,'Value')Ki=str2double(get(handles.Out_Ki,'String'));Kb=str2double(get(handles.Out_Kb,'String'));n=str2double(get(handles.In_n,'String'));dd1=str2double(get(handles.In_dd1,'String'));v=str2double(get(handles.Out_v,'String'));ifdx==1K1=0.246;K2=7.44;K3=0.441/10000;elseifdx==2K1=0.449;哈尔滨工业大学上机电算设计说明书K2=19.02;K3=0.765/10000;elseifdx==3K1=0.794;K2=50.6;K3=1.31/10000;elseifdx==4K1=1.48;K2=143.2;K3=2.34/10000;elseifdx==5K1=3.15;K2=507.3;K3=4.77/10000;elseifdx==6K1=4.57;K2=951.5;K3=7.06/10000;endP0=(K1*v^(-0.09)-K2/dd1-K3*v^2)*v;set(handles.Out_P0,'String',num2str(P0));DP0=Kb*n*(1-1/Ki);set(handles.Out_DP0,'String',num2str(DP0));functionOut_P0_Callback(hObject,eventdata,handles)Pd=str2double(get(handles.Out_Pd,'String'));P0=str2double(get(handles.Out_P0,'String'));DP0=str2double(get(handles.Out_DP0,'String'));Kalf=str2double(get(handles.Out_Kalf,'String'));Kl=str2double(get(handles.Out_Kl,'String'));v=str2double(get(handles.Out_v,'String'));m=str2double(get(handles.Out_m,'String'));alf1=str2double(get(handles.Out_alf1,'String'));Z1=Pd/((P0+DP0)*Kalf*Kl);Z=ceil(Z1);F0=500*Pd*(2.5-Kalf)/Kalf/(Z*v)+m*v*v;FQ=2*Z*F0*sin(alf1/2*3.1415/180);ifZ=10set(handles.Attention,'String','Zistoohuge!Pleasereturntochoosethebelttype');elseset(handles.Attention,'String','OK!Plesegoon!');endset(handles.Out_Z,'String',num2str(Z));set(handles.Out_F0,'String',num2str(F0));set(handles.Out_FQ,'String',num2str(FQ));P0=str2double(get(handles.In_P0,'String'));哈尔滨工业大学上机电算设计说明书KA=str2double(get(handles.In_KA,'String'));Pd=P0*KA;set(handles.Out_Pd,'String',num2str(Pd));dd1=str2double(ge