%%Mario Theme by Ryne Rayburn
clear all
clc
A=440; %%Given Value - Freq. of A
C=A*3/5; %%From Given Table - Middle C
B=15*C/8;
G=3*C/2;
F=4*C/3;
E=5*C/4;
D=9*C/8;
Cup=2*C;
Clow=C/2;
Glow=G/2;
Elow=E/2;
Alow=A/2;
Blow=B/2;
AlowSHARP=233.08;
DELTA=.0001;
t=0:DELTA:1; %%One Second of playing
t2=0:DELTA:.5; %%Half Note
t4=0:DELTA:.25; %%Quarter Note
t8=0:DELTA:.125; %%Eigth Note
t16=0:DELTA:1/16; %%Sixteenth Note
y=sin(2*pi*E*t8); %%E
sound(y,1/DELTA);
y=sin(2*pi*E*t4); %%E
sound(y,1/DELTA);
y=sin(2*pi*E*t8); %%E
sound(y,1/DELTA);
y=sin(2*pi*G*t8); %%G
sound(y,1/DELTA);
y=sin(2*pi*C*t8); %%C
sound(y,1/DELTA);
y=sin(2*pi*E*t4); %%E
sound(y,1/DELTA);
y=sin(2*pi*G*t2); %%G
sound(y,1/DELTA);
y=sin(2*pi*C*t4); %%C
sound(y,1/DELTA);
y=sin(2*pi*Glow*t8); %%G Low
sound(y,1/DELTA);
y=sin(2*pi*Elow*t8); %%E Low
sound(y,1/DELTA);
y=sin(2*pi*Alow*t4); %%A Low
sound(y,1/DELTA);
y=sin(2*pi*Blow*t8); %%B Low
sound(y,1/DELTA);
y=sin(2*pi*AlowSHARP*t8); %%A Sharp Low
sound(y,1/DELTA);
y=sin(2*pi*Alow*t4); %%A Low
sound(y,1/DELTA);