% load NBP ADCP data modified Max 6 2001
% note that 466 to 687 are the same file ...
ADCPbs1=[];ADCPbs2=[];ADCPdday=[];

starti=900;
endi=1114;

for i=starti:endi
   
  load(['amp_sw' num2str(i) '.mat'])
  ADCPbs1=[ADCPbs1;data.amp1'];
  ADCPbs2=[ADCPbs2;data.amp2']; 
  ADCPdday=[ADCPdday;data.dday];
  
  
  %end
%figure;
%imagesc(flipud(rot90(log(ADCPbs1))));colorbar
end
figure;
imagesc(flipud(rot90(log(ADCPbs2))));colorbar
from=min(ADCPdday)
to=max(ADCPdday)