function fouriercontribution(advancment)
 one = wavread('one.wav');
  fig=figure;
 subplot(10,1,1); plot(one); axis off;
 [x,y,but]=ginput(1);
  while (but==1)
    sound(one);
    [x,y,but]=ginput(1);
  end
 ff = fft(one);
 reconstructedone = zeros(size(one));
 place=1+advancment;
 for t=1:9
  subplot(10,1,t+1);
  wave = real(ifft(bandpassfilter(ff,1,place)));
  plot(wave);axis off;
  [x,y,but]=ginput(1);
  while (but==1)
    sound(wave);
    [x,y,but]=ginput(1);
  end
  place=place+advancment;
 end













