Difference between revisions of "HW1.1 Hetong Li ECE301Fall2008mboutin" - Rhea

Revision as of 18:03, 1 September 2008

%Hetong Li
%09/01/08
%ECE301 hw1.1

clear;
clc;
% PART A
delta = 0.0005;
H=0:delta: 1;
Q=0:delta:0.5;
DQ_time=0:delta:0.75;
EN=0:delta:0.25;

AH = sin(2*pi*220*H);
BQ= sin(2*pi*493.88/2*Q);
DBQ=sin(2*pi*277.18*Q);
DDQ = sin(2*pi*293.66*DQ_time);
DQ = sin(2*pi*293.66*Q);
EEN =sin(2*pi*329.63*EN);
GBQ=sin(2*pi*369.99*Q);
GQ=sin(2*pi*392*Q);
GEN=sin(2*pi*392*EN);
FEN= sin(2*pi*349.23*EN);
GBEN=sin(2*pi*369.99*EN);

notes= [AH BQ DBQ DDQ EEN GBQ GBQ GQ GEN GEN DQ EEN FEN GBEN];

sound (notes,1/delta);
wavwrite(notes,1/delta,32,'music-a.wav');

% PART B
delta = 0.0005;
H=0:delta: 0.5;
Q=0:delta:0.25;
DQ_time=0:delta:0.375;
EN=0:delta:0.125;

AH = sin(2*pi*220*H);
BQ= sin(2*pi*493.88/2*Q);
DBQ=sin(2*pi*277.18*Q);
DDQ = sin(2*pi*293.66*DQ_time);
DQ = sin(2*pi*293.66*Q);
EEN =sin(2*pi*329.63*EN);
GBQ=sin(2*pi*369.99*Q);
GQ=sin(2*pi*392*Q);
GEN=sin(2*pi*392*EN);
FEN= sin(2*pi*349.23*EN);
GBEN=sin(2*pi*369.99*EN);

notes= [AH BQ DBQ DDQ EEN GBQ GBQ GQ GEN GEN DQ EEN FEN GBEN];

sound (notes,1/delta);
wavwrite(notes,1/delta,32,'music-b.wav');

% PART C
delta = 0.0005;
H=0:delta: 1;
Q=0:delta:0.5;
DQ_time=0:delta:0.75;
EN=0:delta:0.25;

AH = sin(2*pi*2*220*H);
BQ= sin(2*pi*2*493.88/2*Q);
DBQ=sin(2*pi*2*277.18*Q);
DDQ = sin(2*pi*2*293.66*DQ_time);
DQ = sin(2*pi*2*293.66*Q);
EEN =sin(2*pi*2*329.63*EN);
GBQ=sin(2*pi*2*369.99*Q);
GQ=sin(2*pi*2*392*Q);
GEN=sin(2*pi*2*392*EN);
FEN= sin(2*pi*2*349.23*EN);
GBEN=sin(2*pi*2*369.99*EN);

notes= [AH BQ DBQ DDQ EEN GBQ GBQ GQ GEN GEN DQ EEN FEN GBEN];


sound (notes,1/delta);
wavwrite(notes,1/delta,32,'music-c.wav');

@@ Line 6: / Line 6: @@
 clear;
 clc;
