load handel.mat;
player = audioplayer(y, Fs);
play(player);




plot(y);
title('Tidsplot av ljudet');
xlabel('Tid (s)');
ylabel('Amplitudnivå');




figure();
nwin = 512; % antal fönster
noverlap = 256; %samples
nfft = 512; %samples
spectrogram(y, nwin, noverlap, nfft, Fs, 'yaxis');
ylim([0,4]);
title('Spektrogram av ljudet');
xlabel('Tid (s)');
ylabel('Frekvens (kHz)');
colorbar;




figure();
m = length(y);
n = pow2(nextpow2(m));
fftOfSound = fft(y,n);
f = (0:n-1)*(Fs/n);
power = fftOfSound.*conj(fftOfSound)/n;
loglog(f,power,'LineWidth',2);
xlim([1,10000]);
title('Powerplot i frekvens av ljudet');
xlabel('Frekvens (Hz)');
ylabel('Power');




--




[audioData, Fs] = audioread('gtr.wav');

soundPlayer = audioplayer(audioData, Fs);
playblocking(soundPlayer);




audioInStereo = zeros(length(audioData),2);

stereoFader = 50;

audioInStereo(:,1) = audioData.*(1-(stereoFader/100));
audioInStereo(:,2) = audioData.*(stereoFader/100);

soundPlayer = audioplayer(audioInStereo, Fs);
play(soundPlayer);