View source for HW1.4 Stuart Pulliam ECE301Summer2009 - Rhea

Mid_A = 440;
Mid_C = Mid_A*3/5;
Mid_E = Mid_C*5/4;
Mid_G = Mid_C*3/2;
Low_C = Mid_C/2;
Low_G = Low_C*3/2;
Low_E = Low_C*5/4;
Low_A = Low_C*5/3;
Low_B = Low_C*15/8;
Low_A_Sharp = 233.08;

del = 0.00003;
half_note = 0:del:1;
quarter_note = 0:del:0.5;
quarter_note_dot = 0:del:0.75;
eigth_note = 0:del:0.25;

eigth_E_Mid = sin(2*pi*Mid_E*eigth_note);
quarter_E_Mid = sin(2*pi*Mid_E*quarter_note);
quarter_dot_E_Low = sin(2*pi*Low_E*quarter_note_dot);
eigth_C_Mid = sin(2*pi*Mid_C*eigth_note);
quarter_dot_C_Mid = sin(2*pi*Mid_C*quarter_note_dot);
half_G_Mid = sin(2*pi*Mid_G*half_note);
quarter_dot_G_Low = sin(2*pi*Low_G*quarter_note_dot);
half_G_Low = sin(2*pi*Low_G*half_note);
quarter_A_Low = sin(2*pi*Low_A*quarter_note);
quarter_B_Low = sin(2*pi*Low_B*quarter_note);
eigth_A_Low_Sharp = sin(2*pi*Low_A_Sharp*eigth_note);

song = [eigth_E_Mid ...
        quarter_E_Mid ...
        quarter_E_Mid ...
        eigth_C_Mid ...
        quarter_E_Mid ...
        half_G_Mid ...
        half_G_Low ...
        quarter_dot_C_Mid ...
        quarter_dot_G_Low ...
        quarter_dot_E_Low ...
        quarter_A_Low ...
        quarter_B_Low ...
        eigth_A_Low_Sharp ...
        quarter_A_Low];
    
sound(song, 1/del);