未注册
2008-04-28, 10:51
clf reset
H=axes('unit','normalized','position',[0,0,1,1],'visible','off');
set(gcf,'currentaxes',H);
str='\fontname{隶书}归一化二阶系统的阶跃响应曲线';
text(0.12,0.93,str,'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.15,0.55,0.7],'xlim',[0 15],'ylim',[0 1.8],'fontsize',8);
h_text=uicontrol(h_fig,'style','text',...
'unit','normalized','position',[0.67,0.73,0.25,0.14],'horizontal',...
'left','string',...
{'输入阻尼比系数','zeta='});
z=1;t=0:0.1:15;step(1,[1 2*z 1],t);
h_edit=uicontrol(h_fig,'style','edit',...
'unit','normalized','backgroundColor','w',...
'position',[0.67,0.59,0.25,0.14],...
'horizontal','left',...
'callback',[...
'z=str2num(get(gcbo,"srting"));',...
't=0:0.1:15;',...
'for k=1:length(z);',...
'y(:,k)=step(1,[1 2*z 1],t);',...
'plot(t,y(:,k);)',...
'if (length(z)>1),hold on,end;',...
'end;',...
'hold off,']);
h_menu=uimenu(gcf,'label','Color');
h_submenu1=uimenu(h_menu,'label','Blue','callback','set(gcf),"Color","blue")');
h_submenu2=uimenu(h_menu,'label','Red','callback','set(gcf),"Color","red")');
h_submenu3=uimenu(h_menu,'label','white','callback','set(gcf),"Color","white")');
h_submenu4=uimenu(h_menu,'label','yellow','callback','set(gcf),"Color","yellow")');
h_submenu5=uimenu(h_menu,'label','green','callback','set(gcf),"Color","green")');
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.80,0.37,0.12,0.15],...
'string','grid off','callback','grid off');
0.67,0.73,0.25,0.14
h_push1=uicontrol(h_fig,'style','push',...
'unit','normalized','position',[0.67,0.15,0.12,0.15],...
'string','box on','callback','box on');
h_push2=uicontrol(h_fig,'style','push',...
'unit','normalized','position',[0.80,0.15,0.12,0.15],...
'string','box off','callback','box off');
H=axes('unit','normalized','position',[0,0,1,1],'visible','off');
set(gcf,'currentaxes',H);
str='\fontname{隶书}归一化二阶系统的阶跃响应曲线';
text(0.12,0.93,str,'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.15,0.55,0.7],'xlim',[0 15],'ylim',[0 1.8],'fontsize',8);
h_text=uicontrol(h_fig,'style','text',...
'unit','normalized','position',[0.67,0.73,0.25,0.14],'horizontal',...
'left','string',...
{'输入阻尼比系数','zeta='});
z=1;t=0:0.1:15;step(1,[1 2*z 1],t);
h_edit=uicontrol(h_fig,'style','edit',...
'unit','normalized','backgroundColor','w',...
'position',[0.67,0.59,0.25,0.14],...
'horizontal','left',...
'callback',[...
'z=str2num(get(gcbo,"srting"));',...
't=0:0.1:15;',...
'for k=1:length(z);',...
'y(:,k)=step(1,[1 2*z 1],t);',...
'plot(t,y(:,k);)',...
'if (length(z)>1),hold on,end;',...
'end;',...
'hold off,']);
h_menu=uimenu(gcf,'label','Color');
h_submenu1=uimenu(h_menu,'label','Blue','callback','set(gcf),"Color","blue")');
h_submenu2=uimenu(h_menu,'label','Red','callback','set(gcf),"Color","red")');
h_submenu3=uimenu(h_menu,'label','white','callback','set(gcf),"Color","white")');
h_submenu4=uimenu(h_menu,'label','yellow','callback','set(gcf),"Color","yellow")');
h_submenu5=uimenu(h_menu,'label','green','callback','set(gcf),"Color","green")');
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.80,0.37,0.12,0.15],...
'string','grid off','callback','grid off');
0.67,0.73,0.25,0.14
h_push1=uicontrol(h_fig,'style','push',...
'unit','normalized','position',[0.67,0.15,0.12,0.15],...
'string','box on','callback','box on');
h_push2=uicontrol(h_fig,'style','push',...
'unit','normalized','position',[0.80,0.15,0.12,0.15],...
'string','box off','callback','box off');