%  Show the velues of the CT window
 
%  Version 1.5, 31/10-2005, Jørgen Arendt Jensen

function res = show_values (th,hounsfield)

set(th,'string',['Base level: ',num2str(round(hounsfield(1)-1000)),' Hu, Window: ',num2str(round(hounsfield(2))),' Hu'],...
   'Units','normalized','color',[1 1 1])
