f_realizemenu.asv

来自「digital signal processing常用工具箱」· ASV 代码 · 共 45 行

function hm_realize = f_realizemenu (inputstr,plotstr,realize)

%F_REALIZEMENU: Set up filter realization menu 
%
% Usage: hm_realize = f_realizemenu (inputstr,plotstr,realize)
%
% Inputs: 
%         inputstr = callback string to compute input
%         plotstr  = callback string to generate plot 
%         realize  = realization method (0=direct,1=cascade)
% Outputs:
%          hm_realize = array of menu handles

cstr = ['for i = 0 : 1, '...
        '   if i == realize, '...
        '       set (hm_realize(i+2),''Checked'',''on''), '...
        '   else, '...
        '       set (hm_realize(i+2),''Checked'',''off'), '...
        '   end, '...
        'end, '...
        inputstr ...
        plotstr ];

hm_realize(1) = uimenu (gcf,'Label','Realization');

hm_realize(2) = uimenu (hm_realize(1),'Label','Direct form');
hm_realize(3) = uimenu (hm_realize(1),'Label','Cascade form');
   
cback1 = ['realize=0; ' cstr];
set (hm_realize(2),'Callback',cback1);
      
cback2 = ['realize=1; '...
          'set(hm_realize(2),''Checked'',''off''), '...
          'set(hm_realize(3),''Checked'',''on''), '...
          inputstr ...
          plotstr];
set (hm_realize(3),'Callback',cback2);

if realize
    set(hm_realize(2),'Checked','off')
    set(hm_realize(3),'Checked','on')
else
    set(hm_realize(2),'Checked','on')
    set(hm_realize(3),'Checked','off')
end