deconv.m

采用matlab编写的数字图像恢复程序

        'set(ui_a1,''backgroundcolor'',bgcolor);', ...
        'set(ui_a1,''foregroundcolor'',white);', ...
	'set(ui_a1,''visible'',''on'');', ...		
	'help setup_data;'];

% We're through defining actions for the data menu, now define the menu.
uidatamenu = uimenu(guifig, ...
	'label','Data   ');
	
	uidatamenu_sim = uimenu(uidatamenu, ...
		'callback',uidatamenu_sim_action, ...
		'label','SOR Simulations');
	uidatamenu_obs = uimenu(uidatamenu, ...
		'callback',uidatamenu_obs_action, ...
		'label','SOR Observations');
	uidatamenu_load = uimenu(uidatamenu, ...
		'callback',uidatamenu_load_action, ...
		'label','User Data');
	uidatamenu_help = uimenu(uidatamenu, ...
		'callback',uidatamenu_help_action, ...
		'label','Help');

% Setup Method Menu
% Define callback actions for the method menu
uimethodmenu_fft_action = ...
		['if strcmp(datasetupflag,''Set up data first'')==1,'...
			'set(ui_a1,''background'',[1 0 0]),' ...
		'else,' ...
			'fft_param,' ...
		'end'];

uimethodmenu_nonneg_action = ...
		['if strcmp(datasetupflag,''Set up data first'')==1,'...
			'set(ui_a1,''background'',[1 0 0]),' ...
		'else,' ...
		'nonneg_param,', ...
		'end'];

uimethodmenu_tv_action = ...
		['if strcmp(datasetupflag,''Set up data first'')==1,',...
			'set(ui_a1,''background'',[1 0 0]),' ,...
		'else,' ,...
			'tv_param,' ,...
		'end'];

uimethodmenu_help_action = ...
	['eval(hideall);', ...
	'guifigsize = [20 scrn(4)-225 350 150];', ...
	'set(guifig,''position'',guifigsize);', ...
	'guifigy = guifigsize(4)-20;', ...
	'datasetuppos = [0 guifigy guifigsize(3) 20];', ...
       	'set(ui_a1,''style'',''text'');', ...
        'set(ui_a1,''string'',', ...
        ' ''See the MatLab Command Window for help.'');', ...
        'set(ui_a1,''position'',datasetuppos);', ...
        'set(ui_a1,''horizontalalignment'',''center'');', ...
        'set(ui_a1,''backgroundcolor'',bgcolor);', ...
        'set(ui_a1,''foregroundcolor'',white);', ...
	'set(ui_a1,''visible'',''on'');', ...		
	'help tv_driver;', ...
	'fprintf(''--------------------------------------------------'');', ...
	'help nonneg_driver;', ...
	'fprintf(''--------------------------------------------------'');', ...
	'help fft_driver;'];

uimethodmenu = uimenu(guifig, ...
	'label','Method   ');
	
	uimethodmenu_fft = uimenu(uimethodmenu, ...
		'label','Tikh fft', ...
		'callback',uimethodmenu_fft_action);
	uimethodmenu_nonneg = uimenu(uimethodmenu, ...
		'label','Tikh nonneg', ...
		'callback',uimethodmenu_nonneg_action);
	uimethodmenu_tv = uimenu(uimethodmenu, ...
		'label','Tikh TV', ...
		'callback',uimethodmenu_tv_action);
	uimethodmenu_help = uimenu(uimethodmenu, ...
		'label','Help', ...
		'callback',uimethodmenu_help_action);
%%%%%%%%  End Menu Setup  %%%%%%%%%

%  Create Graphic Controls and make invisible
%  This allows us to set control properties rather than 
%  creating new controls for different methods.  To setup a new method,
%  we hideall controls and then set the properties of the controls we 
%  want to use.

ui_frame_r = uicontrol(guifig, ...
        'visible','off');
ui_a1 = uicontrol(guifig, ...
	'visible','off');
ui_a2 = uicontrol(guifig, ...
	'visible','off');
ui_a3 = uicontrol(guifig, ...
	'visible','off');
ui_a4 = uicontrol(guifig, ...
	'visible','off');
ui_a5 = uicontrol(guifig, ...
	'visible','off');
ui_a6 = uicontrol(guifig, ...
	'visible','off');
ui_a7 = uicontrol(guifig, ...
	'visible','off');
ui_a8 = uicontrol(guifig, ...
	'visible','off');
ui_a9 = uicontrol(guifig, ...
	'visible','off');
ui_a10 = uicontrol(guifig, ...
	'visible','off');
ui_a11 = uicontrol(guifig, ...
	'visible','off');
ui_a12 = uicontrol(guifig, ...
	'visible','off');
ui_a13 = uicontrol(guifig, ...
	'visible','off');
ui_a14 = uicontrol(guifig, ...
	'visible','off');
ui_a15 = uicontrol(guifig, ...
	'visible','off');
ui_a16 = uicontrol(guifig, ...
	'visible','off');
ui_a17 = uicontrol(guifig, ...
	'visible','off');
ui_a18 = uicontrol(guifig, ...
	'visible','off');
ui_a19 = uicontrol(guifig, ...
	'visible','off');
