Line 20: | Line 20: | ||
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