-scale=1; %initialize scale
+% PART A
-t=[];
+delta = 0.0005;
-delta=0.0005;
+H=0:delta: 1;
-%define frequencies for each tone
+Q=0:delta:0.5;
-for n=1:19
+DQ_time=0:delta:0.75;
-    freq(n)=220*2^((n-1)/12);
+EN=0:delta:0.25;
-end
-A=freq(1);
-Bb=freq(2);
-B=freq(3);
-C=freq(4);
-Db=freq(5);
-D=freq(6);
-Eb=freq(7);
-E=freq(8);
-F=freq(9);
-Gb=freq(10);
-G=freq(11);
-A2b=freq(12);
-A2=freq(13);
-B2b=freq(14);
-B2=freq(15);
-C2=freq(16);
-D2b=freq(17);
-D2=freq(18);
-E2b=freq(19);
-O=0;
-%define durations
-P=60/172;
-TP=P*2;
-FP=P*4;
-THP=P*3;
-QP=P*1.5;
-H=P/2;
-%Notes and Duration
-x = [Eb,F,G,A2b,G,A2b,G,A2b,G,A2b,B2b,A2b,Eb,F,G,O, ...
-     G,A2b,A2,B2b,A2,B2b,A2,B2b,A2,B2b,C2,B2b,Eb,D2b,C2,O, ...
-     Eb,F,G,A2b,G,A2b,G,A2b,G,A2b,E2b,C2,B2b,A2b,D2b,A2b,A2b, ...
-     B2b,B2b,B2,B2,C2,D2b,E2b,C2,B2b,A2b,C2,B2b,B2b, ...
-     Eb,F,G,A2b,B2b,C2,C2,D2b,D2b,D2b,A2b,B2b,B2,C2, ...
-     C2,C2,B2b,A2b,B2b,C2,C2,B2b,F,G,A2b,G,F,B2b, ...
-     Eb,Eb,F,G,A2b,B2b,C2,C2,C2, ...
-     D2b,D2b,A2b,B2b,C2,O,F,G, ...
-     A2b,F,Eb,A2b,C2,Eb,C2,B2b,A2b,A2b];
-dur = [P,P,P,P,P,P,H,H,H,H,P,P,P,P,THP,P, ...
-       P,P,P,P,P,P,H,H,H,H,P,P,P,P,THP,P, ...
-       P,P,P,P,P,P,H,H,H,H,P,P,P,P,THP,H,H, ...
-       QP,H,QP,H,QP,H,H,H,H,H,TP,TP,FP, ...
-       TP,P,P,QP,H,P,P,P,H,H,P,H,H,FP, ...
-       TP,P,P,QP,H,P,P,P,H,H,P,H,H,FP, ...
-       QP,H,P,P,QP,H,P,H,H, ...
-       P,P,P,P,THP,P,QP,H, ...
-       P,P,P,P,TP,QP,H,QP,H,THP];
-% I almost know nothing about music thoery,so I referred to previous submitted hws for frequency formula.
-% and notes of hail purdue.
-part = input('Please choose the partyou want to play(a,b,c):','s');
+AH = sin(2*pi*220*H);
-y=[];
+BQ= sin(2*pi*493.88/2*Q);
-if(strcmp(part,'a'))
+DBQ=sin(2*pi*277.18*Q);
-    for i = 1:length(dur)
+DDQ = sin(2*pi*293.66*DQ_time);
-        t = 0:delta:dur(i);
+DQ = sin(2*pi*293.66*Q);
-        y = sin(2*pi*x(i)*t*scale);
+EEN =sin(2*pi*329.63*EN);
-        sound(y,1/delta);
+GBQ=sin(2*pi*369.99*Q);
-    end
+GQ=sin(2*pi*392*Q);
-elseif(strcmp(part,'b'))
+GEN=sin(2*pi*392*EN);
-    dur=dur./2;
+FEN= sin(2*pi*349.23*EN);
-    for i = 1:length(dur)
+GBEN=sin(2*pi*369.99*EN);
-        t = 0:delta:dur(i);
-        y= sin(2*pi*x(i)*t*scale);
+notes= [AH BQ DBQ DDQ EEN GBQ GBQ GQ GEN GEN DQ EEN FEN GBEN];
-        sound(y,1/delta);
-    end
+sound (notes,1/delta);
-elseif(strcmp(part,'c'))
+wavwrite(notes,1/delta,32,'music-a.wav');
-    scale=2;
-    for i = 1:length(dur)
+% PART B
-        t = 0:delta:dur(i);
+delta = 0.0005;
-        y = sin(2*pi*x(i)*t*scale);
+H=0:delta: 0.5;
-        sound(y,1/delta);
+Q=0:delta:0.25;
-    end
+DQ_time=0:delta:0.375;
-else
+EN=0:delta:0.125;
-    fprintf('Sorry,there is no corresponding part');
-end
+AH = sin(2*pi*220*H);
+BQ= sin(2*pi*493.88/2*Q);
+DBQ=sin(2*pi*277.18*Q);
+DDQ = sin(2*pi*293.66*DQ_time);
+DQ = sin(2*pi*293.66*Q);
+EEN =sin(2*pi*329.63*EN);
+GBQ=sin(2*pi*369.99*Q);
+GQ=sin(2*pi*392*Q);
+GEN=sin(2*pi*392*EN);
+FEN= sin(2*pi*349.23*EN);
+GBEN=sin(2*pi*369.99*EN);
+notes= [AH BQ DBQ DDQ EEN GBQ GBQ GQ GEN GEN DQ EEN FEN GBEN];
+sound (notes,1/delta);
+wavwrite(notes,1/delta,32,'music-b.wav');
+% PART C
+delta = 0.0005;
+H=0:delta: 1;
+Q=0:delta:0.5;
+DQ_time=0:delta:0.75;
+EN=0:delta:0.25;
+AH = sin(2*pi*2*220*H);
+BQ= sin(2*pi*2*493.88/2*Q);
+DBQ=sin(2*pi*2*277.18*Q);
+DDQ = sin(2*pi*2*293.66*DQ_time);
+DQ = sin(2*pi*2*293.66*Q);
+EEN =sin(2*pi*2*329.63*EN);
+GBQ=sin(2*pi*2*369.99*Q);
+GQ=sin(2*pi*2*392*Q);
+GEN=sin(2*pi*2*392*EN);
+FEN= sin(2*pi*2*349.23*EN);
+GBEN=sin(2*pi*2*369.99*EN);
+notes= [AH BQ DBQ DDQ EEN GBQ GBQ GQ GEN GEN DQ EEN FEN GBEN];
+sound (notes,1/delta);
+wavwrite(notes,1/delta,32,'music-c.wav');

Difference between revisions of "HW1.1 Hetong Li ECE301Fall2008mboutin" - Rhea

Revision as of 18:03, 1 September 2008

Alumni Liaison