Line 4: Line 4:
  
 
A=220;
 
A=220;
 +
 
B=247;
 
B=247;
 +
 
Db=278;
 
Db=278;
 +
 
D=294;
 
D=294;
 +
 
E=330;
 
E=330;
 +
 
F=349;
 
F=349;
 +
 
Gb=370;
 
Gb=370;
 +
 
G=392;
 
G=392;
 +
 
delta=.0005;
 
delta=.0005;
 
stop=.4;
 
stop=.4;

Revision as of 11:55, 5 September 2008

%ANANYA PANJA %ECE 301 %Hail Purdue Chorus

A=220;

B=247;

Db=278;

D=294;

E=330;

F=349;

Gb=370;

G=392;

delta=.0005; stop=.4;

Notes=[A,B,Db,D,E,Gb,Gb,G,G,G,D,E,F,Gb]; t=0:delta:stop;

for i=length(Notes)

   Hail=sin(2*pi*t*Notes(i));
   sound(Hail,1/delta);

end

pause(3); %To play the song twice as fast

for T=1:length(Notes)

   t=0:delta:.5*length(Notes(T));%.5 is the scaling factor
   Hail_1=sin(2*pi*t*Notes(T));
   sound(Hail_1,1/delta);

end

pause(3); %To play the song at double frequency

for T=1:length(Notes)

   t=0:delta:length(Notes(T));
   Hail_2=sin(2*2*pi*t*Notes(T))%2 is the scaling here
   sound(Hail_2,1/delta);

end

Alumni Liaison

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

Dr. Paul Garrett