%Nathan Najdek
%00164-10728
%ECE 301 Prof. Boutin
%Sep. 4, 2008

%Frequencies of the notes played in the first part of song.
A = 220;
B = 246.94;
Db = 277.18;
D = 293.66;
E = 329.62;
F = 349.22;
Gb = 369.99;
G = 391.99;
del = .0005;

%Chrous notes for first part of Purdue Fight song
PU_song = [A, B, Db, D, E, Gb, Gb, G, G, G, D, E, F, Gb]; 

%First part of Purdue Fight Sont
stop = 0.4;
t = [0:del:stop];
for i = 1:length(PU_song)
  lyric = sin(2*pi*t*PU_song(i));
  sound(lyric, 1/del);
end

pause(1);
%Fight Song played twice as fast
stop = stop/2;
t = 0:del:stop;
for i = 1:length(PU_song)
  lyric = sin(2*pi*t*PU_song(i));
  sound(lyric, 1/del);
end

pause(1);
%Fight Song with twice as high pitch
stop = 0.4;
t = 0:del:stop;
for i = 1:length(PU_song)
  lyric = sin(4*pi* t*PU_song(i));
  sound(lyric, 1/del);
end

Sounds of Purdue

I was unable to upload the .wav files in working condition. The code does work in MATLAB, but when I save and upload the file on kiwi, the file only plays the last note of the song.

Alumni Liaison

Correspondence Chess Grandmaster and Purdue Alumni

Prof. Dan Fleetwood