anfltdsn.m

信号实验常用的simulink模型和mfile,可直接在matlan下运行。

function slide=anfltdsn
% This is a slideshow file for use with playshow.m and makeshow.m
% To see it run, type 'playshow anfltdsn', 

% Copyright (c) 1984-98 by The MathWorks, Inc.
if nargout<1,
  playshow anfltdsn
else
  %========== Slide 1 ==========

  slide(1).code={
   '%===========================',
   '% START',
   'global hrb gi_value;',
   'global li_ftype li_passband li_model;',
   'plot(0)',
   'hrb=zeros(1,6);',
   'l_cbstr=''global hrb gi_value; set(hrb,''''Value'''',0); set(gco,''''Value'''',1); gi_value=get(gco,''''UserData'''');'';',
   'hfig=gcf;',
   'l_color=get(hfig,''Color'');',
   'haxes=get(hfig,''CurrentAxes'');',
   'hinfo=findobj(hfig,''Tag'',''comments'');',
   'set(haxes,''Visible'',''off'');',
   'htitle=findobj(hfig,''Tag'',''afd_title_01'');',
   'hfrm=findobj(hfig,''Tag'',''afd_frame_01'');',
   'hstr=findobj(hfig,''Tag'',''afd_string_01'');',
   'hrb=[findobj(hfig,''Tag'',''afd_radio_01''),findobj(hfig,''Tag'',''afd_radio_02''),findobj(hfig,''Tag'',''afd_radio_03''),findobj(hfig,''Tag'',''afd_radio_04''),findobj(hfig,''Tag'',''afd_radio_05''),findobj(hfig,''Tag'',''afd_radio_06'')];',
   'htxt1=[findobj(hfig,''Tag'',''afd_txt1_01''),findobj(hfig,''Tag'',''afd_txt1_02''),findobj(hfig,''Tag'',''afd_txt1_03''),findobj(hfig,''Tag'',''afd_txt1_04''),findobj(hfig,''Tag'',''afd_txt1_05'')];',
   'hedit=[findobj(hfig,''Tag'',''afd_edit_01''),findobj(hfig,''Tag'',''afd_edit_02''),findobj(hfig,''Tag'',''afd_edit_03''),findobj(hfig,''Tag'',''afd_edit_04''),findobj(hfig,''Tag'',''afd_edit_05'')];',
   'htxt2=[findobj(hfig,''Tag'',''afd_txt2_01''),findobj(hfig,''Tag'',''afd_txt2_02''),findobj(hfig,''Tag'',''afd_txt2_03''),findobj(hfig,''Tag'',''afd_txt2_04''),findobj(hfig,''Tag'',''afd_txt2_05'')];',
   'if ~isempty(htitle),',
   '   set(htitle,''Visible'',''on'');',
   'else,',
   '   htitle=uicontrol(hfig,''Style'',''text'',''String'',''滤波器设计'',''Units'',''normalized'',''Position'',[0.1 0.92 0.2 0.05],''FontSize'',14,''BackgroundColor'',l_color,''HorizontalAlignment'',''left'',''Tag'',''afd_title_01'');',
   'end;',
   'if ~isempty(hfrm),',
   '   set(hfrm,''Visible'',''off'');',
   'else,',
   '   hfrm=uicontrol(hfig,''Style'',''frame'',''Units'',''normalized'',''Position'',[0.12 0.5 0.55 0.4],''Visible'',''off'',''Tag'',''afd_frame_01'');',
   'end;',
   'if ~isempty(hstr),',
   '   set(hstr,''Visible'',''off'');',
   'else,',
   '   hstr=uicontrol(hfig,''Style'',''text'',''String'','' '',''Units'',''normalized'',''Position'',[0.15 0.83 0.5 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Visible'',''off'',''Tag'',''afd_string_01'');',
   'end;',
   'if ~isempty(hrb),',
   '   set(hrb,''Visible'',''off'');',
   'else,',
   '   hrb(1)=uicontrol(hfig,''Style'',''radiobutton'',''String'',''单项选择钮一'',''Units'',''normalized'',''Position'',[0.23 0.77 0.4 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Callback'',l_cbstr,''UserData'',1,''Visible'',''off'',''Tag'',''afd_radio_01'');',
   '   hrb(2)=uicontrol(hfig,''Style'',''radiobutton'',''String'',''单项选择钮二'',''Units'',''normalized'',''Position'',[0.23 0.72 0.4 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Callback'',l_cbstr,''UserData'',2,''Visible'',''off'',''Tag'',''afd_radio_02'');',
   '   hrb(3)=uicontrol(hfig,''Style'',''radiobutton'',''String'',''单项选择钮三'',''Units'',''normalized'',''Position'',[0.23 0.67 0.4 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Callback'',l_cbstr,''UserData'',3,''Visible'',''off'',''Tag'',''afd_radio_03'');',
   '   hrb(4)=uicontrol(hfig,''Style'',''radiobutton'',''String'',''单项选择钮四'',''Units'',''normalized'',''Position'',[0.23 0.62 0.4 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Callback'',l_cbstr,''UserData'',4,''Visible'',''off'',''Tag'',''afd_radio_04'');',
   '   hrb(5)=uicontrol(hfig,''Style'',''radiobutton'',''String'',''单项选择钮五'',''Units'',''normalized'',''Position'',[0.23 0.57 0.4 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Callback'',l_cbstr,''UserData'',5,''Visible'',''off'',''Tag'',''afd_radio_05'');',
   '   hrb(6)=uicontrol(hfig,''Style'',''radiobutton'',''String'',''单项选择钮六'',''Units'',''normalized'',''Position'',[0.23 0.52 0.4 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Callback'',l_cbstr,''UserData'',6,''Visible'',''off'',''Tag'',''afd_radio_06'');',
   'end;',
   'if ~isempty(htxt1),',
   '   set(htxt1,''Visible'',''off'');',
   'else,',
   '   htxt1(1)=uicontrol(hfig,''Style'',''text'',''String'',''文本一'',''Units'',''normalized'',''Position'',[0.23 0.77 0.25 0.05],''FontSize'',10,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_txt1_01'');',
   '   htxt1(2)=uicontrol(hfig,''Style'',''text'',''String'',''文本二'',''Units'',''normalized'',''Position'',[0.23 0.72 0.25 0.05],''FontSize'',10,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_txt1_02'');',
   '   htxt1(3)=uicontrol(hfig,''Style'',''text'',''String'',''文本三'',''Units'',''normalized'',''Position'',[0.23 0.67 0.25 0.05],''FontSize'',10,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_txt1_03'');',
   '   htxt1(4)=uicontrol(hfig,''Style'',''text'',''String'',''文本四'',''Units'',''normalized'',''Position'',[0.23 0.62 0.25 0.05],''FontSize'',10,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_txt1_04'');',
   '   htxt1(5)=uicontrol(hfig,''Style'',''text'',''String'',''文本五'',''Units'',''normalized'',''Position'',[0.23 0.57 0.25 0.05],''FontSize'',10,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_txt1_05'');',
   'end;',
   'if ~isempty(hedit),',
   '   set(hedit,''Visible'',''off'');',
   'else,',
   '   hedit(1)=uicontrol(hfig,''Style'',''edit'',''String'','''',''Units'',''normalized'',''Position'',[0.485 0.772 0.1 0.045],''FontSize'',9,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_edit_01'',''BackgroundColor'',[1 1 1]);',
   '   hedit(2)=uicontrol(hfig,''Style'',''edit'',''String'','''',''Units'',''normalized'',''Position'',[0.485 0.722 0.1 0.045],''FontSize'',9,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_edit_02'',''BackgroundColor'',[1 1 1]);',
   '   hedit(3)=uicontrol(hfig,''Style'',''edit'',''String'','''',''Units'',''normalized'',''Position'',[0.485 0.672 0.1 0.045],''FontSize'',9,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_edit_03'',''BackgroundColor'',[1 1 1]);',
   '   hedit(4)=uicontrol(hfig,''Style'',''edit'',''String'','''',''Units'',''normalized'',''Position'',[0.485 0.622 0.1 0.045],''FontSize'',9,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_edit_04'',''BackgroundColor'',[1 1 1]);',
   '   hedit(5)=uicontrol(hfig,''Style'',''edit'',''String'','''',''Units'',''normalized'',''Position'',[0.485 0.572 0.1 0.045],''FontSize'',9,''HorizontalAlignment'',''right'',''Visible'',''off'',''Tag'',''afd_edit_05'',''BackgroundColor'',[1 1 1]);',
   'end;',
   'if ~isempty(htxt2),',
   '   set(htxt2,''Visible'',''off'');',
   'else,',
   '   htxt2(1)=uicontrol(hfig,''Style'',''text'',''String'',''单位一'',''Units'',''normalized'',''Position'',[0.59 0.77 0.04 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Visible'',''off'',''Tag'',''afd_txt2_01'');',
   '   htxt2(2)=uicontrol(hfig,''Style'',''text'',''String'',''单位二'',''Units'',''normalized'',''Position'',[0.59 0.72 0.04 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Visible'',''off'',''Tag'',''afd_txt2_02'');',
   '   htxt2(3)=uicontrol(hfig,''Style'',''text'',''String'',''单位三'',''Units'',''normalized'',''Position'',[0.59 0.67 0.04 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Visible'',''off'',''Tag'',''afd_txt2_03'');',
   '   htxt2(4)=uicontrol(hfig,''Style'',''text'',''String'',''单位四'',''Units'',''normalized'',''Position'',[0.59 0.62 0.04 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Visible'',''off'',''Tag'',''afd_txt2_04'');',
   '   htxt2(5)=uicontrol(hfig,''Style'',''text'',''String'',''单位五'',''Units'',''normalized'',''Position'',[0.59 0.57 0.04 0.05],''FontSize'',10,''HorizontalAlignment'',''left'',''Visible'',''off'',''Tag'',''afd_txt2_05'');',
   'end;',
   'set(hstr,''Visible'',''on'',''String'',''欢迎使用滤波器设计向导'');',
   'gi_value=1;',
   'li_ftype=1;',
   'li_passband=1;',
   'li_model=1;',
   'li_step=0;',
   '' };
  slide(1).text={
   '==================================',
   '　欢迎您使用滤波器设计教学向导！　',
   '==================================',
   '　　作为您的向导，我们将带领您领略滤波器设计的工作流程。',
   '整个旅途分为若干步骤。在这里，您看到的是第一屏，即第一个',
   '步骤。一“屏”就是设计过程的一个步骤窗口。每一屏所做的工',
   '作或为选择一种滤波器的子项，或为进行参数输入，或者输出相',
   '关的计算方法和结果。同时，在每一屏，您可以方便地通过“上',
   '一页”、“下一页”、“重置”来向前／后翻屏、重改数据等。',
   '此外，通过“演示”按钮，本向导能够按照默认值自动设计滤波',
   '器，在演示过程中，您随时可以停止演示并手动继续设计。',
   '　　现在, 您可以点下“开始”按钮，然后依照向导的帮助，设',
   '计出一个属于您的滤波器。',
   ''};

  %========== Slide 2 ==========

  slide(2).code={
   '%===========================',
   '% STEP 1',
   'set(haxes,''Visible'',''off'');',
   'set(htxt1,''Visible'',''off'')',
   'set(hedit,''Visible'',''off'')',
   'set(htxt2,''Visible'',''off'')',
   'set(hfrm,''Visible'',''on'');',
   'set(hstr,''Visible'',''on'',''String'',''请您选择滤波器类型（AF／DF）：'');',
   'set(hrb,''Visible'',''off'');',
   'set(hrb(1),''Visible'',''on'',''String'',''模拟滤波器'');',
   'set(hrb(2),''Visible'',''on'',''String'',''数字滤波器'');',
   'set(hrb,''Value'',0);',
   'set(hrb(li_ftype),''Value'',1);',
   'li_step=1;',
   '' };
  slide(2).text={
   '==================================',
   '　滤波器设计向导第一步：应用领域',
   '==================================',
   '　　请您选择滤波器的应用领域。',
   '　　将要设计的滤波器所处理的信号是模拟信号还是数字信号呢？',
   '　　请在上面的选择项中作出选择，然后单击“下一步”按钮。',
   ''};

  %========== Slide 3 ==========

  slide(3).code={
   '%===========================',
   '% STEP 2',
   'if li_step==1,',
   '   li_ftype=get(findobj(hrb,''Value'',1),''UserData'');',
   'end;',
   'if li_ftype==1,',
   '   set(haxes,''Visible'',''off'');',
   '   set(htxt1,''Visible'',''off'')',
   '   set(hedit,''Visible'',''off'')',
   '   set(htxt2,''Visible'',''off'')',
   '   set(hfrm,''Visible'',''on'');',
   '   set(hstr,''Visible'',''on'',''String'',''请您选择滤波器的通带形式（LP/BP/HP）：'');',
   '   set(hrb,''Value'',0);',
   '   set(hrb(li_passband),''Value'',1);',
   '   set(hrb,''Visible'',''off'');',
   '   set(hrb(1),''Visible'',''on'',''String'',''低通滤波器'');',
   '   set(hrb(2),''Visible'',''on'',''String'',''带通滤波器'');',
   '   set(hrb(3),''Visible'',''on'',''String'',''高通滤波器'');',
   'end;',
   'li_step=2;',
   '' };
  slide(3).text={
   '==================================',
   '　滤波器设计向导第二步：通带类型',
   '==================================',
   '　　接着，您需要确定要设计的滤波器是什么类型的，只有这样，',
   '才能做到“有的放矢”，所以，这之后的几个步骤都是用来确定您',
   '的设计目标的。',
   '　　低通、高通和带通这样一种分类是基于滤波器的频率响应并在',
   '实际应用中滤波效果而划分的。但是您心里应该清楚，我们最后设',
   '计出的滤波器是绝对不可能像理想的那样具有刀切式的滤波效果，',
   '那样的美梦是不可能实现的。当然，逼近理想滤波器的频率响应效',
   '果越好越符合人们的愿望，不过这样耗费的资源也越来越大。所以',
   '您在实际设计时，需要权衡利弊，做出合理的滤波器类型及参数的',
   '选择。',
   ''};

  %========== Slide 4 ==========

  slide(4).code={
   '%===========================',
   '% STEP 3',
   'if li_ftype==1,',
   '   if li_step==2,',
   '      li_passband=get(findobj(hrb,''Value'',1),''UserData'');',
   '   end;',
   '   set(haxes,''Visible'',''off'');',
   '   set(htxt1,''Visible'',''off'')',
   '   set(hedit,''Visible'',''off'')',
   '   set(htxt2,''Visible'',''off'')',
   '   set(hfrm,''Visible'',''on'');',