Mercurial > hg > ape
annotate aux/LR2MS.m @ 15:24be5e9ce25b tip
Update README
author | Brecht De Man <brecht.deman@bcu.ac.uk> |
---|---|
date | Thu, 20 Sep 2018 12:23:20 +0200 |
parents | 4fd284285159 |
children |
rev | line source |
---|---|
b@0 | 1 function y = LR2MS(x) |
b@0 | 2 % LR2MS Converts stereo audio signal to MS (mid side). |
b@0 | 3 % |
b@0 | 4 % by Brecht De Man at Centre for Digital Music, 4 June 2013 |
b@0 | 5 |
b@0 | 6 if min(size(x)) ~= 2 |
b@0 | 7 error('Function LR2MS needs a stereo audio input file.'); |
b@0 | 8 end |
b@0 | 9 |
b@0 | 10 y = zeros(size(x)); |
b@0 | 11 |
b@0 | 12 % M = L+R, S = L-R |
b@0 | 13 y(:,1) = x(1,:) + x(2,:); % mid |
b@0 | 14 y(:,2) = x(1,:) - x(2,:); % side |
b@0 | 15 |
b@0 | 16 % normalise if necessary |
b@0 | 17 if max(max(abs(y))) >= 1 |
b@0 | 18 y = y/max(max(abs(y))); |
b@0 | 19 end |
b@0 | 20 |
b@0 | 21 end |