%線性卷積

H=axes('unit','normalized','position',[0,0,1,1],'visible','off');
set(gcf,'currentaxes',H);
str='\fontname{隸書}線性卷積動態演示';
text(0.32,0.97,str,'fontsize',13);
set(gcf,'unit','normalized','position',[0.1,0.2,0.5,0.5]);
set(gcf,'defaultuicontrolunits','normalized');

haxes1=axes('position',[0.10,0.05,0.63,0.18]);%position后面的矩陣四個數據分別表示組建的坐標位置的左邊、底部、寬、高
                                              %整個圖形窗口的左下為（0，0），右上為（1，1）
haxes2=axes('position',[0.10,0.29,0.63,0.18]);
haxes3=axes('position',[0.10,0.53,0.63,0.18]);
haxes4=axes('position',[0.10,0.77,0.63,0.18]);

htext1=uicontrol(gcf,'style','text',...
                 'position',[0.01,0.88,0.08,0.06],...
                 'fontsize',13,...
                 'string','X(n)');
htext2=uicontrol(gcf,'style','text',...
                  'position',[0.01,0.64,0.08,0.06],...
                  'fontsize',12,...
                  'string','翻轉移位');
htext3=uicontrol(gcf,'style','text',...
                  'position',[0.01,0.40,0.08,0.06],...
                  'fontsize',12,...
                  'string','移位求積');
htext4=uicontrol(gcf,'style','text',...
                  'position',[0.01,0.15,0.08,0.06],...
                  'fontsize',12,...
                  'string','線性卷積');
htext5=uicontrol(gcf,'style','text',...
                 'position',[0.75,0.80,0.22,0.10],...
                 'fontsize',10,...
                 'string','輸入序列X1(n)=');
hcontrol=uicontrol(gcf,'style','pushbutton',...
                 'position',[0.75,0.18,0.22,0.10],...
                 'fontsize',10,...
                 'string','開始');
hedit1=uicontrol('style','edit',...
                 'position',[0.75,0.65,0.22,0.10],...
                 'backgroundcolor','white',...
                 'visible','on','CallBack',['x1=get(gcbo,''string'');',...
                 'x1=str2num(x1);']);
htext6=uicontrol(gcf,'style','text',...
                 'position',[0.75,0.50,0.22,0.10],...
                 'fontsize',10,...
                 'string','輸入序列X2(n)=');
hedit2=uicontrol('style','edit',...
                 'position',[0.75,0.35,0.22,0.10],...
                 'backgroundcolor','white',...
                 'visible','on','CallBack',['x2=get(gcbo,''string'');',...
                 'x2=str2num(x2);']);
hcontrol1=uicontrol(gcf,'style','pushbutton',...
                 'position',[0.75,0.05,0.22,0.10],...
                 'fontsize',10,...
                 'string','退出');

%set(hcontrol,'CallBack','xian(haxes1,haxes2,haxes3,haxes4,x1,x2);');
xian.m;
set(hcontrol1,'CallBack','close(gcf)');