(New page: % clear; %%ANSWER TO A and B % delta=0.000125%%%%%%%TO PLAY THE SONG AS TWICE AS FAST, double delta value % n=sin(0*(0:delta:0.25)); % c=sin(2*pi*130.81*(0:delta:0.25)); % dp=sin(2*pi*138...) |
|||
Line 1: | Line 1: | ||
− | |||
%%ANSWER TO A and B | %%ANSWER TO A and B | ||
+ | |||
% delta=0.000125%%%%%%%TO PLAY THE SONG AS TWICE AS FAST, double delta value | % delta=0.000125%%%%%%%TO PLAY THE SONG AS TWICE AS FAST, double delta value | ||
+ | |||
% n=sin(0*(0:delta:0.25)); | % n=sin(0*(0:delta:0.25)); | ||
+ | |||
% c=sin(2*pi*130.81*(0:delta:0.25)); | % c=sin(2*pi*130.81*(0:delta:0.25)); | ||
+ | |||
% dp=sin(2*pi*138.59*(0:delta:0.25)); | % dp=sin(2*pi*138.59*(0:delta:0.25)); | ||
+ | |||
% d=sin(2*pi*146.83*(0:delta:0.25)); | % d=sin(2*pi*146.83*(0:delta:0.25)); | ||
+ | |||
% ep=sin(2*pi*155.56*(0:delta:0.25)); | % ep=sin(2*pi*155.56*(0:delta:0.25)); | ||
+ | |||
% e=sin(2*pi*164.81*(0:delta:0.25)); | % e=sin(2*pi*164.81*(0:delta:0.25)); | ||
+ | |||
% f=sin(2*pi*174.61*(0:delta:0.25)); | % f=sin(2*pi*174.61*(0:delta:0.25)); | ||
+ | |||
% gp=sin(2*pi*185*(0:delta:0.25)); | % gp=sin(2*pi*185*(0:delta:0.25)); | ||
+ | |||
% g=sin(2*pi*196*(0:delta:0.25)); | % g=sin(2*pi*196*(0:delta:0.25)); | ||
+ | |||
% ap=sin(2*pi*207.65*(0:delta:0.25)); | % ap=sin(2*pi*207.65*(0:delta:0.25)); | ||
+ | |||
% a=sin(2*pi*220*(0:delta:0.25)); | % a=sin(2*pi*220*(0:delta:0.25)); | ||
+ | |||
% bp=sin(2*pi*233.08*(0:delta:0.25)); | % bp=sin(2*pi*233.08*(0:delta:0.25)); | ||
+ | |||
% b=sin(2*pi*246.94*(0:delta:0.25)); | % b=sin(2*pi*246.94*(0:delta:0.25)); | ||
+ | |||
% c1=sin(2*pi*261.63*(0:delta:0.25)); | % c1=sin(2*pi*261.63*(0:delta:0.25)); | ||
+ | |||
% dp1=sin(2*pi*277.18*(0:delta:0.25)); | % dp1=sin(2*pi*277.18*(0:delta:0.25)); | ||
+ | |||
% d1=sin(2*pi*293.66*(0:delta:0.25)); | % d1=sin(2*pi*293.66*(0:delta:0.25)); | ||
+ | |||
% ep1=sin(2*pi*311.13*(0:delta:0.25)); | % ep1=sin(2*pi*311.13*(0:delta:0.25)); | ||
+ | |||
% e1=sin(2*pi*329.63*(0:delta:0.25)); | % e1=sin(2*pi*329.63*(0:delta:0.25)); | ||
+ | |||
% f1=sin(2*pi*349.23*(0:delta:0.25)); | % f1=sin(2*pi*349.23*(0:delta:0.25)); | ||
+ | |||
% gp1=sin(2*pi*369.99*(0:delta:0.25)); | % gp1=sin(2*pi*369.99*(0:delta:0.25)); | ||
+ | |||
% g1=sin(2*pi*392*(0:delta:0.25)); | % g1=sin(2*pi*392*(0:delta:0.25)); | ||
+ | |||
% ap1=sin(2*pi*415.3*(0:delta:0.25)); | % ap1=sin(2*pi*415.3*(0:delta:0.25)); | ||
+ | |||
% a1=sin(2*pi*440*(0:delta:0.25)); | % a1=sin(2*pi*440*(0:delta:0.25)); | ||
+ | |||
% bp1=sin(2*pi*466.16*(0:delta:0.25)); | % bp1=sin(2*pi*466.16*(0:delta:0.25)); | ||
+ | |||
% b1=sin(2*pi*493.88*(0:delta:0.25)); | % b1=sin(2*pi*493.88*(0:delta:0.25)); | ||
+ | |||
%ANSWER TO C | %ANSWER TO C | ||
+ | |||
%%%RESCALING ACCORDING TO THE TRANSFORMATION Y=X(2T) CAUSED INCREASED TONE | %%%RESCALING ACCORDING TO THE TRANSFORMATION Y=X(2T) CAUSED INCREASED TONE | ||
+ | |||
%%%OF MELODY BUT DID NOT AFFECT THE SPEED OF THE SONG. | %%%OF MELODY BUT DID NOT AFFECT THE SPEED OF THE SONG. | ||
+ | |||
delta=0.000125 | delta=0.000125 | ||
+ | |||
n=sin(4*0*(0:delta:0.25)); | n=sin(4*0*(0:delta:0.25)); | ||
+ | |||
c=sin(4*pi*130.81*(0:delta:0.25)); | c=sin(4*pi*130.81*(0:delta:0.25)); | ||
+ | |||
dp=sin(4*pi*138.59*(0:delta:0.25)); | dp=sin(4*pi*138.59*(0:delta:0.25)); | ||
+ | |||
d=sin(4*pi*146.83*(0:delta:0.25)); | d=sin(4*pi*146.83*(0:delta:0.25)); | ||
+ | |||
ep=sin(4*pi*155.56*(0:delta:0.25)); | ep=sin(4*pi*155.56*(0:delta:0.25)); | ||
+ | |||
e=sin(4*pi*164.81*(0:delta:0.25)); | e=sin(4*pi*164.81*(0:delta:0.25)); | ||
+ | |||
f=sin(4*pi*174.61*(0:delta:0.25)); | f=sin(4*pi*174.61*(0:delta:0.25)); | ||
+ | |||
gp=sin(4*pi*185*(0:delta:0.25)); | gp=sin(4*pi*185*(0:delta:0.25)); | ||
+ | |||
g=sin(4*pi*196*(0:delta:0.25)); | g=sin(4*pi*196*(0:delta:0.25)); | ||
+ | |||
ap=sin(4*pi*207.65*(0:delta:0.25)); | ap=sin(4*pi*207.65*(0:delta:0.25)); | ||
+ | |||
a=sin(4*pi*220*(0:delta:0.25)); | a=sin(4*pi*220*(0:delta:0.25)); | ||
+ | |||
bp=sin(4*pi*233.08*(0:delta:0.25)); | bp=sin(4*pi*233.08*(0:delta:0.25)); | ||
+ | |||
b=sin(4*pi*246.94*(0:delta:0.25)); | b=sin(4*pi*246.94*(0:delta:0.25)); | ||
+ | |||
c1=sin(4*pi*261.63*(0:delta:0.25)); | c1=sin(4*pi*261.63*(0:delta:0.25)); | ||
+ | |||
dp1=sin(4*pi*277.18*(0:delta:0.25)); | dp1=sin(4*pi*277.18*(0:delta:0.25)); | ||
+ | |||
d1=sin(4*pi*293.66*(0:delta:0.25)); | d1=sin(4*pi*293.66*(0:delta:0.25)); | ||
+ | |||
ep1=sin(4*pi*311.13*(0:delta:0.25)); | ep1=sin(4*pi*311.13*(0:delta:0.25)); | ||
+ | |||
e1=sin(4*pi*329.63*(0:delta:0.25)); | e1=sin(4*pi*329.63*(0:delta:0.25)); | ||
+ | |||
f1=sin(4*pi*349.23*(0:delta:0.25)); | f1=sin(4*pi*349.23*(0:delta:0.25)); | ||
+ | |||
gp1=sin(4*pi*369.99*(0:delta:0.25)); | gp1=sin(4*pi*369.99*(0:delta:0.25)); | ||
+ | |||
g1=sin(4*pi*392*(0:delta:0.25)); | g1=sin(4*pi*392*(0:delta:0.25)); | ||
+ | |||
ap1=sin(4*pi*415.3*(0:delta:0.25)); | ap1=sin(4*pi*415.3*(0:delta:0.25)); | ||
+ | |||
a1=sin(4*pi*440*(0:delta:0.25)); | a1=sin(4*pi*440*(0:delta:0.25)); | ||
+ | |||
bp1=sin(4*pi*466.16*(0:delta:0.25)); | bp1=sin(4*pi*466.16*(0:delta:0.25)); | ||
+ | |||
b1=sin(4*pi*493.88*(0:delta:0.25)); | b1=sin(4*pi*493.88*(0:delta:0.25)); | ||
line1=[ep,ep,f,f,g,g,ap,ap,g,g,ap,ap,g,ap,g,ap]; | line1=[ep,ep,f,f,g,g,ap,ap,g,g,ap,ap,g,ap,g,ap]; | ||
+ | |||
line2=[bp,bp,ap,ap,ep,ep,f,f,g,g,g,g,g,g,n,n,g,g,ap,ap]; | line2=[bp,bp,ap,ap,ep,ep,f,f,g,g,g,g,g,g,n,n,g,g,ap,ap]; | ||
+ | |||
line3=[a,a,bp,bp,a,a,bp,bp,a,bp,a,bp,c1,c1,bp,bp]; | line3=[a,a,bp,bp,a,a,bp,bp,a,bp,a,bp,c1,c1,bp,bp]; | ||
+ | |||
line4=[ep,ep,dp1,dp1,c1,c1,c1,c1,c1,c1,n,n,ep,ep,f,f,g,g,ap,ap]; | line4=[ep,ep,dp1,dp1,c1,c1,c1,c1,c1,c1,n,n,ep,ep,f,f,g,g,ap,ap]; | ||
+ | |||
line5=[g,g,ap,ap,g,ap,g,ap,ep1,ep1,c1,c1,bp,bp,ap,ap]; | line5=[g,g,ap,ap,g,ap,g,ap,ep1,ep1,c1,c1,bp,bp,ap,ap]; | ||
+ | |||
line6=[dp1,dp1,dp1,dp1,dp1,dp1,ap,ap,bp,bp,bp,bp,b,b,b,b,c1,c1,c1,dp1]; | line6=[dp1,dp1,dp1,dp1,dp1,dp1,ap,ap,bp,bp,bp,bp,b,b,b,b,c1,c1,c1,dp1]; | ||
+ | |||
line7=[ep1,c1,bp,ap,c1,c1,c1,c1,bp,bp,bp,bp,bp,bp,bp,bp,bp,bp,n,n]; | line7=[ep1,c1,bp,ap,c1,c1,c1,c1,bp,bp,bp,bp,bp,bp,bp,bp,bp,bp,n,n]; | ||
+ | |||
song=[line1,line2,line3,line4,line5,line6,line7]; | song=[line1,line2,line3,line4,line5,line6,line7]; | ||
+ | |||
wavwrite(song,'song.wav'); | wavwrite(song,'song.wav'); |
Latest revision as of 17:15, 4 September 2008
%%ANSWER TO A and B
% delta=0.000125%%%%%%%TO PLAY THE SONG AS TWICE AS FAST, double delta value
% n=sin(0*(0:delta:0.25));
% c=sin(2*pi*130.81*(0:delta:0.25));
% dp=sin(2*pi*138.59*(0:delta:0.25));
% d=sin(2*pi*146.83*(0:delta:0.25));
% ep=sin(2*pi*155.56*(0:delta:0.25));
% e=sin(2*pi*164.81*(0:delta:0.25));
% f=sin(2*pi*174.61*(0:delta:0.25));
% gp=sin(2*pi*185*(0:delta:0.25));
% g=sin(2*pi*196*(0:delta:0.25));
% ap=sin(2*pi*207.65*(0:delta:0.25));
% a=sin(2*pi*220*(0:delta:0.25));
% bp=sin(2*pi*233.08*(0:delta:0.25));
% b=sin(2*pi*246.94*(0:delta:0.25));
% c1=sin(2*pi*261.63*(0:delta:0.25));
% dp1=sin(2*pi*277.18*(0:delta:0.25));
% d1=sin(2*pi*293.66*(0:delta:0.25));
% ep1=sin(2*pi*311.13*(0:delta:0.25));
% e1=sin(2*pi*329.63*(0:delta:0.25));
% f1=sin(2*pi*349.23*(0:delta:0.25));
% gp1=sin(2*pi*369.99*(0:delta:0.25));
% g1=sin(2*pi*392*(0:delta:0.25));
% ap1=sin(2*pi*415.3*(0:delta:0.25));
% a1=sin(2*pi*440*(0:delta:0.25));
% bp1=sin(2*pi*466.16*(0:delta:0.25));
% b1=sin(2*pi*493.88*(0:delta:0.25));
%ANSWER TO C
%%%RESCALING ACCORDING TO THE TRANSFORMATION Y=X(2T) CAUSED INCREASED TONE
%%%OF MELODY BUT DID NOT AFFECT THE SPEED OF THE SONG.
delta=0.000125
n=sin(4*0*(0:delta:0.25));
c=sin(4*pi*130.81*(0:delta:0.25));
dp=sin(4*pi*138.59*(0:delta:0.25));
d=sin(4*pi*146.83*(0:delta:0.25));
ep=sin(4*pi*155.56*(0:delta:0.25));
e=sin(4*pi*164.81*(0:delta:0.25));
f=sin(4*pi*174.61*(0:delta:0.25));
gp=sin(4*pi*185*(0:delta:0.25));
g=sin(4*pi*196*(0:delta:0.25));
ap=sin(4*pi*207.65*(0:delta:0.25));
a=sin(4*pi*220*(0:delta:0.25));
bp=sin(4*pi*233.08*(0:delta:0.25));
b=sin(4*pi*246.94*(0:delta:0.25));
c1=sin(4*pi*261.63*(0:delta:0.25));
dp1=sin(4*pi*277.18*(0:delta:0.25));
d1=sin(4*pi*293.66*(0:delta:0.25));
ep1=sin(4*pi*311.13*(0:delta:0.25));
e1=sin(4*pi*329.63*(0:delta:0.25));
f1=sin(4*pi*349.23*(0:delta:0.25));
gp1=sin(4*pi*369.99*(0:delta:0.25));
g1=sin(4*pi*392*(0:delta:0.25));
ap1=sin(4*pi*415.3*(0:delta:0.25));
a1=sin(4*pi*440*(0:delta:0.25));
bp1=sin(4*pi*466.16*(0:delta:0.25));
b1=sin(4*pi*493.88*(0:delta:0.25));
line1=[ep,ep,f,f,g,g,ap,ap,g,g,ap,ap,g,ap,g,ap];
line2=[bp,bp,ap,ap,ep,ep,f,f,g,g,g,g,g,g,n,n,g,g,ap,ap];
line3=[a,a,bp,bp,a,a,bp,bp,a,bp,a,bp,c1,c1,bp,bp];
line4=[ep,ep,dp1,dp1,c1,c1,c1,c1,c1,c1,n,n,ep,ep,f,f,g,g,ap,ap];
line5=[g,g,ap,ap,g,ap,g,ap,ep1,ep1,c1,c1,bp,bp,ap,ap];
line6=[dp1,dp1,dp1,dp1,dp1,dp1,ap,ap,bp,bp,bp,bp,b,b,b,b,c1,c1,c1,dp1];
line7=[ep1,c1,bp,ap,c1,c1,c1,c1,bp,bp,bp,bp,bp,bp,bp,bp,bp,bp,n,n];
song=[line1,line2,line3,line4,line5,line6,line7];
wavwrite(song,'song.wav');