Difference between revisions of "Hw1 ECE301S11 Kaylee Joseph" - Rhea

Revision as of 15:58, 18 January 2011

%NUMBER 1

clc clear all

fA = 440; %frequency of an A in Hz fG = 2 ^ (-2 / 12) * fA; %frequency of a G in Hz fBflat = 2 ^ (1 / 12) * fA; %frequency of a Bflat in Hz fC = 2 ^ (3 / 12) * fA; %frequency of a C in Hz fDflat = 2 ^ (4 / 12) * fA; %frequency of a Dflat in Hz

delta = 0.00005; %step size

%PART 1 tempo = 112 / 60;

half = 0 : delta : 2 / tempo; %half note quart = 0 : delta : 1 / tempo; %quarter note eighth = 0 : delta : 1 / (2 * tempo); %eighth note dotquart = 0 : delta : 3 / (2 * tempo); %dotted quarter note

qG = sin(2 * pi * fG .* quart); qBflat = sin(2 * pi * fBflat .* quart); dqC = sin(2 * pi * fC .* dotquart); eDflat = sin(2 * pi * fDflat .* eighth); hC = sin(2 * pi * fC .* half);

song = [qG, qBflat, dqC, qG, qBflat, eDflat, hC, qG, qBflat, dqC, qBflat, qG];

sound(song, 1/delta)

wavwrite(song, 1/delta, 'ECE301hw1part1');

Media:ECE301hw1part1.wav

%PART 2 tempo = 2 * 112 / 60;

half = 0 : delta : 2 / tempo; %half note quart = 0 : delta : 1 / tempo; %quarter note eighth = 0 : delta : 1 / (2 * tempo); %eighth note dotquart = 0 : delta : 3 / (2 * tempo); %dotted quarter note

qG = sin(2 * pi * fG .* quart); qBflat = sin(2 * pi * fBflat .* quart); dqC = sin(2 * pi * fC .* dotquart); eDflat = sin(2 * pi * fDflat .* eighth); hC = sin(2 * pi * fC .* half);

song = [qG, qBflat, dqC, qG, qBflat, eDflat, hC, qG, qBflat, dqC, qBflat, qG];

sound(song, 1/delta)

wavwrite(song,1/delta, 'ECE301hw1part2');

Media:ECE301hw1part2.wav

%PART 3

tempo = 112 / 60;

half = 0 : delta : 2 / tempo; %half note quart = 0 : delta : 1 / tempo; %quarter note eighth = 0 : delta : 1 / (2 * tempo); %eighth note dotquart = 0 : delta : 3 / (2 * tempo); %dotted quarter note

qG = sin(2 * 2 * pi * fG .* quart); qBflat = sin(2 * 2 * pi * fBflat .* quart); dqC = sin(2* 2 * pi * fC .* dotquart); eDflat = sin(2 * 2 * pi * fDflat .* eighth); hC = sin(2 * 2 * pi * fC .* half);

song = [qG, qBflat, dqC, qG, qBflat, eDflat, hC, qG, qBflat, dqC, qBflat, qG];

sound(song, 1/delta)

wavwrite(song,1/delta, 'ECE301hw1part3');

Media:ECE301hw1part3.wav

 %NUMBER 2

clc clear all

[song,Fs] = wavread('Beatles.wav');

rev = flipud(song);

wavwrite(rev,'rev.wav');

sound(rev,Fs)

Media:rev.wav

% The reversed song supposedly contains something like "turn me on dead man," but I found it to be a stretch.