(New page: clear all clc %Austin Melnyk %Homework one: Play the first 6 notes to the Hail Purdue Fight song. %09/04/08 %Defined notes A=220; B=512; C=426; D=480; Db=277; E=320; F=341; G=384; Gb=370;...)
 
 
(3 intermediate revisions by the same user not shown)
Line 1: Line 1:
 +
<pre>
 
clear all
 
clear all
 
clc
 
clc
Line 83: Line 84:
  
 
wavwrite(fullsong, 1/delta, 'hailpurdue.wav');
 
wavwrite(fullsong, 1/delta, 'hailpurdue.wav');
 +
</pre>
 +
 +
Heres the song file [[Media:hailpurdue.wav _ECE301Fall2008mboutin| woot]]

Latest revision as of 09:04, 4 September 2008

clear all
clc
%Austin Melnyk 
%Homework one: Play the first 6 notes to the Hail Purdue Fight song.
%09/04/08
%Defined notes
A=220;
B=512;
C=426;
D=480;
Db=277;
E=320;
F=341;
G=384;
Gb=370;

delta=.00005;
T_0=0:delta:.5;
x=ones(5/delta, 1);
%Notes Vector for the first 6 beats of the Hail Purdue Song entitled "Hail
%Hail To Old Purdue" as required by the assignment.
n_v=[E,F,G,C,D,B];

delta = 0.00005;

T=0:delta:1.0;
n_1 = sin(2*pi*E*T);

T=0:delta:0.5;
n_2 = sin(2*pi*F*T);
n_3 = sin(2*pi*G*T);
n_4 = sin(2*pi*C*T);

T=0:delta:0.5;
n_5 = sin(2*pi*D*T);

T=0:delta:0.4;
n_6 = sin(2*pi*B*T);

fullsong = [n_1 n_2 n_3 n_4 n_5 n_6];

sound(fullsong,1/delta);

pause(1)
%Twice as fast
T=0:delta:(0.5*1.0);
n_1 = sin(2*pi*E*T);

T=0:delta:(0.5*0.5);
n_2 = sin(2*pi*F*T);
n_3 = sin(2*pi*G*T);
n_4 = sin(2*pi*C*T);

T=0:delta:(0.5*0.5);
n_5 = sin(2*pi*D*T);

T=0:delta:(0.5*0.4);
n_6 = sin(2*pi*B*T);

fastsong = [n_1 n_2 n_3 n_4 n_5 n_6];

sound(fastsong, 1/delta);

pause(1)
%Twice the frequency
T=0:delta:(0.5*1.0);
n_1 = sin(2*2*pi*E*T);

T=0:delta:(0.5*0.5);
n_2 = sin(2*2*pi*F*T);
n_3 = sin(2*2*pi*G*T);
n_4 = sin(2*2*pi*C*T);

T=0:delta:(0.5*0.5);
n_5 = sin(2*2*pi*D*T);

T=0:delta:(0.5*0.4);
n_6 = sin(2*2*pi*B*T);

freqsong = [n_1 n_2 n_3 n_4 n_5 n_6];

sound(freqsong, 1/delta);

wavwrite(fullsong, 1/delta, 'hailpurdue.wav');

Heres the song file woot

Alumni Liaison

Basic linear algebra uncovers and clarifies very important geometry and algebra.

Dr. Paul Garrett