dguisw2d.m
上传用户:haiyisale
上传日期:2013-01-09
资源大小:3246k
文件大小:2k
源码类别:

波变换

开发平台:

Matlab

  1. function varargout = dguisw2d(varargin)
  2. %DGUISW2D Demonstrates 2-D SWT de-noising wavelet GUI tools in the Wavelet Toolbox.
  3. %
  4. % This is a slideshow file for use with wshowdrv.m
  5. % To see it run, type 'wshowdrv dguisw2d', 
  6. %   
  7. %   See also SWT2, ISWT2.
  8. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 05-May-99.
  9. %   Last Revision: 03-Feb-2003.
  10. %   Copyright 1995-2004 The MathWorks, Inc.
  11. %   $Revision: 1.7.4.2 $  $Date: 2004/03/15 22:37:16 $
  12. % Initialization and Local functions if necessary.
  13. if nargin>0
  14. action = varargin{1};
  15. switch action
  16.   case 'auto'    , wshowdrv('#autoMode',mfilename,'close');
  17.   case 'gr_auto' , wshowdrv('#gr_autoMode',mfilename,'close');
  18.   case 'getFigParam'
  19. figName  = 'Wavelet GUI Demo: SW2D';
  20. showType = 'command';
  21. varargout = {figName,showType};
  22.   case 'slidePROC_Init'
  23. figHandle = varargin{2};
  24.     localPARAM = wtbxappdata('get',figHandle,'localPARAM');
  25.     if ~isempty(localPARAM)
  26.    active_fig = localPARAM{1};
  27.    delete(active_fig);
  28.        wtbxappdata('del',figHandle,'localPARAM');
  29.     end
  30.   case 'slidePROC'
  31.   [figHandle,idxSlide]  = deal(varargin{2:end});
  32.   localPARAM = wtbxappdata('get',figHandle,'localPARAM');
  33.   if isempty(localPARAM)
  34.   active_fig = sw2dtool;
  35.   wenamngr('Inactive',active_fig);
  36.   localPARAM = {active_fig};
  37.   wtbxappdata('set',figHandle,'localPARAM',localPARAM);
  38.   wshowdrv('#modify_cbClose',figHandle,active_fig,'sw2dtool');
  39.   else
  40.   active_fig = deal(localPARAM{:});
  41.   end
  42.   numDEM = idxSlide-1;
  43.   demoSET = {...
  44.   'noiswom'  , 'haar', 3 , {'penallo',46.12} ; ...
  45.   'noiswom'  , 'haar', 5 , {'penallo',48.62} ; ...
  46.   'noiswom'  , 'db3' , 4 , {'penallo',NaN}   ; ...
  47.   'nbarb1'   , 'db1' , 4 , {} ; ...
  48.   'noissi2d' , 'db1' , 2 , {}   ...
  49.   };
  50.   nbDEM = size(demoSET,1);
  51.   if ismember(numDEM,[1:nbDEM])
  52.   paramDEM = demoSET(numDEM,:);
  53.   sw2dtool('demo',active_fig,paramDEM{:});
  54.   wenamngr('Inactive',active_fig);
  55.   end
  56.   end
  57.   return
  58. end
  59. if nargout<1,
  60.   wshowdrv(mfilename)
  61. else
  62.   idx = 0; slide(1).code = {}; slide(1).text = {};
  63.   
  64.   %========== Slide 1 ==========
  65.   idx = idx+1;
  66.   slide(idx).code = {
  67.   'figHandle = gcf;',
  68.   [mfilename ,'(''slidePROC_Init'',figHandle);'],
  69.   '' };
  70.   %========== Slide 2 to 6 ==========
  71.   for idx = 2:6
  72.   slide(idx).code = {
  73.   [mfilename ,'(''slidePROC'',figHandle,', int2str(idx), ');']
  74.   };
  75.   end
  76.   
  77.   varargout{1} = slide;
  78.   
  79. end