ui_a20 = uicontrol(guifig, ...
	'visible','off');
ui_b1 = uicontrol(guifig, ...
	'visible','off');
ui_b2 = uicontrol(guifig, ...
	'visible','off');
ui_b3 = uicontrol(guifig, ...
	'visible','off');
ui_b4 = uicontrol(guifig, ...
	'visible','off');
ui_b5 = uicontrol(guifig, ...
	'visible','off');
ui_b6 = uicontrol(guifig, ...
	'visible','off');
ui_b7 = uicontrol(guifig, ...
	'visible','off');
ui_b8 = uicontrol(guifig, ...
	'visible','off');
ui_b9 = uicontrol(guifig, ...
	'visible','off');
ui_b10 = uicontrol(guifig, ...
	'visible','off');
ui_b11 = uicontrol(guifig, ...
	'visible','off');
ui_b12 = uicontrol(guifig, ...
	'visible','off');
ui_b13 = uicontrol(guifig, ...
	'visible','off');
ui_b14 = uicontrol(guifig, ...
	'visible','off');
ui_b15 = uicontrol(guifig, ...
	'visible','off');
ui_b16 = uicontrol(guifig, ...
	'visible','off');
ui_b17 = uicontrol(guifig, ...
	'visible','off');
ui_b18 = uicontrol(guifig, ...
	'visible','off');
ui_b19 = uicontrol(guifig, ...
	'visible','off');
ui_b20 = uicontrol(guifig, ...
	'visible','off');

% Create buttons (as above, we create them here even though they are
% not visible until later.)
uirunbtn = uicontrol(guifig,'style','push',...
	'interruptible','yes', ...
         'backgroundcolor',green,...
         'visible','off');
         
uibreakbtn = uicontrol(guifig,'style','push',...
       'backgroundcolor',yellow,...
	'visible','off',...
        'string','Break');

%  The exit button will always have the same action. Thus, we define it here.
uiexitbtn_action = ['last = length(figure_list);', ...
	'for i = 1:last,', ...
	    'if (figure_list(i) ~= guifig & figure_list(i) ~= -1),', ...
                'close(figure_list(i)),',...
            'end,', ...
        'end,', ...
	'eval(hideall),', ...
	'guifigsize=[20 scrn(4)-125 350 75];', ...
	'set(guifig,''position'',guifigsize);', ...
        'set(ui_a1,''style'',''text'');', ...
        'set(ui_a1,''string'',''Save the workspace as '');', ...
        'set(ui_a1,''position'',[2 guifigsize(4)-25 300 20]);', ...
        'set(ui_a1,''horizontalalignment'',''right'');', ...
        'set(ui_a1,''backgroundcolor'',bgcolor);', ...
        'set(ui_a1,''foregroundcolor'',black);', ...
        'set(ui_a1,''visible'',''off'');', ...
        'set(ui_a2,''style'',''push'');', ...        
        'set(ui_a2,''string'','' Save '');', ...        
        'set(ui_a2,''position'',[30 guifigsize(4)-50 50 20]);', ...         
        'set(ui_a2,''horizontalalignment'',''center'');', ...         
        'set(ui_a2,''backgroundcolor'',[.75 .75 .75]);', ...        
        'set(ui_a2,''foregroundcolor'',black);', ...        
        'set(ui_a2,''callback'',save_action);', ...
        'set(ui_a2,''visible'',''on'');', ...       
        'set(ui_b2,''style'',''push'');', ...
        'set(ui_b2,''string'','' Quit '');', ...                  
        'set(ui_b2,''position'',[100 guifigsize(4)-50 80 20]);', ... 
        'set(ui_b2,''horizontalalignment'',''center'');', ...
        'set(ui_b2,''backgroundcolor'',[.75 .75 .75]);', ...
        'set(ui_b2,''foregroundcolor'',black);', ...
        'set(ui_b2,''callback'',quit_action);', ...
        'set(ui_b2,''visible'',''on'');'];
uiexitbtn = uicontrol(guifig,'style','push',...
        'backgroundcolor',red,...
        'call',uiexitbtn_action,...
	'visible','off',...
        'string','Close');

% The quit button and save buttons are not created here, but the actions are.
% The buttons are created in "method"_param.
save_action = ['[sfile,spath] = uiputfile(''*.mat'',''Save As'');', ...
  	'if (sfile == 0) return; end,', ...
	'stat=1;', ...
  	'eval(sprintf(''save %s%s'',spath,sfile),''stat=0;'');', ...
	'if stat,', ...
		'disp([''Wrote file '',spath,sfile]);', ...
	'else,', ...
		'disp([''Could not write file '',spath,sfile]);', ...
	'end'];

quit_action = ['if exist(''guifig'') ~= 0,',...
                'close(guifig),',...
        'end,',...
        'clear'];



%  Display "setup data first" message to remind the user.
	set(ui_a1,'style','text');
        set(ui_a1,'string',datasetupflag);
	set(ui_a1,'position',datasetuppos);
	set(ui_a1,'backgroundcolor',bgcolor);
        set(ui_a1,'foregroundcolor',white);
        set(ui_a1,'visible','on');