Matlab code for HAIL PURDUE song

%SOURBH RANKA
%ece 301
%FOR NORMAL SPEED
clear;clc;
delta=0.0005;
%defining time length
A=0:delta: 1;  %full l       
B=0:delta:0.5; %half       
C=0:delta:0.75; %three quater 
D=0:delta:0.25; %quater
%define notes
AA=sin(2*pi*220*A);
BB=sin(2*pi*240*B);
CC=1.05*sin(2*pi*275*B);
DD=1.05*sin(2*pi*295*C);
EE=1.05*sin(2*pi*335*D);
FF=sin(2*pi*365*C);
GG=sin(2*pi*400*B);
HH=sin(2*pi*400*D);
II=sin(2*pi*295*B);
JJ= sin(2*pi*350*D);
KK=sin(2*pi*375*D);
tone=[AA BB CC DD EE FF FF GG HH HH II FF JJ KK];
sound (tone,1/delta);





%FOR DOUBLE THE SPEED
%JUST MULTIPLY THE 1/DELTA TERM BY TWO
clear;clc;
delta=0.0005;
A=0:delta: 1;  %full       
B=0:delta:0.5;  %half      
C=0:delta:0.75; %three quater 
D=0:delta:0.25; %quater 
%defining notes
AA=sin(2*pi*220*A);
BB=sin(2*pi*240*B);
CC=1.05*sin(2*pi*275*B);
DD=1.05*sin(2*pi*295*C);
EE=sin(2*pi*295*B);
FF=1.05*sin(2*pi*335*D);
GG=sin(2*pi*365*C);
HH=sin(2*pi*400*B);
II=sin(2*pi*400*D);
JJ= sin(2*pi*350*D);
KK=sin(2*pi*375*D);
tone=[AA BB CC DD FF GG GG HH II II EE FF JJ KK];
sound (tone,1/delta*2);


%FOR DOUBLE THE PITCH
%JUST DOUBLE THE FREQUENCY OF EACH TERM
clear;clc;
delta=0.0005;
%defining times
A=0:delta: 1;   %full      
B=0:delta:0.5;  %half      
C=0:delta:0.75; %three quater 
D=0:delta:0.25; %quater 
%defining tones
AA=sin(2*pi*220*2*A);
BB=sin(2*pi*240*2*B);
CC=1.05*sin(2*pi*275*2*B);
DD=1.05*sin(2*pi*295*2*C);
EE=sin(2*pi*295*2*B);
FF=1.05*sin(2*pi*335*2*D);
GG=sin(2*pi*365*2*C);
HH=sin(2*pi*400*2*B);
II=sin(2*pi*400*2*D);
JJ= sin(2*pi*350*2*D);
KK=sin(2*pi*375*2*D);
tone=[AA BB CC DD FF GG GG HH II II EE FF JJ KK];
sound (tone,1/delta);

Alumni Liaison

ECE462 Survivor

Seraj Dosenbach