function [data] = PlotPhase7ch( wave, S );

%waveFilt = BudapestbandPass(wave(:,2:8),1000,5,200);
waveFilt = BudapestbandPass(wave(:,1:7),8.865248e8,3,60);
phase=wave(1:end,8);




figure
plot(waveFilt(:,2)); axis([0 3000 -0.0001 0.0001]); 
figure
for n=1:7 
subplot(7,1,n); plot(waveFilt(:,n)); 
axis([0 3000 -0.0001 0.0001]);
end