Mercurial > hg > audio-degradation-toolbox
annotate testdata/normalizeAllWavFiles.m @ 28:76f45f5c9afd DoP tip
- added units
* adaptiveEqualizer
* applyMfccMeanAdaption
- added corresponding data files for presets
- modified applyImpulseReponse to use the estimated average group delay to adjust
the output audio and keep the timestamps as is (was vice versa before)
- added new units demos, incl one for applyLowpass
author | SebastianEwert |
---|---|
date | Tue, 21 Jan 2014 18:08:28 +0000 |
parents | 9d682f5e3927 |
children |
rev | line source |
---|---|
matthiasm@0 | 1 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
matthiasm@0 | 2 % Audio Degradation Toolbox |
matthiasm@0 | 3 % |
matthiasm@0 | 4 % Centre for Digital Music, Queen Mary University of London. |
matthiasm@0 | 5 % This file copyright 2013 Sebastian Ewert, Matthias Mauch and QMUL. |
matthiasm@0 | 6 % |
matthiasm@0 | 7 % This program is free software; you can redistribute it and/or |
matthiasm@0 | 8 % modify it under the terms of the GNU General Public License as |
matthiasm@0 | 9 % published by the Free Software Foundation; either version 2 of the |
matthiasm@0 | 10 % License, or (at your option) any later version. See the file |
matthiasm@0 | 11 % COPYING included with this distribution for more information. |
matthiasm@0 | 12 % |
matthiasm@0 | 13 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
matthiasm@0 | 14 |
matthiasm@0 | 15 clear |
matthiasm@0 | 16 |
matthiasm@0 | 17 dirInfo = dir('*.wav'); |
matthiasm@0 | 18 |
matthiasm@0 | 19 for k=1:length(dirInfo) |
matthiasm@0 | 20 filename = dirInfo(k).name; |
matthiasm@0 | 21 [y,fs,nbits] = wavread(filename); |
matthiasm@0 | 22 |
matthiasm@0 | 23 gain = 0.99 / max(max(abs(y))); |
matthiasm@0 | 24 |
matthiasm@0 | 25 wavwrite(y * gain,fs,24,filename); |
matthiasm@0 | 26 end |