matlab版生日快乐歌（带字幕）

Introspectio

1. clear all
   
2. 
   
3. A4=440;%标准音A4 不同的曲调音调不同scale的取值范围不同
   
4. 
   
5. pt=44100;p0=pt/2;%频率
   
6. 
   
7. scale=A4/2^(9/12)*2.^((-12:11)/12);%这里可以调节音调高低，eg：改变式子中的-12：11为0：23
   
8. 
   
9. map=[1 3 5 6 8 10 12 13 15 17 18 20 22 24 25];%音符，这个需要看曲谱编码
   
10. 
    
11. score=[5 5 6 5 8 7 5 5 6 5 9 8 5 5 12 10 8 7 6 6 11 11 10 8 9 8];
    
12. 
    
13. rhythm=[0.5 0.5 1 1 1 2 0.5 0.5 1 1 1 2  0.5 0.5 1 1 1  0.5 0.5 2 0.5 0.5 1 1 1 2];%节拍，这个需要看曲谱编码
    
14. 
    
15. lyric=['祝你生日快乐祝你生日快乐祝你生日快乐祝你生日快乐  '];
    
16. 
    
17. for i=1:length(score)
    
18. 
    
19. if(i<19)
    
20. 
    
21. 
    
22. fprintf(1,'%c',lyric(i))
    
23. 
    
24. elseif (i>20)
    
25. 
    
26. 
    
27. fprintf(1,'%c',lyric(i-2))
    
28. 
    
29. 
    
30. end
    
31. 
    
32. 
    
33. 
    
34. 
    
35. if (i==6||i==12||i==18)
    
36. 
    
37. disp('!');
    
38. 
    
39. 
    
40. fprintf(1,'\n');
    
41. 
    
42. end
    
43. 
    
44. if i==26
    
45. 
    
46. disp('!');
    
47. 
    
48. end  
    
49. 
    
50. 
    
51. wavplay(sin((1:rhythm(i)*p0)/pt*2*pi*scale(map(score(i)))),pt);
    
52. 
    
53. 
    
54. 
    
55. 
    
56. end

复制代码

quade00

纳尼，这是什么，求解析

光之仑

很棒啊！
！！！！！1

chaofanat

感觉很好啊

竹竹

太厉害了！

xuanlengning

真心觉得好厉害啊！

wanganfu

楼主太给力了。感谢分享。

ST黄少杰

好东西~谢啦！！

涂卡铅笔

太牛逼了，，，

净心、精心

大神  还可以这样    太帅了