scrambleEgg1

clear all


[y SR] = audioread('yearsago.wav');
y = y(:,1);

y = y/(max(abs(y)));
ys = size(y,1); %d = size(X) returns the sizes of each dimension of array X in a vector, d, with ndims(X) elements.


%Q = randi(ys,ys,1);

r = rand(ys,1).*sin(2*pi*4000*[1:ys]'/SR);
                      % * = Matrix Multiplication
                      % .* C = A.*B multiplies arrays A and B element by element and returns the result in C
                      % m:n returns a symbolic vector of values [m,m+1,...,n], where m and n are symbolic constants
y1 = r.*y;  % First transform
y2 = y-y1;  % difference between original and y1
y3 = y1 + y2  % sum of the two transforms

%player = audioplayer(y, 44100)
%playblocking(player)
%player1 = audioplayer(y1, 44100)
%playblocking(player1)
player2 = audioplayer(y2, 44100)
playblocking(player2)
%player3 = audioplayer(y3, 44100)
%playblocking(player3)
%audiowrite('yearsagoScr1.wav', y1, SR);
audiowrite('yearsagoScr2.wav', y2, SR);
%audiowrite('yearsagoScr3.wav', y3, SR);