try
close(inst_plot);
catch
    fprintf('Already closed');
end

inst_plot=figure;
set(inst_plot,'name','ISUS STATS');

t=get(Dhand.Time_Select,'value');
    switch t,
     case 1
        t=1;
      case 2
        t=3;
     case 3
        t=7;
     case 4
        t=100000; 
    end % switch
 
tind=find(Drift.isus(1,:)>=falsenow-t);
subplot(2,2,1);
plot(Drift.isus(1,tind),Drift.isus(2,tind),'r-');
datetick('x');
xlabel('Time','FontWeight','Bold');
ylabel('Celsius','FontWeight','Bold');
titl=sprintf('%s ISUS Temperature',graphtitle);
title(titl,'FontWeight','Bold');
subplot(2,2,2);
plot(Drift.isus(1,tind),Drift.isus(3,tind),'b-');
datetick('x');
xlabel('Time','FontWeight','Bold');
ylabel('uM','FontWeight','Bold');
titl=sprintf('%s Nitrate',graphtitle);
title(titl,'FontWeight','Bold');
subplot(2,2,3);
plot(Drift.isus(1,tind),Drift.isus(4,tind),'g-');
datetick('x');
xlabel('Time','FontWeight','Bold');
ylabel('PSS','FontWeight','Bold');
titl=sprintf('%s ISUS Salinity',graphtitle);
title(titl,'FontWeight','Bold');
subplot(2,2,4);
plot(Drift.isus(1,tind),Drift.isus(5,tind),'g-');
datetick('x');
xlabel('Time','FontWeight','Bold');
ylabel('RMS','FontWeight','Bold');
titl=sprintf('%s Fit Quality',graphtitle);
title(titl,'FontWeight','Bold');

set(inst_plot,'Position',[3 29 1022 672]);