annotate aux/LR2MS.m @ 9:ee22af6610a3
Sanitised user ID, end message, bug fixes.
| author |
Brecht De Man <b.deman@qmul.ac.uk> |
| date |
Sun, 30 Nov 2014 21:44:03 +0000 |
| 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 |
