%get_new_axies
figure(1)
subplot(4,1,1)
% swr
axis([minx maxx -20 1100 ]);

subplot(4,1,2)
% atmp
axis([ minx maxx 25.5 29 ]);
 
subplot(4,1,3)
% seatemp
minytmp=27.5;
axis([ minx maxx  minytmp 28.5 ]);
if exist('stplh','var'),
    thp=get(stplh,'Position');
    set(stplh,'Position',...
        [(minx+.25) (minytmp+.4) thp(3) ] );
else
    stplh=text(minx+.02,(minytmp+.05),...
    'sbe black,tsg blue');
end

subplot(4,1,4);
% hrh
axis([minx maxx 61 90]);

figure(2)
 subplot(4,1,1)
% bpr
 axis([minx maxx 1012 1018]);

 subplot(4,1,2)
% wspd
axis([minx maxx 2 14]);

subplot(4,1,3)
% wdir
 axis([minx maxx 180 320])
 
subplot(4,1,4)
% lwr
axis([minx maxx  390 455])
 
