function saveall()
global basepathcruise fn plotnames;
savepath=[basepathcruise filesep 'figures' filesep fn];
if ~isfolder(savepath),mkdir(savepath),end
ts=clock;
ts=[int2str(ts(1)) int2str(ts(2)) int2str(ts(3)) '_' int2str(ts(4)) '.' int2str(round(ts(5)/4)/15*100)];
h=findobj('Name','VPR Data Visualization');
h1=findobj(h,'Tag','Checkbox HydroXYZ');
if get(h1,'value')
    for i=1:size(plotnames,1)
        set(findobj('Tag',cell2mat(plotnames(i,1))),'InvertHardCopy','off')
        saveas(findobj('Tag',cell2mat(plotnames(i,1))),[savepath filesep ts '_' cell2mat(plotnames(i,1)) '.png']);
    end
end
h1=findobj(h,'Tag','Checkbox HydroTime');
if get(h1,'value')
    set(findobj('Tag','plot env'),'InvertHardCopy','off')
    saveas(findobj('Tag','plot env'),[savepath filesep ts '_' 'env' '.png']);
end
h1=findobj(h,'Tag','Checkbox plotTS');
if get(h1,'value')
    for i=3:size(plotnames,1)
        set(findobj('Tag',['TS ' cell2mat(plotnames(i,1))]),'InvertHardCopy','off')
        saveas(findobj('Tag',['TS ' cell2mat(plotnames(i,1))]),[savepath filesep ts '_' 'TS_' cell2mat(plotnames(i,1)) '.png']);
    end
end
h1=findobj(h,'Tag','Checkbox Flight');
if get(h1,'value')
    set(findobj('Tag','plot flight'),'InvertHardCopy','off')
    saveas(findobj('Tag','plot flight'),[savepath filesep ts '_' 'flight' '.png']);
end
h1=findobj(h,'Tag','Checkbox Courseplot');
if get(h1,'value')
    set(findobj('Tag','plot course'),'InvertHardCopy','off')
    saveas(findobj('Tag','plot course'),[savepath filesep ts '_' 'course' '.png']);
end
set(findobj('Tag','plot composite'),'InvertHardCopy','off')
saveas(findobj('Tag','plot composite'),[savepath filesep ts '_' 'composite' '.png']);
