久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2950|回復: 0
打印 上一主題 下一主題
收起左側

蜂鳴器唱歌單片機源碼

[復制鏈接]
跳轉到指定樓層
樓主
ID:113177 發表于 2016-4-9 21:49 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
蜂鳴器唱歌源碼
  1. #include <reg51.h>
  2. sbit      speaker=P3^6;
  3. unsigned char timer0h,timer0l,time;
  4.         //生日歌
  5. code unsigned char sszymmh[]={

  6. 5,1,1, 1,2,3, 3,2,1, 5,2,3, 1,2,1, 7,1,3,
  7. 3,2,1, 5,2,2,  5,2,1, 6,2,1, 7,2,2, 1,3,3,
  8. 6,2,1, 6,2,1, 5,2,1, 5,2,6, 3,2,1, 2,2,1,

  9. 1,2,3, 1,2,1, 1,2,2, 3,2,1, 2,2,1, 1,2,3, 1,2,1,
  10. 1,2,2, 2,2,1, 3,2,1, 2,2,2, 1,2,1, 6,1,2, 2,2,1,
  11. 3,2,1, 2,2,6,  5,1,1,


  12. 2,2,3, 6,1,1, 7,1,2, 1,2,1, 2,2,1, 1,2,6, 3,2,1,
  13. 5,2,1, 3,2,3, 2,2,1, 1,2,2, 5,2,2, 7,1,6, 6,1,1,
  14. 7,1,1, 6,1,3, 7,1,1, 6,1,2, 5,1,2, 3,2,6, 5,2,2,


  15. 3,2,3, 2,2,1, 1,2,2, 5,2,2, 7,1,6, 6,1,1, 7,1,1,
  16. 1,2,3, 1,2,1, 1,2,2, 2,2,1, 3,2,1, 2,2,6,
  17. 5,1,1, 1,2,3, 3,2,1, 5,2,3, 1,2,1,


  18. 7,1,3, 3,2,1, 5,2,3, 5,2,2, 6,2,3, 7,2,1, 1,1,3,
  19. 6,2,1, 6,2,1, 5,2,1, 5,2,4, 3,2,1, 2,2,1, 1,2,3,
  20. 1,2,1, 1,2,2, 3,2,1, 2,2,1,


  21. 1,2,3, 1,2,1, 1,2,2, 2,2,1, 3,2,1, 2,2,3, 6,1,1,
  22. 7,1,2, 1,2,1, 2,2,1, 1,2,6
  23. };
  24.        // 音階頻率表 高八位
  25. code unsigned char FREQH[]={
  26.                                 0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,
  27.                                 0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i
  28.                                 0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,
  29.                                 0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,
  30.                                } ;
  31.          // 音階頻率表 低八位
  32. code unsigned char FREQL[]={
  33.                                  0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,
  34.                                  0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i
  35.                                  0xEE,0x44, 0x6B,0xB4,0xF4,0x2D,
  36.                                  0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,
  37.                                 };
  38. void delay(unsigned char t)
  39.    {
  40.    unsigned char t1;
  41.    unsigned long t2;
  42.    for(t1=0;t1<t;t1++)
  43.    {
  44.     for(t2=0;t2<8000;t2++)
  45.        {
  46.         ;
  47.         }
  48.    }
  49.    TR0=0;
  50. }
  51. void t0int() interrupt 1
  52. {
  53. TR0=0;
  54. speaker=!speaker;
  55. TH0=timer0h;
  56. TL0=timer0l;
  57. TR0=1;
  58. }
  59. void song()
  60. {
  61. TH0=timer0h;
  62. TL0=timer0l;
  63. TR0=1;
  64. delay(time);                       
  65. }

  66. void main(void)
  67. {
  68. unsigned char k;
  69. unsigned long i;
  70. TMOD=1; //置CT0定時工作方式1
  71. EA=1;
  72. ET0=1;//IE=0x82 //CPU開中斷,CT0開中斷
  73. while(1)
  74.       {
  75.        i=0;  
  76.        while(i<324){         //音樂數組長度 ,唱完從頭再來        
  77.        k=sszymmh[i]+7*sszymmh[i+1]-1;
  78.        timer0h=FREQH[k];
  79.        timer0l=FREQL[k];
  80.        time=sszymmh[i+2];
  81.        i=i+3;
  82.        song();
  83.         }
  84.       }
  85.   }
復制代碼


蜂鳴器唱歌.zip

25.8 KB, 下載次數: 6, 下載積分: 黑幣 -5

評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵!

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 日韩在线h| 免费看91| 欧洲一级毛片 | 国产精品久久久久久久久久 | 91精品国产综合久久婷婷香蕉 | 精品一区国产 | 精品福利在线 | 中文精品视频 | 中文字幕一区二区三区不卡 | 精品成人在线 | 999www视频免费观看 | 美女福利视频网站 | 97久久精品午夜一区二区 | 一区二区三区欧美 | 亚洲三区在线观看 | 成年女人免费v片 | 亚洲午夜精品久久久久久app | 色屁屁在线观看 | 一区二区三区视频在线 | 国产精品久久777777 | 国产精品日日夜夜 | 综合二区 | 天天天天天操 | 一区二区三区在线观看视频 | 亚洲91精品 | 日韩亚洲视频 | 成人在线h | 亚洲男人天堂 | 男女污污网站 | 狠狠干av | 婷婷久 | 亚洲av毛片| 亚洲欧美激情四射 | 午夜寂寞影院在线观看 | 亚洲在线观看视频 | 国产一区二区在线91 | 一级毛片视频在线 | 草草视频在线免费观看 | 国产91在线 | 中日 | 亚洲午夜精品一区二区三区他趣 | 一区二区中文字幕 |