Código funcional 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 voz % %
recObj = audiorecorder;
recordblocking(recObj, 1.5);
disp('Ok!');
play(recObj);
voz = getaudiodata(recObj);
%disp(voz);

n = 1;
pause(n);

bip= audioread('Sonido1.mp3');
sound(bip, 44100);

n = 1;
pause(n);

% % Grabación de test % %
recObj2 = audiorecorder;
recordblocking(recObj2, 1.5);
disp('Ok!');
play(recObj2);
test= getaudiodata(recObj2);

% % Sumatoria de valores internos de los vectores % %
%w = conv(voz, voz);
%Sw = sum(w);
v = conv(voz, test);
Sv= sum(v);
sumvoz= sum(voz);
sumtest= sum(test);

% % Display de valores internos de los vectores % %
disp('Esta es la sumatoria de los valores dentro de señal voz');
disp(sumvoz);
disp('Esta es la sumatoria de los valores dentro de señal test');
disp(sumtest);
disp('Esta es la sumatoria de los valores de convolución entre voz-test');
disp(Sv);

% % Display Divisiones % %
disp('Esta es la división convvoz-test/sumtest');
difss = Sv/sumtest;
disp(difss);




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


% %Graficar Funciones%%
subplot(4,1,1);
plot(voz);
title('Voz');
xlabel('Tiempo(s)');
ylabel('Amplitud');

subplot(4,1,2);
plot(test);
title('Test');
xlabel('Tiempo(s)');
ylabel('Amplitud');

subplot(4,1,3);
plot(w);
title('Misma Señal');
xlabel('Tiempo(s)');
ylabel('Amplitud');

subplot(4,1,4);
plot(v);
title('Diferentes Señales');
xlabel('Tiempo(s)');
ylabel('Amplitud');



%Alinear: https://www.mathworks.com/help/signal/ref/xcorr.html
%Conv Sum: https://www.youtube.com/watch?v=9EUHs-pArJg

% % % x = 0 : 0.1 : 12000;
% % % y = double(x == 0);