diff aux/LR2MS.m @ 0:4fd284285159

Adding listening test plus some helpful functions and scripts.

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/aux/LR2MS.m	Thu Apr 24 23:53:31 2014 +0100
@@ -0,0 +1,21 @@
+function y = LR2MS(x)
+% LR2MS Converts stereo audio signal to MS (mid side).
+% 
+% by Brecht De Man at Centre for Digital Music, 4 June 2013
+
+if min(size(x)) ~= 2
+    error('Function LR2MS needs a stereo audio input file.');
+end
+
+y = zeros(size(x));
+
+% M = L+R, S = L-R
+y(:,1) = x(1,:) + x(2,:); % mid
+y(:,2) = x(1,:) - x(2,:); % side
+
+% normalise if necessary
+if max(max(abs(y))) >= 1
+    y = y/max(max(abs(y)));
+end
+
+end
\ No newline at end of file