PRACTICA MATLAB NOTAS MUSICALES

DO

                                      

ESPECTRO DO

>> x=wavread('Do.wav');

>> fs=10000;%frecuencia de muestreo

>> sound(x,fs)

>> plot(x)

>> y=fft(x);

>> plot(abs(y)) 

RE

 
ESPECTRO RE

>> x=wavread('Re.wav');

>> fs=10000;%frecuencia de muestreo

>> sound(x,fs)

>> plot(x)

>> y=fft(x);

>> plot(abs(y))

MI

ESPECTRO MI

>> x=wavread('Mi.wav');

>> fs=10000;%frecuencia de muestreo

>> sound(x,fs)

>> plot(x)

>> y=fft(x);

>> plot(abs(y))

FA

ESPECTRO FA

>> x=wavread('Fa.wav');

>> fs=10000;%frecuencia de muestreo

>> sound(x,fs)

>> plot(x)

>> y=fft(x);

>> plot(abs(y))

SOL

 ESPECTRO SOL

>> x=wavread('Sol.wav');

>> fs=10000;%frecuencia de muestreo

>> sound(x,fs)

>> plot(x)

>> y=fft(x);

>> plot(abs(y))

LA

ESPECTRO LA

>> x=wavread('La.wav');

>> fs=10000;%frecuencia de muestreo

>> sound(x,fs)

>> plot(x)

>> y=fft(x);

>> plot(abs(y))

SI

 ESPECTRO SI

>> x=wavread('Si.wav');

>> fs=10000;%frecuencia de muestreo

>> sound(x,fs)

>> plot(x)

>> y=fft(x);

>> plot(abs(y))

PRACTICA DE SONIDO

>> plot(abs(y))

>> x=wavread('probando.wav');

>> fs=22050;%frecuencia de muestreo de lo que se grabo

>> sound(x,fs)

>> plot(x)

>> y=fft(x);

>> plot(abs(y))

TRABAJO MATLAB SERIE FOURIER

ONDA COMPLETA

>> T=100;
t= 0:(3*T)-1;
p=(t/T);
s=20.*cos((2*pi).*p);
s1=15.*cos(3*(2*pi).*p);
s2=11.*cos(5*(2*pi).*p);
s3=9.*cos(7*(2*pi).*p);
s4=7.*cos(9*(2*pi).*p);
s5=1.*cos(11*(2*pi).*p);
salida=s+s1+s2+s3+s4+s5;
plot (salida)

ONDA  "S"

>> T=100;
>> t= 0:(3*T)-1;
>> p=(t/T);
>> s=20.*cos((2*pi).*p);
>> salida=s;
>> plot (salida)

ONDA " S1 "

>> T=100;

>> t= 0:(3*T)-1;

>> p=(t/T);

>> s1=15.*cos(3*(2*pi).*p);

>> salida=s1;

>> plot (salida,'r')

ONDA " S2 "

>> T=100;
>> t= 0:(3*T)-1;
>> p=(t/T);
>> s2=11.*cos(5*(2*pi).*p);
>> salida=s2;
>> plot (salida, 'y')

ONDA " S3 "

>> T=100;

>> t= 0:(3*T)-1;

>> p=(t/T);

>> s3=9.*cos(7*(2*pi).*p);

>> salida=s3;

>> plot (salida, 'm')

ONDA " S4 "

>> T=100;

>> t= 0:(3*T)-1;

>> p=(t/T);

>> s4=7.*cos(9*(2*pi).*p);

>> salida=s4;

>> plot (salida, 'g')

ONDA" S5 "

>> T=100;

>> t= 0:(3*T)-1;

>> p=(t/T);

>> s5=1.*cos(11*(2*pi).*p);

>> salida=s5;

>> plot (salida, 'k')

SUPERPOSICIÓN DE ONDAS

CON "S+S1"

>> T=100;
>> t= 0:(3*T)-1;
>> p=(t/T);
>> s=20.*cos((2*pi).*p);
>> s1=15.*cos(3*(2*pi).*p);
>> salida=s+s1;
>> plot (salida)

CON "S+S1+S2"

>> T=100;
>> t= 0:(3*T)-1;
>> p=(t/T);
>> s=20.*cos((2*pi).*p);
>> s1=15.*cos(3*(2*pi).*p);
>> s2=11.*cos(5*(2*pi).*p);
>> salida=s+s1+s2;
>> plot (salida)

CON "S+S1+S2+S3"

>> T=100;
>> t= 0:(3*T)-1;
>> p=(t/T);
>> s=20.*cos((2*pi).*p);
>> salida=s+s1;
>> s2=11.*cos(5*(2*pi).*p);
>> s3=9.*cos(7*(2*pi).*p);
>> salida=s+s1+s2+s3+s4+s5;
>> salida=s+s1+s2+s3;
>> plot (salida)

CON "S+S1+S2+S3+S4"

>> T=100;

>> t= 0:(3*T)-1;

>> p=(t/T);

