Line 9: | Line 9: | ||
%Frequencies for notes used | %Frequencies for notes used | ||
A = 220; | A = 220; | ||
− | B = | + | B = 247; |
− | Db = 277 | + | Db = 277; |
− | D = | + | D = 294; |
− | E = | + | E = 330; |
− | F = 349 | + | F = 349; |
− | Gb = | + | Gb = 370; |
− | G = | + | G = 392; |
%Hail Hail to Old Purdue | %Hail Hail to Old Purdue |
Revision as of 13:42, 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