clear all

hfig = figure(1);

VMin = 0.1;
VMax = 0.9;
VInit = 0.5;

hAsc = uicontrol(hfig, ...		% 
	'style', 'slider', ...		% 
	'position', [200 2 150 20],...	% 
	'min', VMin,...			% 
	'max', VMax,...			% 
	'value', VInit, ...		% 
	'callback', [...		%  	
 		 'VAsc =  num2str(get(hAsc,''value''));'...
		 'set(hVal,''string'',VAsc);'...
		 'interMB']);
% 
hVal = uicontrol(hfig, ...		% 
	'style', 'text', ...		% 
	'position', [200 22 150 15]);	% 

% 
TxtMin = uicontrol(hfig, ...		% 
	'style', 'text', ...		% 
	'position', [180 2 20 20],...	% 
	'string',num2str(VMin));
    
% 
TxtMax = uicontrol(hfig, ...		% 
	'style', 'text', ...		% 
	'position', [350 2 20 20],...	% 
	'string',num2str(VMax));


% 
set(hVal,'string',num2str(VInit));



% "Complex and Chaotic Nonlinear Dynamics. 
% Advances in Economics and Finance, 
% Mathematics and Statistics" 
% T.Vialar, Springer 2009.
% Copyright(c).