%%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);

Return to Homework 1

Alumni Liaison

Recent Math PhD now doing a post-doctorate at UC Riverside.

Kuei-Nuan Lin