hhbhhy 发表于 2012-9-14 21:42

用MATLAB编了一首曲子，有音箱的朋友听听。

%吕颂贤版笑傲江湖

fd=;
x=1:8;
=polyfit(x,fd,2);
shiji=[-1 -2 -3 -4 -5 -6 -7 1 2 3 4 5 6 7];
zhuanhuan=[-6 -5 -4 -3 -2 -1 0 1 2 3 4 5 6 7];

g=[-6 1;-6 1;-6 0.5;-6 0.5;-6 0.5;-6 0.5;
-6 2;-6 2;
3 1; 6 0.75;3 0.25; 5 0.5;5 1;3 0.5;
2 0.5;3 0.5;5 0.5; 6 0.5; 3 2;
3 1; 6 0.75; 3 0.25; 5 0.5;5 1;3 0.5;
2 0.5;3 0.5;5 0.5; 6 0.25;5 0.25;3 2;0 0.25;3 0.5; 2 0.25;
1 0.75;1 0.25;2 0.5;3 0.5;2 0.5;2 0.75;2 0.5;1 0.25;
-6 0.5;-6 0.25;1 0.25;2 0.5;3 0.5;5 0.75;6 0.25;5 0.5;3 0.25;2 0.25;
1 0.75;2 0.75;3 0.5;2 0.5;2 0.75;1 0.75;
-6 0.5;-6 0.25;1 0.25;2 0.25;3 0.5;5 0.25;6 2;

3 1; 6 0.75;3 0.25; 5 0.5;5 1;3 0.5;
2 0.5;3 0.5;5 0.5; 6 0.25;5 0.25;3 2;
3 1; 6 0.75; 3 0.25; 5 0.5;5 1;3 0.5;
2 0.5;3 0.5;5 0.5; 6 0.25;5 0.25;3 2;0 0.25;3 0.5; 2 0.25;
1 0.75;1 0.25;2 0.5;3 0.5;2 0.5;2 0.75;2 0.5;1 0.25;
-6 0.5;-6 0.25;1 0.25;2 0.5;3 0.5;5 0.75;6 0.25;5 0.5;3 0.25;2 0.25;
1 0.75;2 0.75;3 0.5;2 0.5;2 0.75;1 0.75;
-6 0.5;-6 0.25;1 0.25;2 0.25;3 0.5;5 0.25;6 2;
2 0.75;2 0.5;3 0.5;2 0.25;1 0.5;1 0.75;-6 0.5;1 0.25;
2 0.75;2 0.5;3 0.5;2 0.25;1 0.5;-6 0.5;0 0.25;1 0.25;-6 0.25;1 0.25;
2 0.75;2 0.5;3 0.5;2 0.25;1 0.5;1 0.5;0 0.25;1 0.25;-6 0.25;1 0.25;
2 0.5;2 0.5;2 0.25;5 0.5;3 2.25;
-6 0.75;-6 0.75;-6 0.5; 2 0.75;2 0.75;3 0.25;2 0.25;
1 0.75;1 0.75;2 0.25;-6 0.75;-6 0.75;-5 0.5;
-6 0.75;-6 0.75;-5 0.5;3 0.75;3 0.75;-5 0.5;
2 0.75;2 0.75;2 0.5;3 2;
-6 2;2 1.5;3 0.5;
1 1.5;2 0.5;-6 1.5;1 0.25;
-5 1.5;-6 0.5;3 0.75;2 0.25;3 0.5;5 0.5;
6 4;


];
N=length(g);

g(:,2)=g(:,2)*0.5;
for i=1:N
   if g(i,1)<0
      g(i,1)=g(i,1)*(-1)-7;
   end
    t=zeros(1,1);
    t=0.0001:0.0001:g(i,2);
    M(i)=length(t);
   
    fdd(i)=a(1)*g(i,1)*g(i,1)+a(2)*g(i,1)+a(3);
    W=sum(M);
    Q=sum(M)-M(i)+1;
    sheng(Q:W)=sin(2*pi*fdd(i)*t);
end

sound(sheng);


memo1221 发表于 2012-9-15 23:44

楼主厉害！！

516090806 发表于 2012-9-16 12:49

memo1221 发表于 2012-9-15 23:44 static/image/common/back.gif
楼主厉害！！

有创意，好棒

hhbhhy 发表于 2012-9-17 19:58

原创，手敲的代码。

aeolusares 发表于 2012-9-19 18:44

给力{:{39}:}

我心依然 发表于 2012-9-29 10:42

棒极了，楼主

GUTOU 发表于 2012-10-11 16:39

楼主你真牛B

1353963615 发表于 2012-10-12 11:36

太牛了，有解释的话，就可以推广了呀

HeRo~ 发表于 2012-10-12 14:34

太牛了，这怎么出声啊

happy 发表于 2012-10-18 11:00

挺不错的{:{39}:}

pumbaa0033 发表于 2012-10-22 22:21

mark神贴

adaidai008 发表于 2012-10-22 22:23

厉害啊@楼主，呵呵。

complexman2005 发表于 2012-10-23 16:25

有点意思

高君 发表于 2012-11-8 13:01

complexman2005 发表于 2012-10-23 16:25 static/image/common/back.gif
有点意思

真有天赋啊
页: [1]
查看完整版本: 用MATLAB编了一首曲子，有音箱的朋友听听。