exm100432_1.m

matlab mfiles实例分析

% exm100432_1.m
clf reset
set(gcf,'unit','normalized','position',[0.1,0.2,0.64,0.35]);
set(gcf,'defaultuicontrolunits','normalized');
set(gcf,'defaultuicontrolfontsize',12);
set(gcf,'defaultuicontrolfontname','隶书');
set(gcf,'defaultuicontrolhorizontal','left');
str='归一化二阶系统阶跃响应曲线';
set(gcf,'name',str,'numbertitle','off');	
h_axes=axes('position',[0.05,0.2,0.6,0.7]);	 
set(h_axes,'xlim',[0,15]);					
str1='当前阻尼比=';
t=0:0.1:10;z=0.5;y=step(1,[1 2*z 1],t);
hline=plot(t,y);
htext=uicontrol(gcf,'style','text',...	
   'position',[0.67,0.8,0.33,0.1],...
   'string',[str1,sprintf('%1.4g\',z)]);
hslider=uicontrol(gcf,'style','slider',...
   'position',[0.67,0.65,0.33,0.1],...
   'max',2.02,'min',0.02,...		
   'sliderstep',[0.01,0.05],...
   'Value',0.5);				
hcheck1=uicontrol(gcf,'style','checkbox',...
   'string','最大峰值' ,...
   'position',[0.67,0.50,0.33,0.11]);
vchk1=get(hcheck1,'value');				
hcheck2=uicontrol(gcf,'style','checkbox',...
   'string','上升时间(0->0.95)',...
   'position',[0.67,0.35,0.33,0.11]);
vchk2=get(hcheck2,'value'); 		
set(hslider,'callback',[...			
   'z=get(gcbo,''value'');',...		
   'callcheck(htext,str1,z,vchk1,vchk2)']);
set(hcheck1,'callback',[...				
   'vchk1=get(gcbo,''value'');',...		
   'callcheck(htext,str1,z,vchk1,vchk2)']);	
set(hcheck2,'callback',[...			
   'vchk2=get(gcbo,''value'');',...	
   'callcheck(htext,str1,z,vchk1,vchk2)']);