例7-15.m

这是一个MATLAB7.0基础与提高例题的所有源码

>> clf reset
>> H=axes('unit','normalized','position',[0,0,1,1],'visible','off');
>> set(gcf,'currentaxes',H);
>> text(0.12,0.93,'\fontname{楷书}归一化二阶系统的阶跃响应曲线','fontsize',13);
>> H_fig=get(H,'parent');
>> set(H_fig,'unit','normalized','position',[0.1,0.2,0.7,0.4]);
>>  h_axes=axes('parent',H_fig,...
            'unit','normalized','position',[0.1,0.14,0.5,0.7],...
            'xlim',[0 15],'ylim',[0 1.8],'fontsize',8);
>> h_text=uicontrol(H_fig,'style','text',...
                'unit','normalized','position',[0.67,0.74,0.25,0.14],...
                'horizontal','left','string',{'输入阻尼系数','zeata='});
>>  h_edit=uicontrol(H_fig,'style','edit',...
                'unit','normalized','position',[0.67,0.59,0.25,0.14],...
                'horizontal','left',...
                'callback',[...
                'z=str2num(get(gcbo,''string''));',...
                't=0:0.1:15;',...
                'for k=1:length(z);',...
                'y(:,k)=step(1,[1 2*z(k) 1],t);',...
                'plot(t,y(:,k));',...
                'if(length(z)>1),hold on,end,',...
                'end;',...
                'hold off,']);
>>  h_push1=uicontrol(H_fig,'style','push',...
               'unit','normalized','position',[0.67, 0.37 ,0.12 ,0.15],...
               'string','grid on','callback','grid on');
>> h_push2=uicontrol(H_fig,'style','push',...
               'unit','normalized','position',[0.67, 0.15 ,0.12 ,0.15],...
               'string','grid off','callback','grid off');
>> uimenu('Label','grid','callback','grid on,set(gca,''box'',''on''),')