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