>> s=20.*cos((2*pi).*p);

>> s1=15.*cos(3*(2*pi).*p);

>> s2=11.*cos(5*(2*pi).*p);

>> s3=9.*cos(7*(2*pi).*p);

>> s4=7.*cos(9*(2*pi).*p);

>> salida=s+s1+s2+s3+s4;

>> plot (salida)

VARIANDO " T "

>> T=200;

>> t= 0:(3*T)-2;

>> p=(t/T);

>> s=20.*cos((2*pi).*p);

>> s1=15.*cos(3*(2*pi).*p);

>> s2=11.*cos(5*(2*pi).*p);

>> s3=9.*cos(7*(2*pi).*p);

>> s4=7.*cos(9*(2*pi).*p);

>> s5=1.*cos(11*(2*pi).*p);

>> salida=s+s1+s2+s3+s4+s5;

>> plot (salida)

VARIANDO " t "

>> T=100;
>> t= 0:(3*T)-8;
>> p=(t/T);
>> s=20.*cos((2*pi).*p);
>> s1=15.*cos(3*(2*pi).*p);
>> s2=11.*cos(5*(2*pi).*p);
>> s3=9.*cos(7*(2*pi).*p);
>> s4=7.*cos(9*(2*pi).*p);
>> s5=1.*cos(11*(2*pi).*p);
>> salida=s+s1+s2+s3+s4+s5;

>> plot (salida)

VARIANDO " t "

>> T=100;
>> t= 0:(9*T)-8;
>> p=(t/T);
>> s=20.*cos((2*pi).*p);
>> s1=15.*cos(3*(2*pi).*p);
>> s2=11.*cos(5*(2*pi).*p);
>> s3=9.*cos(7*(2*pi).*p);
>> s4=7.*cos(9*(2*pi).*p);
>> s5=1.*cos(11*(2*pi).*p);
>> salida=s+s1+s2+s3+s4+s5;
>> plot (salida)

 ESPECTRO DE LA ONDA

>> T=100;

>> t= 0:(3*T)-1;

>> p=(t/T);

>> s=20.*cos((2*pi).*p);

>> s1=15.*cos(3*(2*pi).*p);

>> s2=11.*cos(5*(2*pi).*p);

>> s3=9.*cos(7*(2*pi).*p);

>> s4=7.*cos(9*(2*pi).*p);

>> s5=1.*cos(11*(2*pi).*p);

>> salida=s+s1+s2+s3+s4+s5;

>> espectro=fft(salida);

>> esp= abs(espectro);

>> plot(p,salida)

>> stem(esp);

PAGINA HELMAN RUEDA

El desarrollador de este blog se esforzó bastante en el temario a desarrollar, se nota que la búsqueda de información pertinente a cada tema fue exhaustiva, interesante el aborda miento al tema de códigos de linea que muestra una información clara y concisa, excelente blog de una interfaz grafica agradable aunque el color oscuro logra que se pierda un poco el interes por la lectura.

PAGINA HELMAN RUEDA

PAGINA CRISTIAN MONROY

La pagina cuenta con un temario interesante donde se destaca el contenido programatico de la materia y un desarrollo al pie al de la letra conforme se desarrollo la materia, cuenta con una informacion util y se destaca por su contenido que es complementado por los enlaces que son suministrado por su desarrollador.

PAGINA CRISTIAN MONROY

PAGINA CHRISTIAN HERMOSO

La pagina de christian hermoso es sencilla de con una interfaz grafica para nada complicada que nos permite abordar algunos de los temas vistos durante el semestre entre ellos :montaje circuito DB9 rs232 , codificacion de linea, cifrado y descifrado de datos, formatos de audio y video y laboratorios de MATLAB.
Algo para destacar de esta pagina son susu enlaces los cuales cuentan con  una informacion importante en cuanto a la materia.

PAGINA CHRISTIAN HERMOSO

MODULACION BPSK EN MATLAB

function bpskd(g,f)
%Modulacion  BPSK

if nargin > 2
    error('Too many input arguments');
elseif nargin==1
    f=1;
end

if f<1;
    error('Frequency must be bigger than 1');
end

t=0:2*pi/99:2*pi;
cp=[];sp=[];
mod=[];mod1=[];bit=[];

for n=1:length(g);
    if g(n)==0;
        die=-ones(1,100);   %Modulante
        se=zeros(1,100);    %Señal
    else g(n)=1;
        die=ones(1,100);    %Modulante
        se=ones(1,100);     %Señal
    end
    c=sin(f*t);
    cp=[cp die];
    mod=[mod c];
    bit=[bit se];
end

bpsk=cp.*mod;
subplot(2,1,1);plot(bit,'LineWidth',1.5);grid on;
title('Binary Signal');
axis([0 100*length(g) -2.5 2.5]);

subplot(2,1,2);plot(bpsk,'LineWidth',1.5);grid on;
title('ASK modulation');
axis([0 100*length(g) -2.5 2.5]);