matthiasm@8: 
matthiasm@8: % Read in an audio file
matthiasm@8: 
matthiasm@8: 
matthiasm@8: function [audiodata, info] = readaudiochunk(info)
matthiasm@8: 
matthiasm@8: fprintf(1,'reading audio chunk\n');
matthiasm@8: 
matthiasm@8: % read in wav file
matthiasm@8: 
matthiasm@8: [rawdata, info.fs] = wavread(info.filename,[info.startsample info.endsample]);
matthiasm@8: 
matthiasm@8: info.fsdownsampled = info.fs;
matthiasm@8: 
matthiasm@8: % take average of stereo signals to give one mono audio vector
matthiasm@8: 
matthiasm@8: meandata = mean(rawdata,2);
matthiasm@8: 
matthiasm@8: % normalise audio
matthiasm@8: if max(meandata) > 0.00001
matthiasm@8:     audiodata = meandata/max(meandata);
matthiasm@8: else
matthiasm@8:     audiodata = meandata;
matthiasm@8: end
matthiasm@8: 
matthiasm@8:     
matthiasm@8:     
matthiasm@8: 
matthiasm@8: 
matthiasm@8: