基于51/52单片机的音乐彩灯项目Proteus仿真程序

最近做了简单的小玩意，基于51单片机的流水灯，流水灯跟随《生日快乐歌》的节拍闪烁，觉得挺有意思的，给大家分享出来，如有不好，欢迎指正！
所有工程文件都在附件，包含源码、电路图、hex文件等。

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）

仿真电路图

同时蜂鸣器播放生日快乐歌

单片机源程序如下:

1. #include<reg51.h>
   
2. #include<intrins.h>
   
3. #define led_8 P0
   
4. sbit speaker=P2^7;
   
5. unsigned char code yp[]={70,70,63,70,53,56,70,70,63,
   
6.                                                                         70,47,53,70,70,35,42,53,56,
   
7.                                                                                 63,39,39,42,53,47,53,-1};    //音谱表
   
8. unsigned int code yl[]={225,75,300,300,300,600,225,75,300,300,300,600,225,75,
   
9.                                                                 300,300,300,300,300,475,75,300,300,300,600,-1};   //每个音对应的演奏长度
   
10. void ys(unsigned int x)
    
11. {
    
12.         while(x--);
    
13. }
    
14. void music()
    
15. {
    
16.         unsigned int m=0,n,s;
    
17.         led_8=0xff;
    
18.         while(yp[m]!=-1||yl[m]!=-1)  //没遇到结束符-1则执行下列音乐段
    
19.         {
    
20.                 for(n=0;n<yl[m];n++)
    
21.                 {
    
22.                         speaker=~speaker;    //扬声器按音谱发音
    
23.                         for(s=0;s<yp[m];s++);
    
24.                 }
    
25.         ys(10);   //每个音符的演奏长度
    
26.         led_8=~led_8;    //8只LED灯闪烁
    
27.         m++;    //指向下一个音符与演奏时间值
    
28.         }
    
29. }
    
30. 
    
31. void main()
    
32. {
    
33.         while(1)
    
34.         {
    
35.                 music();
    
36.                 ys(500);
    
37.         }
    
38. }
    

复制代码

所有资料51hei附件下载:
task4.zip (39.74 KB, 下载次数: 50)

2021-10-26 11:22 上传

点击文件名下载附件