mfocusint.m

该代码为图像融合的vc源程序,对学习图像融合有很重要的价值

function mfocusint(bsize,thres)
%
%mfocusint.m, v 1.0 2002/05/09 17:52:40
%===========================================================================
%               Eduardo Fernandez Canga - University of Bath
%
%                        Copyright (c) 2002
%===========================================================================
%
%           mfocusint(bsize,thres)
%
%         Function called by 'mfocus' 
%
%===========================================================================

if nargin<2, thres=1;end
if nargin<1, bsize=8;end

prompt = { ' Enter block size: ', ' Enter Threshold: '};
title = ' Spatial Frequency Values '; 
lines = 1; 
def = {num2str(bsize),num2str(thres)};
answer = inputdlg(prompt,title,lines,def,'on');
assignin('caller','block',str2num(answer{1}) );
assignin('caller','threshold',str2num(answer{2}) );