哈工大—V带传动电算说明书.doc

哈尔滨工业大学电算说明书Harbin Institute of Technology课程设计说明书（论文）课程名称： 机械设计电算大作业 设计题目： V带传动电子计算器 院 系： 机电工程学院 班 级： 1508502 设 计 者： 于豪 学 号： 1150850206 指导教师： 曲建俊 设计时间： 2017.10,11 哈尔滨工业大学一、 电算流程图二、 用户界面三、 操作说明（一） 求设计功率和带轮转速：在左侧输入框中依次输入电机功率、电机转速、第一级传动比，并选择工作载荷情况、原动机类型、工作时间，最后勾选特殊工作需求，就可以按“计算设计功率Pd、带轮转速n1”键进行一次计算。（二） 确定V带类型：根据所求的设计功率和转速，在中央的表中找到对应的V带类型，并勾选对应类型的带轮。这时会出现对应的带轮系列直径。（三） 确定小带轮和大带轮直径：在带轮系列中选择一个小带轮直径填入右侧输入框。若V带速度合理，则在下方结果处输出大轮小轮直径；若V带速度大于最大V带速度，则在提示栏提示“choose dd1 again”。（四） 确定中心距和实际基准长度：利用上一步中得出的中心距范围，在输入框中填入初步中心间距，求出初步基准长度。查书上实际基准长度表，获得实际基准长度和对应的带长修正系数，填入右下的输入框中。（五） 输出剩余结果：按下输出结果按钮，计算器自动输出V带设计中需要的所有参数到下方的结果显示表中，完成一次计算。四、 电子计算器代码function varargout = trymechanicaldesign(varargin)gui_Singleton = 1;gui_State = struct(gui_Name, mfilename, . gui_Singleton, gui_Singleton, . gui_OpeningFcn, trymechanicaldesign_OpeningFcn, . gui_OutputFcn, trymechanicaldesign_OutputFcn, . gui_LayoutFcn, , . gui_Callback, );if nargin & ischar(varargin1) gui_State.gui_Callback = str2func(varargin1);endif nargout varargout1:nargout = gui_mainfcn(gui_State, varargin:);else gui_mainfcn(gui_State, varargin:);end% End initialization code - DO NOT EDIT%GUI自动生成的打开窗口准备程序function trymechanicaldesign_OpeningFcn(hObject, eventdata, handles, varargin)handles.output = hObject;guidata(hObject, handles);%在窗口打开同时完成下列数据输入global data_KA;%将 KA数值存入数组for a=1:4for b=1:3for c=1:2 data_KA(a,b,c)=0;endendenddata_KA(:,:,1)=1.0,1.1,1.2;1.1,1.2,1.3;1.2,1.3,1.4;1.3,1.4,1.5;data_KA(:,:,2)=1.1,1.2,1.3;1.2,1.3,1.4;1.4,1.5,1.6;1.5,1.6,1.8;global data_dd1; %将小带轮系列直径存入数组for a = 1:6for b = 1:4 data_dd1(a,b)=0;endenddata_dd1(1,:)=50 63 71 80;data_dd1(2,:)=75 90 100 125;data_dd1(3,:)=125 140 160 180;data_dd1(4,:)=200 250 315 400;data_dd1(5,:)=355 400 450 500;data_dd1(6,:)=500 560 630 710;global data_Kb data_K1 data_K2 data_K3; %将 Kb、K1、K2、K3数值存入数组data_Kb = 0.2925 0.7725 1.9875 5.625 19.95 37.35*10(-3);data_K1 = 0.246 0.449 0.794 1.48 3.15 4.57;data_K2 = 7.44 19.02 50.6 143.2 507.3 951.5;data_K3 = 0.441 0.765 1.31 2.34 4.77 7.06*10(-4);global data_e data_f data_m; 将 e、f、带轮单位质量数值存入数组data_e = 12 15 19 25.5 37 44.5;data_f = 8 10 12.5 17 23 29;data_m = 0.023 0.06 0.105 0.17 0.30 0.63 0.97;function varargout = trymechanicaldesign_OutputFcn(hObject, eventdata, handles) varargout1 = handles.output;function edit1_Callback(hObject, eventdata, handles)function edit1_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction edit2_Callback(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction edit2_CreateFcn(hObject, eventdata, handles)function edit6_Callback(hObject, eventdata, handles)function edit6_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction edit7_Callback(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction popupmenu1_Callback(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction popupmenu1_CreateFcn(hObject, eventdata, handles)function popupmenu2_Callback(hObject, eventdata, handles)function popupmenu2_CreateFcn(hObject, eventdata, handles)function popupmenu3_Callback(hObject, eventdata, handles)function popupmenu3_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction checkbox1_Callback(hObject, eventdata, handles)function checkbox2_Callback(hObject, eventdata, handles)function checkbox3_Callback(hObject, eventdata, handles)function pushbutton2_Callback(hObject, eventdata, handles)global data_KA;%调用已经存好的全局数组global Pd KA n1 i;%声明设计功率Pd、转速n1、传动i、KA为全局变量workstress = get(handles.popupmenu1,value);machinekind = get(handles.popupmenu2,value);worktime = get(handles.popupmenu3,value); specialcondition1 = get(handles.checkbox1,value);specialcondition2 = get(handles.checkbox2,value);specialcondition3 = get(handles.checkbox3,value); %获得工作环境及特殊条件KA = data_KA(workstress,machinekind,worktime);%通过已知工作环境确定KAif specialcondition1 = 1%如果有特殊工作要求则KA乘上1.1。 KA = 1.1*KA;elseif specialcondition2 = 1 KA = 1.1*KA;elseif specialcondition3 =1 KA = 1.1*KA;endP = str2double(get(handles.edit1,string);%获得输入的电机功率n1 = str2double(get(handles.edit2,string); %获得输入的电机转速i = str2double(get(handles.edit6,string); %获得输入的传动比Pd = P * KA; %计算设计功率set(handles.text14,String, Pd);set(handles.text16,String, n1); %输出设计功率和带轮转速function uibuttongroup1_SelectionChangedFcn(hObject, eventdata, handles)global data_dd1;global vmax;global beltkind;%声明或定义新的全局变量switch get(hObject,tag) %获得选择的V带种类并确定最大速度限制 case radiobutton1 beltkind = 1; vmax = 25; set(handles.text53,string,Z) case radiobutton2 beltkind = 2; vmax = 25; set(handles.text53,string,A) case radiobutton3 beltkind = 3; vmax = 25; set(handles.text53,string,B) case radiobutton4 beltkind = 4; vmax = 25; set(handles.text53,string,C) case radiobutton5 beltkind = 5; vmax = 30; set(handles.text53,string,D) case radiobutton6 beltkind = 6; vmax = 30; set(handles.text53,string,E)endset(handles.text19,string,data_dd1(beltkind,:);%输出所选V带类型对应的小带轮系列直径function edit9_Callback(hObject, eventdata, handles)function edit9_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction pushbutton4_Callback(hObject, eventdata, handles)global dd1 dd2 n1 i v vmax;dd1 = str2double(get(handles.edit9,string);%得到所选的小带轮直径dd2 = i * dd1;%计算得到大带轮直径v = pi * dd1 * n1 / 60 /1000;%计算速度if vvmax%检验带轮速度 set(handles.text33,string,choose dd1 again);else dd2 = round(dd2); set(handles.text25,string,dd1); set(handles.text27,string,dd2); amax = 2* (dd1 + dd2); amin = 0.7* (dd1 + dd2); set(handles.text36,string,amax); set(handles.text34,string,amin);endfunction edit10_Callback(hObject, eventdata, handles)function edit10_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction edit10_KeyPressFcn(hObject, eventdata, handles)function edit11_Callback(hObject, eventdata, handles)function edit11_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction edit12_Callback(hObject, eventdata, handles)function edit12_CreateFcn(hObject, eventdata, handles)if ispc & isequal(get(hObject,BackgroundColor), get(0,defaultUicontrolBackgroundColor) set(hObject,BackgroundColor,white);endfunction pushbutton6_Callback(hObject, eventdata, handles)global dd1 dd2 ;a0 = str2double(get(handles.edit10,string);Ld0 = 2*a0 +pi*(dd1+dd2)/2+(dd1-dd2)2/4/a0;set(handles.text38,string,Ld0);%根据输入的初步中心距计算初步基准长度function pushbutton5_Callback(hObject, eventdata, handles)global dd1 dd2 n1 i v Pd data_m;global beltkind data_Kb data_K1 data_K2 data_K3 ;global data_e data_f;Ld = str2double(get(handles.edit11,string);%获得实际基准长度a = round(2*Ld - pi*(dd1+dd2) + (2*Ld-pi*(dd1+dd2)2-8*(dd2-dd1)2)(1/2)/8);set(handles.text29,string,a);set(handles.text31,string,Ld);%输出实际基准长度和中心距ALF1 =180 - (dd2-dd1)*57.3/a;%计算小带轮包角set(handles.text42,string,ALF1);%输出小带轮包角switch round(ALF1/10)%确定带轮包角修正系数 case 22 KALF = 1.2; case 21 KALF = 1.15; case 20 KALF = 1.10; case 19 KALF = 1.05; case 18 KALF = 1; case 17 KALF = 0.98; case 16 KALF = 0.95; case 15 KALF = 0.92; case 14 KALF = 0.89; case 13 KALF = 0.86; case 12 KALF = 0.82; case 11 KALF = 0.78; case 10 KALF = 0.74; case 9 KALF = 0.69; endi = round(i,2);%确定传动比修正系数if i =1 Ki = 1;elseif i =1.02 Ki = 1