標題: 基于51/52單片機的音樂彩燈項目Proteus仿真程序 [打印本頁]
作者: 15236966302    時間: 2021-10-26 11:23
標題: 基于51/52單片機的音樂彩燈項目Proteus仿真程序
最近做了簡單的小玩意，基于51單片機的流水燈，流水燈跟隨《生日快樂歌》的節(jié)拍閃爍，覺得挺有意思的，給大家分享出來，如有不好，歡迎指正！
所有工程文件都在附件，包含源碼、電路圖、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則執(zhí)行下列音樂段
  19.         {
  20.                 for(n=0;n<yl[m];n++)
  21.                 {
  22.                         speaker=~speaker;    //揚聲器按音譜發(fā)音
  23.                         for(s=0;s<yp[m];s++);
  24.                 }
  25.         ys(10);   //每個音符的演奏長度
  26.         led_8=~led_8;    //8只LED燈閃爍
  27.         m++;    //指向下一個音符與演奏時間值
  28.         }
  29. }

  31. void main()
  32. {
  33.         while(1)
  34.         {
  35.                 music();
  36.                 ys(500);
  37.         }
  38. }
復制代碼

所有資料51hei附件下載:
task4.zip (39.74 KB, 下載次數(shù): 50)





歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1