开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 图形图像 > 波变换 > 查看源码
dguidw1d.m
资源名称：wavelet_toolbox.rar　[点击查看]
上传用户：haiyisale
上传日期：2013-01-09
资源大小：3246k
文件大小：7k
源码类别：

波变换

开发平台：

Matlab

dguidw1d.m：源码内容
  1. function varargout = dguidw1d(varargin)
  2. %DGUIDW1D Demonstrates discrete 1-D 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 dguidw1d', 
  6. %   
  7. %   See also DWT, IDWT, WAVEDEC, WAVEREC.
  9. %   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 12-Mar-96.
  10. %   Last Revision: 03-Feb-2003.
  11. %   Copyright 1995-2004 The MathWorks, Inc.
  12. % $Revision: 1.14.4.2 $
  14. % Initialization and Local functions if necessary.
  15. if nargin>0
  16. action = varargin{1};
  17. switch action
  18.   case 'auto'    , wshowdrv('#autoMode',mfilename,'close');
  19.   case 'gr_auto' , wshowdrv('#gr_autoMode',mfilename,'close');
  21.   case 'getFigParam'
  22. figName  = 'Wavelet GUI Demo: Wavelet 1-D';
  23. showType = 'command';
  24. varargout = {figName,showType};
  26.   case 'slidePROC_Init'
  27. figHandle = varargin{2};
  28.     localPARAM = wtbxappdata('get',figHandle,'localPARAM');
  29.     if ~isempty(localPARAM)
  30.    active_fig = localPARAM{1};
  31.    delete(active_fig);
  32.        wtbxappdata('del',figHandle,'localPARAM');
  33.     end
  35.   case 'slidePROC'
  36. [figHandle,idxSlide]  = deal(varargin{2:end});
  37.     localPARAM = wtbxappdata('get',figHandle,'localPARAM');
  38. idxPREV = wshowdrv('#get_idxSlide',figHandle);
  39. if isempty(localPARAM)
  40. active_fig = dw1dtool;
  41. dw1dmngr('demo',active_fig,'noisdopp','db2',6);
  42. wenamngr('Inactive',active_fig);
  43. tag_pop_viewm = 'View_Mode';
  44. tag_declev    = 'Pop_DecLev';
  45. pop_handles   = findobj(active_fig,'style','popupmenu');
  46. pop_viewm     = findobj(pop_handles,'tag',tag_pop_viewm);
  47. pop_decm      = findobj(pop_handles,'tag',tag_declev);
  48. cba_viewm     = get(pop_viewm,'Callback');
  49. cba_decm      = get(pop_decm,'Callback');
  50. figTMP        = [];
  51. localPARAM = {active_fig,pop_viewm,cba_viewm,pop_decm,cba_decm,figTMP};
  52. wtbxappdata('set',figHandle,'localPARAM',localPARAM);
  53. wshowdrv('#modify_cbClose',figHandle,active_fig,'dw1dtool');
  54. else
  55. [active_fig,pop_viewm,cba_viewm,pop_decm,cba_decm,figTMP] = deal(localPARAM{:});
  56. end
  57. switch idxSlide
  58.   case 3
  59.   if idxPREV<idxSlide
  60.   msg = strvcat(...
  61.   'The present Display mode is Full Decomposition mode.', ...
  62.   ['To change the Display mode use the corresponding popupmenu ' ...
  63.   'in the middle of the window.'],...
  64.   'Six display modes are available.'...
  65.   );
  66.   wshowdrv('#gui_wait',figHandle,active_fig,msg);
  67.   else
  68.   msg = ['We select the Full Decomposition mode.'];
  69.   wshowdrv('#gui_wait',figHandle,active_fig,msg);
  70.   set(pop_viewm,'value',2);
  71.   eval(cba_viewm);
  72.   end
  73.   
  74.   case 4
  75.   msg = ['We select the Superimpose Mode.'];
  76.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  77.   set(pop_viewm,'value',4);
  78.   eval(cba_viewm);
  79.   
  80.   case 5
  81.   msg = ['We select the Show and Scroll Mode.'];
  82.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  83.   set(pop_viewm,'value',1);
  84.   eval(cba_viewm);
  86.   case 6
  87.   msg = ['We select the Separate Mode.'];
  88.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  89.   set(pop_viewm,'value',3);
  90.   eval(cba_viewm);
  92.   case 7
  93.   msg = ['We select the Tree Mode.'];
  94.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  95.   set(pop_viewm,'value',5);
  96.   eval(cba_viewm);
  98.   case 8
  99.   msg = ['We select the Show and Scroll (Stem Cfs) Mode.'];
  100.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  101.   set(pop_viewm,'value',6);
  102.   eval(cba_viewm);
  104.   case 9
  105.   if idxPREV<idxSlide
  106.   msg = ['We go back to the Full Decomposition mode.'];
  107.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  108.   set(pop_viewm,'value',2);
  109.   eval(cba_viewm);
  110.   else
  111.   msg = ['We restore the Full Decomposition at level 6.'];
  112.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  113.   set(pop_decm,'value',6);
  114.   eval(cba_decm);
  115.   end
  117.   case 10
  118.   msg = ['We select the Full Decomposition at level 2.'];
  119.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  120.   set(pop_decm,'value',2);
  121.   eval(cba_decm);
  123.   case 11
  124.   if idxPREV<idxSlide
  125.   msg = ['We restore the Full Decomposition at level 6.'];
  126.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  127.   set(pop_decm,'value',6);
  128.   eval(cba_decm);
  129.   else
  130.   delete(figTMP); modify_localPARAM(figHandle,localPARAM,[]);
  131.   end
  133.   case 12
  134.   if idxPREV>idxSlide
  135.   delete(figTMP); modify_localPARAM(figHandle,localPARAM,[]);
  136.   end
  137.   msg = 'The Compress pushbutton is used to call the compression tool.';
  138.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  139.   figTMP = dw1dmngr('comp',active_fig);
  140.   modify_localPARAM(figHandle,localPARAM,figTMP);
  141.   wenamngr('Inactive',figTMP);
  142.   msg = 'We compress the signal with the default options.';
  143.   wshowdrv('#gui_wait',figHandle,figTMP,msg); 
  144.   dw1dcomp('compress',figTMP,active_fig);
  146.   case 13
  147.   delete(figTMP); modify_localPARAM(figHandle,localPARAM,[]);
  148.   pause(2)
  149.   dw1dmngr('return_comp',active_fig,0);
  150.   wenamngr('Inactive',active_fig);
  151.   msg = 'The De-noise pushbutton is used to call the de-noising tool.';
  152.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  153.   figTMP = dw1dmngr('deno',active_fig);
  154.   modify_localPARAM(figHandle,localPARAM,figTMP)
  155.   wenamngr('Inactive',figTMP);
  156.   msg = 'We de-noise the signal with the default options.';
  157.   wshowdrv('#gui_wait',figHandle,figTMP,msg); 
  158.   dw1ddeno('denoise',figTMP,active_fig);
  160.   case 14
  161.   delete(figTMP); modify_localPARAM(figHandle,localPARAM,[]);
  162.   pause(2)
  163.   dw1dmngr('return_deno',active_fig,0);
  164.   wenamngr('Inactive',active_fig);
  165.   msg = 'The Statistics pushbutton is used to call the statistics tool.';
  166.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  167.   figTMP = dw1dmngr('stat',active_fig);
  168.   modify_localPARAM(figHandle,localPARAM,figTMP);
  169.   dw1dstat('demo',figTMP);
  170.   wenamngr('Inactive',figTMP);
  172.   case 15
  173.   delete(figTMP); modify_localPARAM(figHandle,localPARAM,[]);
  174.   pause(2)
  175.   msg = 'The Histograms pushbutton is used to call the histograms tool.';
  176.   wshowdrv('#gui_wait',figHandle,active_fig,msg); 
  177.   figTMP = dw1dmngr('hist',active_fig);
  178.   modify_localPARAM(figHandle,localPARAM,figTMP)
  179.   dw1dhist('demo',figTMP);
  180.   wenamngr('Inactive',figTMP);
  182.   case 16
  183.   delete(figTMP); modify_localPARAM(figHandle,localPARAM,[]);
  184.   pause(2)
  185. end
  186. end
  187. return
  188. end
  190. if nargout<1,
  191.   wshowdrv(mfilename)
  192. else
  193.   idx = 0; slide(1).code = {}; slide(1).text = {};
  194.   
  195.   %========== Slide 1 ==========
  196.   idx = idx+1;
  197.   slide(idx).code = {
  198.   'figHandle = gcf;',
  199.   [mfilename ,'(''slidePROC_Init'',figHandle);'],
  200.   '' };
  201.   
  202.   %========== Slide 2 to Slide 16 ==========
  203.   for idx = 2:16
  204.     slide(idx).code = {[mfilename ,'(''slidePROC'',figHandle,',int2str(idx),');']};
  205.   end
  206.   
  207.   varargout{1} = slide;
  208.   
  209. end
  212. %------------------------------------------------------------------------------------------%
  213. function modify_localPARAM(figHandle,localPARAM,figTMP)
  215. localPARAM{end} = figTMP;
  216. wtbxappdata('set',figHandle,'localPARAM',localPARAM);    
  217. %------------------------------------------------------------------------------------------%