Line 45: | Line 45: | ||
end | end | ||
</pre> | </pre> | ||
+ | |||
+ | == Audio == | ||
+ | |||
+ | [[Media:Hail_hail_ECE301Fall2008mboutin.wav]] |
Revision as of 13:50, 4 September 2008
Code
%Miles Whittaker %ECE301 clear clc %Frequencies for notes used A = 220; B = 247; Db = 277; D = 294; E = 330; F = 349; Gb = 370; G = 392; %Hail Hail to Old Purdue hail_hail = [A, B, Db, D, E, Gb, Gb, G, G, G, D, E, F, Gb]; delta = 0.0005; Finish = 0.4; t = 0:delta:Finish; for N = 1 : length(hail_hail) song = sin(2 * pi * t * hail_hail(N)); sound(song, 1/delta); end pause(1); t = 0:delta:Finish/2; for T = 1 : length(hail_hail) song = sin(2 * pi * t * hail_hail(T)); sound(song, 1/delta); end pause(1); t = 0:delta:Finish; for T = 1 : length(hail_hail) song = sin(4 * pi * t * hail_hail(T)); sound(song, 1/delta); end