Segundo intento tres convoluciones //no sirve 06/11/16

clear all; clc; close all;

disp('Di "queso" en voz alta');

%Alarma para que el programa empiece a grabar
bip= audioread('Sonido1.mp3');
sound(bip, 44100);
n = 0.5;
pause(n);

% % Grabación de NARANJA % %
anaranja= audiorecorder;
recordblocking(anaranja, 1.5);
disp('Ok! Naranja grabado');
play(anaranja);
naranja= getaudiodata(anaranja);
n = 1;
pause(n);
bip= audioread('Sonido1.mp3');
sound(bip, 44100);
n = 1;
pause(n);

% % Grabación de GRIS % %
agris = audiorecorder;
recordblocking(agris, 1.5);
disp('Ok! Gris grabado');
play(agris);
gris = getaudiodata(agris);
n = 1;
pause(n);
bip= audioread('Sonido1.mp3');
sound(bip, 44100);
n = 1;
pause(n);

% % Grabación de VERDE % %
averde = audiorecorder;
recordblocking(averde, 1.5);
disp('Ok! Verde grabado');
play(averde);
verde = getaudiodata(averde);
n = 1;
pause(n);
bip= audioread('Sonido1.mp3');
sound(bip, 44100);
n = 1;
pause(n);

% % Sumatoria de valores internos de los vectores % %
convnarnar = conv(naranja, naranja);
convnargri = conv(gris, gris);
convnarver = conv(verde, verde);

sumnarnar= sum(convnarnar);
sumnargri= sum(convnargri);
sumnarver= sum(convnarver);

% % Display de valores internos de los vectores % %
disp('Esta es la sumatoria de convolución naranja-naranja');
disp(abs(sumnarnar));
disp('Esta es la sumatoria de convolución naranja-gris');
disp(abs(sumnargri));
disp('Esta es la sumatoria de convolución naranja-verde');
disp(abs(sumnarver));


% % Escuchar convolución % %
%bip= audioread('Sonido2.mp3');
%sound(bip, 44100);
%n = 5;
%pause(n);
%play(w);


% %Graficar Funciones%%
subplot(6,1,1);
plot(naranja);
title('Naranja');
xlabel('Tiempo(s)');
ylabel('Amplitud');

subplot(6,1,2);
plot(gris);
title('Gris');
xlabel('Tiempo(s)');
ylabel('Amplitud');

subplot(6,1,3);
plot(verde);
title('Verde');
xlabel('Tiempo(s)');
ylabel('Amplitud');

subplot(6,1,4);
plot(convnarnar);
title('Naranja-Naranja');
xlabel('Tiempo(s)');
ylabel('Amplitud');

subplot(6,1,5);
plot(convnargri);
title('Naranja-Gris');
xlabel('Tiempo(s)');
ylabel('Amplitud');

subplot(6,1,6);
plot(convnarver);
title('Naranja-Verde');
xlabel('Tiempo(s)');
ylabel('Amplitud');