function Imgout=jcontrast(Img)
% by Joe Bosworth 1999-03-03
%Full-scale CONTRAST STRETCHING:

high=max(max(Img));
low=min(min(Img));

if low~=high 
Imgout=(Img-low)*255/(high-low);
end

figure;
%for boring old gray scale:
colormap(gray(256));

set(gcf,'Position', [100 100 723 654]);


%set(gcf,'Position', [360 310 723 654]);
%remember!!! normal Position = [360 544 560 420]


image(Imgout);
axis image;
zoom on;
%axis off;
set(findobj(gcf,'type','image'),'UserData',Img);
set(gcf,'UserData',1.17100);
set(findobj(gcf,'type','image'),'ButtonDownFcn','im_pos');