donewithgui=0;

newthresh=0;

HH = findobj(gcf,'Tag','new_thresh');

newthresh = str2num(get(HH,'String'));

newthresh=num2str(newthresh);

if (size(newthresh,2)==1)

newthresh=['0' '0' newthresh(1)];

end

if (size(newthresh,2)==2)

newthresh=['0' newthresh(1:2)];

end

if (size(newthresh,2) > 3)

close

newthresh=0;

get_threshold;

UU = findobj(gcf,'Tag','errormsg');

set(UU,'String','Enter up to a 3 digit temperature');

set(UU,'Visible','ON');

else

if ((str2num(newthresh)>150))

close

newthresh=0;

get_threshold;

UU = findobj(gcf,'Tag','errormsg');

set(UU,'String','Enter a temperature less than or equal to 150');

set(UU,'Visible','ON');

else

close

donewithgui=1;

end

end