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

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2860|回復: 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 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 亚洲成人自拍网 | 91久久久www播放日本观看 | 亚洲午夜久久久 | 国产欧美视频一区二区三区 | www日本在线| 一级片在线播放 | 欧美精品一二区 | 国产精品精品久久久 | 国产在线精品一区二区 | a久久久久久 | 一区二区三区四区五区在线视频 | 日韩视频一区二区 | 欧美久久一区二区 | 久草在线| 欧美手机在线 | 污书屋 | 综合五月 | 国产精品日韩欧美一区二区三区 | 国产1区 | 久久天堂| 嫩草视频网 | 精品久久久久久久 | 国产精品视频一区二区三区, | 久久99精品久久久久子伦 | 国产精品1 | 一区二区三区国产精品 | 日韩国产中文字幕 | 国产精品亚洲精品日韩已方 | 日韩在线一区二区三区 | 国产精品一区二区免费看 | 亚洲高清久久 | 亚洲综合国产精品 | 亚洲高清在线 | 国产成人99久久亚洲综合精品 | 国产精品美女久久久久aⅴ国产馆 | 最新av中文字幕 | 国产一区精品 | 99精品视频免费在线观看 | 日韩高清中文字幕 | 美女黄频| 久久久久久九九九九九九 |