matlab程序及其结果.doc

function varargout = keshe(varargin)gui_Singleton = 1;gui_State = struct(gui_Name, mfilename, . gui_Singleton, gui_Singleton, . gui_OpeningFcn, keshe_OpeningFcn, . gui_OutputFcn, keshe_OutputFcn, . gui_LayoutFcn, , . gui_Callback, );if nargin & ischar(varargin1) gui_State.gui_Callback = str2func(varargin1);end if nargout varargout1:nargout = gui_mainfcn(gui_State, varargin:);else gui_mainfcn(gui_State, varargin:);end% End initialization code - DO NOT EDIT % - Executes just before keshe is made visible.function keshe_OpeningFcn(hObject, eventdata, handles, varargin)handles.output = hObject; guidata(hObject, handles); % - Outputs from this function are returned to the command line.function varargout = keshe_OutputFcn(hObject, eventdata, handles) varargout1 = handles.output; function edit1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit1_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);endfunction edit2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit2_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end % - Executes on button press in pushbutton1.function pushbutton1_Callback(hObject, eventdata, handles)axes(handles.axes1);claa=get(handles.edit1,string);b=get(handles.edit2,string);aa=tf(str2num(a),str2num(b);axes(handles.axes1);rlocus(aa,r); %set(handles.edit5,string,); % - Executes on button press in pushbutton2.function pushbutton2_Callback(hObject, eventdata, handles)a=get(handles.edit1,string);b=get(handles.edit2,string);axes(handles.axes2);sys=tf(str2num(a),str2num(b);sys=feedback(sys,1);pzmap(sys)% - Executes on button press in pushbutton3.function pushbutton3_Callback(hObject, eventdata, handles)set(handles.edit1,string,);set(handles.edit2,string,);set(handles.edit5,string,);set(handles.edit3,string,);set(handles.edit4,string,);set(handles.edit6,string,);set(handles.edit7,string,);set(handles.edit11,string,);set(handles.edit8,string,);set(handles.edit12,string,);set(handles.edit9,string,);set(handles.edit10,string,);set(handles.edit13,string,);axes(handles.axes1)claaxes(handles.axes2)cla % - Executes on button press in pushbutton4.function pushbutton4_Callback(hObject, eventdata, handles)a=get(handles.edit1,string);b=get(handles.edit2,string);aa=tf(str2num(a),str2num(b);num=aa.num1;den=aa.den1;p=roots(den);z=roots(num);n=length(p);m=length(z); axes(handles.axes1)cla axes(handles.axes1);rlocus(aa,r);hold onif nm s=(sum(p)-sum(z)/(n-m); set(handles.edit5,string,s); sd=; if nargout1 for i=1:n-m sd=sd,s; end sysa=zpk(,sd,1); hold on; r,k=rlocus(sysa); for i=1:n-m plot(real(r(i,:),imag(r(i,:),g:); end endend % - Executes on button press in pushbutton5.function pushbutton5_Callback(hObject, eventdata, handles)a=get(handles.edit1,string);b=get(handles.edit2,string);aa=tf(str2num(a),str2num(b);sys=feedback(aa,1);%axes(handles.axes2);p,z=pzmap(sys);if real(p)0 K=K,Kk(i); s=s,ss(i);%舍去负增益对应分离点 else S=木有分离点; endendfunction edit4_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit4_CreateFcn(hObject, eventdata, handles) if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit5_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit5_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end % - Executes on button press in pushbutton9.function pushbutton9_Callback(hObject, eventdata, handles)a=get(handles.edit1,string);b=get(handles.edit2,string);aa=tf(str2num(a),str2num(b); K,Wcg=imwk(aa); if isempty(Wcg) set(handles.edit6,string,NULL); set(handles.edit7,string,NULL);elsegg=num2str(Wcg);mm=num2str(K);set(handles.edit6,string,gg);set(handles.edit7,string,mm);end K0,Wcg0=imwk(aa);kt=num2str(K0);set(handles.edit8,string,kt);set(handles.edit11,string,0); K1,st=breakin(aa);kz=num2str(K1);set(handles.edit12,string,kz);K2,Wcg2=imwk(aa);kzz=num2str(K2);set(handles.edit9,string,kzz); K3,s=breakin(aa);set(handles.edit13,string,0);kw=num2str(K3);set(handles.edit10,string,kw);function K,Wcg=imwk(sys)sys=tf(sys);num=sys.num1;den=sys.den1;asys=allmargin(sys);Wcg=asys.GMFrequency;K=asys.GainMargin; function edit6_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit6_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit7_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit7_CreateFcn(hObject, eventdata, handles) if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit8_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit8_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit9_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit9_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit10_Callback(hObject, eventdata, handles)% - Executes during object creation, after setting all properties.function edit10_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit11_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit11_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit12_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit12_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit13_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit13_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit14_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit14_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit15_Callback(hObject, eventdata, handles)% - Executes during object creation, after setting all properties.function edit15_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end function edit16_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties.function edit16_CreateFcn(hObject, eventdata, handles)if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end % - Executes on button press in pushbutton10.function pushbutton10_Callback(hObject, eventdata, handles)global mm c=get(handles.edit14,string);a=get(handles.edit15,string);b=get(handles.edit16,string);Gk=tf(str2num(a),str2num(b);switch mm case 1 Gkd=c2d(Gk,str2num(c),zoh); case 2 Gkd=c2d(Gk,str2num(c),foh);endset(handles.pushbutton12,Enable,on);axes(handles.axes3);rlocus(Gkd); % - Executes on button press in pushbutton11.function pushbutton11_Callback(hObject, eventdata, handles)set(handles.edit14,string,1);set(handles.edit15,string,);set(handles.edit16,string,);set(handles.edit17,string,);set(handles.edit18,string,);set(handles.pushbutton12,Enable,off);set(handles.pushbutton13,Enable,off);axes(handles.axes3)cla % - Executes on button press in pushbutton12.function pushbutton12_Callback(hObject, eventdata, handles)global kk;c=get(handles.edit14,string);a=get(handles.edit15,string);b=get(handles.edit16,string);Gk=tf(str2num(a),str2num(b);Gkd=c2d(Gk,str2num(c);kk,poles=rlocfind(Gkd);set(handles.pushbutton13,Enable,on); % - Executes on button press in pushbutton13.function pushbutton13_Callback(hObject, eventdata, handles)global kk;set(handles.edit18,string,