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

波变换

开发平台:

Matlab

  1. function varargout = dguiwfus(varargin)
  2. %DGUIWFUS Demonstrates Image Fusion tool in the Wavelet Toolbox.
  3. %
  4. % This is a slideshow file for use with wshowdrv.m
  5. % To see it run, type 'wshowdrv dguiwfus', 
  6. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 04-Sep-2003.
  7. %   Last Revision: 11-Sep-2003.
  8. %   Copyright 1995-2004 The MathWorks, Inc.
  9. %   $Revision: 1.1.6.2 $  $Date: 2004/03/15 22:37:18 $
  10. % Initialization and Local functions if necessary.
  11. if nargin>0
  12. action = varargin{1};
  13. switch action
  14.   case 'auto'    , wshowdrv('#autoMode',mfilename,'close');
  15.   case 'gr_auto' , wshowdrv('#gr_autoMode',mfilename,'close');
  16.   case 'getFigParam'
  17.   figName  = 'Wavelet GUI Demo: Image Fusion';
  18.   showType = 'command';
  19.   varargout = {figName,showType};
  20.   case 'slidePROC_Init'
  21.   figHandle = varargin{2};
  22.   localPARAM = wtbxappdata('get',figHandle,'localPARAM');
  23.   if ~isempty(localPARAM)
  24.   active_fig = localPARAM{1};
  25.   delete(active_fig);
  26.   wtbxappdata('del',figHandle,'localPARAM');
  27.   end
  28.   case 'slidePROC'
  29.   [figHandle,idxSlide]  = deal(varargin{2:end});
  30.   localPARAM = wtbxappdata('get',figHandle,'localPARAM');
  31.   if isempty(localPARAM)
  32.   active_fig = wfustool;
  33.   wenamngr('Inactive',active_fig);
  34.   localPARAM = {active_fig};
  35.   wtbxappdata('set',figHandle,'localPARAM',localPARAM);
  36.   wshowdrv('#modify_cbClose_NEW',figHandle,active_fig,'wfustool');
  37.   else
  38.   active_fig = deal(localPARAM{:});
  39.   end
  40.   numDEM = idxSlide-1;
  41.           nbDEM = 17;
  42.   if ismember(numDEM,[1:nbDEM])
  43.               wfustool('demoPROC',active_fig,[],[],numDEM);
  44.   wfigmngr('storeValue',active_fig,'File_Save_Flag',1);
  45.   wenamngr('Inactive',active_fig);
  46.   end
  47. end
  48. return
  49. end
  50. if nargout<1,
  51.   wshowdrv(mfilename)
  52. else
  53.   idx = 0; slide(1).code = {}; slide(1).text = {};
  54.   
  55.   %========== Slide 1 ==========
  56.   idx = idx+1;
  57.   slide(idx).code = {
  58.   'figHandle = gcf;',
  59.   [mfilename ,'(''slidePROC_Init'',figHandle);'],
  60.   '' };
  61.   
  62.   %========== Slide 2 to 18 ==========
  63.   for idx = 2:18
  64.   slide(idx).code = {
  65.   [mfilename ,'(''slidePROC'',figHandle,', int2str(idx), ');']
  66.   };
  67.   end
  68.   
  69.   varargout{1} = slide;
  70.   
  71. end