%---- Lab 8 - Filtering using the DFT ----%

[y,fs,NBITS] = wavread('wavefile.wav',[10000,500000]);
y = y(:,1);                                 % Converts the signal to mono
y = y';                                     % Creates a ROW vector
y = getDirty(y,fs);                             
y = y/max(abs(y));                          % Normalizes the signal

wavwrite(y,fs,NBITS,'Lab 8 dirty signal.wav');
sound(y,fs);

z = cleanup(y,100);
sound(z,fs);
wavwrite(z,fs,NBITS,'Lab 8 clean signal.wav');