国产免费AV|泡泡玛特欧洲总部将设在伦敦|中文天堂网www新版资源在线|一本久道综合在线中文|国精产品一二三产区的使用方法|香蕉鱼在线观看|www.27eee

 找回密碼
 注冊
搜索

51單片機實現音樂播放 在proteus仿真音質不錯

[復制鏈接]
樓主
coolfire 發表于 2021-4-21 15:31:56 | 只看該作者 |只看大圖 |倒序瀏覽 |閱讀模式
proteus 圖紙需要用8.8版本以上,才能打開。注意圖中的speaker的驅動電壓需要修改成1V,才能驅動。

單片機部分代碼如下所示:完整的請下載附件查看
  1. #include <reg52.h>

  2. sbit beep = P1^5;
  3. unsigned char timer0H, timer0L, time;

  4. //單片機晶振采用11.0592MHz
  5. // 頻率-半周期數據表 高八位     本軟件共保存了四個八度的28個頻率數據
  6. code unsigned char FREQH[] = {
  7.     0xF2, 0xF3, 0xF5, 0xF5, 0xF6, 0xF7, 0xF8,    //低音1234567
  8.     0xF9, 0xF9, 0xFA, 0xFA, 0xFB, 0xFB, 0xFC, 0xFC,//1,2,3,4,5,6,7,i
  9.     0xFC, 0xFD, 0xFD, 0xFD, 0xFD, 0xFE,            //高音 234567
  10.     0xFE, 0xFE, 0xFE, 0xFE, 0xFE, 0xFE, 0xFF};   //超高音 1234567
  11. // 頻率-半周期數據表 低八位
  12. code unsigned char FREQL[] = {
  13.     0x42, 0xC1, 0x17, 0xB6, 0xD0, 0xD1, 0xB6,    //低音1234567
  14.     0x21, 0xE1, 0x8C, 0xD8, 0x68, 0xE9, 0x5B, 0x8F, //1,2,3,4,5,6,7,i
  15.     0xEE, 0x44, 0x6B, 0xB4, 0xF4, 0x2D,             //高音 234567
  16.     0x47, 0x77, 0xA2, 0xB6, 0xDA, 0xFA, 0x16};   //超高音 1234567
  17. //數據表           
  18. code unsigned char song[] = {
  19. 5, 2, 2, 6, 2, 2, 5, 2, 2, 4, 2, 2, 3, 2, 2, 2, 2, 2, 1, 2, 6, 5, 1, 6, //我和我的祖國
  20. 1, 2, 2, 3, 2, 2, 1, 3, 2, 7, 2, 2, 6, 2, 3, 3, 2, 1, 5, 2, 12,                        //一刻也不能分割
  21. 6, 2, 2, 7, 2, 2, 6, 2, 2, 5, 2, 2, 4, 2, 2, 3, 2, 2, 2, 2, 6, 6, 1, 6,        //無論我走到哪里
  22. 7, 1, 2, 6, 1, 2, 5, 1, 2, 5, 2, 2, 1, 2, 3, 2, 2, 1, 3, 2, 12,                        //都唱出一首贊歌
  23. 5, 2, 2, 6, 2, 2, 5, 2, 2, 4, 2, 2, 3, 2, 2, 2, 2, 2, 1, 2, 6, 5, 1, 6,        //我歌唱每一座高山
  24. 1, 2, 2, 3, 2, 2, 1, 3, 2, 7, 2, 2, 2, 3, 3, 1, 3, 1, 6, 2, 12,                        //我歌唱每一條河
  25. 1, 3, 2, 7, 2, 2, 6, 2, 2, 5, 2, 6,                                                                                //裊裊炊煙
  26. 6, 2, 2, 5, 2, 2, 4, 2, 2, 3, 2, 6,                                                                                //小小村落
  27. 7, 1, 4, 6, 1, 2, 5, 1, 4, 2, 2, 2, 1, 2, 12,                                                        //路上一道轍
  28. 8, 2, 2, 2, 3, 2, 3, 3, 2, 2, 3, 2, 8, 2, 2, 6, 2, 2, 7, 2, 2, 6, 2, 3, 3, 2, 1, 5, 2, 12,//我最親愛的祖國
  29. 8, 2, 2, 2, 3, 2, 3, 3, 2, 2, 3, 2, 8, 2, 2, 6, 2, 2, 7, 2, 2, 5, 2, 3, 3, 2, 1, 6, 2, 12,//我永遠緊依著你的心窩
  30. 5, 2, 2, 4, 2, 2, 3, 2, 2, 2, 2, 6, 7, 1, 2, 6, 1, 2, 5, 1, 2, 3, 2, 6,4, 2, 6, 2, 2, 4, 1, 2, 2,1, 2, 10,//你用你那母親的脈搏和我訴說
  31. 0x00,0x00,0x00
  32. };
  33. //一個音符有三個數字。前為第幾個音、中為第幾個八度、后為時長(以半拍為單位)。
  34. //6, 2, 3 分別代表:6, 中音, 3個半拍;
  35. //5, 2, 1 分別代表:5, 中音, 1個半拍;

  36. void t0int() interrupt 1         //T0中斷程序,控制發音的音調
  37. {
  38.     TR0 = 0;                     //先關閉T0
  39.     beep = !beep;          //輸出方波, 發音
  40.     TH0 = timer0H;               //下次的中斷時間, 這個時間, 控制音調高低
  41.     TL0 = timer0L;
  42.     TR0 = 1;                     //啟動T0
  43. }

  44. void delay(unsigned char t)     //延時程序,控制發音的時間長度
  45. {
  46.     unsigned char t1;
  47.     unsigned long t2;
  48.     for(t1 = 0; t1 < t; t1++)    //雙重循環, 共延時t個半拍
  49.       for(t2 = 0; t2 < 4000; t2++); //延時期間, 可進入T0中斷去發音
  50.     TR0 = 0;                        //關閉T0, 停止發音
  51. }
復制代碼
音樂播放proteus仿真和c語言源碼.zip (49.19 KB, 售價: 5 E幣)
參考曲譜: 51單片機實現音樂播放 在proteus仿真音質不錯 1.jpg
您需要登錄后才可以回帖 登錄 | 注冊

本版積分規則

手機版|小黑屋|ELEOK |網站地圖

GMT+8, 2026-5-26 05:11

Powered by Discuz! X5.0

© 2001-2026 Discuz! Team.

快速回復 返回頂部 返回列表