%輸入開環(huán)傳遞函數(shù)傳函

gswin=figure('position',[100 150 600 400],...
           'name','輸入前向通道參數(shù)','menubar','none',...
           'NumberTitle','off','Resize','off');

dd=text(0.25,0.9,'前向通道參數(shù)');
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(gswin,'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(gswin,'style','edit','units','normalized','position',[0.2 0.15 0.4 0.1],...
        'string','[1 5 4 -10]','fontsize',15,'back',[1 1 1]);

%接受線性環(huán)節(jié)傳函，其中：num為分子；den為分母
getgs=['num1=eval(get(numedit,''string''));',...
       'den1=eval(get(denedit,''string''));',...
       'close(gswin);'];    
uicontrol(gswin,'style','push','units','normalized','position',[0.75 0.15 0.15 0.15],...
        'string','確定','fontsize',15,'call',getgs);

%畫邊框
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;