Revision as of 19:22, 4 September 2008 by Sranka (Talk)

Matlab code for HAIL PURDUE song

%SOURBH RANKA

%ece 301

%FOR NORMAL SPEED

clear;clc;

delta=0.0005;

A=0:delta: 1;

B=0:delta:0.5;

C=0:delta:0.75;

D=0:delta:0.25;

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);



%FOR DOUBLE THE SPEED

%JUST MULTIPLY THE 1/DELTA TERM BY TWO

clear;clc;

delta=0.0005;

A=0:delta: 1;

B=0:delta:0.5;

C=0:delta:0.75;

D=0:delta:0.25;

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;

A=0:delta: 1;

B=0:delta:0.5;

C=0:delta:0.75;

D=0:delta:0.25;

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

Correspondence Chess Grandmaster and Purdue Alumni

Prof. Dan Fleetwood