input_h.m

控制系统仿真中的频率特性的MATLAB源码

%输入反馈环节传函

hswin=figure('position',[100 150 600 400],...
           'name','输入反馈环节参数','menubar','none',...
           'NumberTitle','off','Resize','off');

dd=text(0.25,0.9,'反馈环节参数');
set(dd,'fontsize',15,'color',[0,0,1],'fontname','宋体');

%分子输入框
dd=text(0,0.7,'请输入分子:');
set(dd,'fontsize',15,'color',[0,0,1],'fontname','宋体');
numedit=uicontrol(hswin,'style','edit','units','normalized','position',[0.2 0.45 0.4 0.1],...
        'string','[1]','fontsize',15,'back',[1 1 1]);

%分母输入框
dd=text(0,0.3,'请输入分母:');
set(dd,'fontsize',15,'color',[0,0,1],'fontname','宋体');
denedit=uicontrol(hswin,'style','edit','units','normalized','position',[0.2 0.15 0.4 0.1],...
        'string','[1 2]','fontsize',15,'back',[1 1 1]);

%接受线性环节传函，其中：num为分子；den为分母
geths=['num2=eval(get(numedit,''string''));',...
       'den2=eval(get(denedit,''string''));',...
       'close(hswin);'];    
uicontrol(hswin,'style','push','units','normalized','position',[0.75 0.15 0.15 0.15],...
        'string','确定','fontsize',15,'call',geths);

%画边框
hold on;
x=[-0.05 0.7 0.7 -0.05 -0.05];
y=[0.8 0.8 0 0 0.8];
plot(x,y,'r');

axis([-0.05 1 0 1]);
axis off;