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

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 19869|回復: 8
收起左側

一個小巧的單片機音樂程序 內附幾首歌代碼

  [復制鏈接]
ID:396772 發表于 2018-9-13 17:01 | 顯示全部樓層 |閱讀模式
學校要求做的課程設計 也查了很多資料 有需要的可以了解一下

單片機源程序如下:
  1.                                                                                                                                  //51單片機播放音樂庫文件
  2. ///51單片機播放音樂庫文件
  3. /**************************************************************************
  4.    
  5.                                              SOUND PLAY FOR 51MCU
  6.   
  7.                                COPYRIGHT (c)   2005 BY JJJ.
  8.                                        --  ALL RIGHTS RESERVED  --
  9.   
  10.    File Name:       SoundPlay.h
  11.    Author:          Jiang Jian Jun
  12.    Created:         2005/5/16
  13.    Modified:                NO
  14.    Revision:                 1.0
  15.   
  16. *******************************************************************************/

  18. /*說明**************************************************************************
  19. 曲譜存貯格式 unsigned char code MusicName{音高，音長，音高，音長...., 0,0};        末尾:0,0 表示結束(Important)

  21. 音高由三位數字組成：
  22.                 個位是表示 1~7 這七個音符
  23.                 十位是表示音符所在的音區:1-低音，2-中音，3-高音;
  24.                 百位表示這個音符是否要升半音: 0-不升，1-升半音。

  26. 音長最多由三位數字組成：
  27.                 個位表示音符的時值，其對應關系是：
  28.                         |數值(n):  |0 |1 |2 |3 | 4 | 5 | 6
  29.                         |幾分音符: |1 |2 |4 |8 |16 |32 |64                 音符=2^n
  30.                 十位表示音符的演奏效果(0-2):  0-普通，1-連音，2-頓音
  31.                 百位是符點位: 0-無符點，1-有符點

  33. 調用演奏子程序的格式
  34.                 Play(樂曲名,調號,升降八度,演奏速度);
  35.         |樂曲名           : 要播放的樂曲指針,結尾以(0,0)結束;
  36.         |調號(0-11)       :        是指樂曲升多少個半音演奏;
  37.         |升降八度(1-3)          : 1:降八度, 2:不升不降, 3:升八度;
  38.         |演奏速度(1-12000):        值越大速度越快;

  40. ***************************************************************************/
  41. #ifndef __SOUNDPLAY_H_REVISION_FIRST__
  42. #define __SOUNDPLAY_H_REVISION_FIRST__

  44. #include <REGX51.H>

  46. //**************************************************************************

  48. #define SYSTEM_OSC                 11059200//12000000        //定義晶振頻率12000000HZ
  49. #define SOUND_SPACE         4/5                 //定義普通音符演奏的長度分率,//每4分音符間隔
  50. sbit    BeepIO    =           P1^0;                //定義輸出管腳

  52. unsigned int  code FreTab[12]  = { 212, 222, 232, 242, 252,
  53.                                   262, 272, 312, 322, 332,
  54.                                   342, 352 }; //原始頻率表
  55. unsigned char code SignTab[7]  = { 0,2,4,5,7,9,11 };                                                                   //1~7在頻率表中的位置
  56. unsigned char code LengthTab[7]= { 1,2,4,8,16,32,64 };                                               
  57. unsigned char Sound_Temp_TH0,Sound_Temp_TL0;        //音符定時器初值暫存
  58. unsigned char Sound_Temp_TH1,Sound_Temp_TL1;        //音長定時器初值暫存
  59. //**************************************************************************
  60. void InitialSound(void)
  61. {
  62.         BeepIO = 1;
  63.         Sound_Temp_TH1 = (65535-(1/1200)*SYSTEM_OSC)/256;        // 計算TL1應裝入的初值         (10ms的初裝值)
  64.         Sound_Temp_TL1 = (65535-(1/1200)*SYSTEM_OSC)%256;        // 計算TH1應裝入的初值
  65.         TH1 = Sound_Temp_TH1;
  66.         TL1 = Sound_Temp_TL1;
  67.         TMOD  |= 0x11;
  68.         ET0    = 1;
  69.         ET1           = 0;
  70.         TR0           = 0;
  71.         TR1    = 0;
  72.         EA     = 1;
  73. }

  75. void BeepTimer0(void) interrupt 1        //音符發生中斷
  76. {
  77.         BeepIO = !BeepIO;
  78.         TH0    = Sound_Temp_TH0;
  79.         TL0    = Sound_Temp_TL0;
  80. }
  81. //**************************************************************************
  82. void Play(unsigned char *Sound,unsigned char Signature,unsigned Octachord,unsigned int Speed)
  83. {
  84.         unsigned int NewFreTab[12];                //新的頻率表
  85.         unsigned char i,j;
  86.         unsigned int Point,LDiv,LDiv0,LDiv1,LDiv2,LDiv4,CurrentFre,Temp_T,SoundLength;
  87.         unsigned char Tone,Length,SL,SH,SM,SLen,XG,FD;
  88.         for(i=0;i<12;i++)                                 // 根據調號及升降八度來生成新的頻率表
  89.         {
  90.                 j = i + Signature;
  91.                 if(j > 11)
  92.                 {
  93.                         j = j-12;
  94.                         NewFreTab[i] = FreTab[j]*2;
  95.                 }
  96.                 else
  97.                         NewFreTab[i] = FreTab[j];

  99.                 if(Octachord == 1)
  100.                         NewFreTab[i]>>=2;
  101.                 else if(Octachord == 3)
  102.                         NewFreTab[i]<<=2;
  103.         }                                                                       
  104.        
  105.         SoundLength = 0;
  106.         while(Sound[SoundLength] != 0x00)        //計算歌曲長度
  107.         {
  108.                 SoundLength+=2;
  109.         }

  111.         Point = 0;
  112.         Tone   = Sound[Point];       
  113.         Length = Sound[Point+1];                         // 讀出第一個音符和它時時值
  114.        
  115.         LDiv0 = 12000/Speed;                                // 算出1分音符的長度(幾個10ms)        
  116.         LDiv4 = LDiv0/4;                                         // 算出4分音符的長度
  117.         LDiv4 = LDiv4-LDiv4*SOUND_SPACE;         // 普通音最長間隔標準
  118.         TR0          = 0;
  119.         TR1   = 1;
  120.         while(Point < SoundLength)
  121.         {
  122.                 SL=Tone%10;                                                                 //計算出音符
  123.                 SM=Tone/10%10;                                                                 //計算出高低音
  124.                 SH=Tone/100;                                                                 //計算出是否升半
  125.                 CurrentFre = NewFreTab[SignTab[SL-1]+SH];         //查出對應音符的頻率        
  126.                 if(SL!=0)
  127.                 {
  128.                         if (SM==1) CurrentFre >>= 2;                 //低音
  129.                         if (SM==3) CurrentFre <<= 2;                 //高音
  130.                         Temp_T = 65536-(50000/CurrentFre)*10/(12000000/SYSTEM_OSC);//計算計數器初值
  131.                         Sound_Temp_TH0 = Temp_T/256;
  132.                         Sound_Temp_TL0 = Temp_T%256;
  133.                         TH0 = Sound_Temp_TH0;  
  134.                         TL0 = Sound_Temp_TL0 + 12; //加12是對中斷延時的補償
  135.                 }
  136.                 SLen=LengthTab[Length%10];         //算出是幾分音符
  137.                 XG=Length/10%10;                         //算出音符類型(0普通1連音2頓音)
  138.                 FD=Length/100;
  139.                 LDiv=LDiv0/SLen;                         //算出連音音符演奏的長度(多少個10ms)
  140.                 if (FD==1)
  141.                         LDiv=LDiv+LDiv/2;
  142.                 if(XG!=1)       
  143.                         if(XG==0)                                 //算出普通音符的演奏長度
  144.                                 if (SLen<=4)       
  145.                                         LDiv1=LDiv-LDiv4;
  146.                                 else
  147.                                         LDiv1=LDiv*SOUND_SPACE;
  148.                         else
  149.                                 LDiv1=LDiv/2;                 //算出頓音的演奏長度
  150.                 else
  151.                         LDiv1=LDiv;
  152.                 if(SL==0) LDiv1=0;
  153.                         LDiv2=LDiv-LDiv1;                 //算出不發音的長度
  154.                   if (SL!=0)
  155.                 {
  156.                         TR0=1;
  157.                         for(i=LDiv1;i>0;i--)         //發規定長度的音
  158.                         {
  159.                                 while(TF1==0);
  160.                                 TH1 = Sound_Temp_TH1;
  161.                                 TL1 = Sound_Temp_TL1;
  162.                                 TF1=0;
  163.                         }
  164.                 }
  165.                 if(LDiv2!=0)
  166.                 {
  167.                         TR0=0; BeepIO=1;
  168.                         for(i=LDiv2;i>0;i--)         //音符間的間隔
  169.                         {
  170.                                 while(TF1==0);
  171.                                 TH1 = Sound_Temp_TH1;
  172.                                 TL1 = Sound_Temp_TL1;
  173.                                 TF1=0;
  174.                         }
  175.                 }
  176.                 Point+=2;
  177.                 Tone=Sound[Point];
  178.                 Length=Sound[Point+1];
  179.         }
  180.         BeepIO = 1;
  181. }
  182. //**************************************************************************
  183. //#endif

  185. /***************************************************************************
  186. 附:3首曲譜編碼表

  188. //揮著翅膀的女孩
  189. unsigned char code Music_Girl[]={ 0x17,0x02, 0x17,0x03, 0x18,0x03, 0x19,0x02, 0x15,0x03,
  190.                                   0x16,0x03, 0x17,0x03, 0x17,0x03, 0x17,0x03, 0x18,0x03,
  191.                                   0x19,0x02, 0x16,0x03, 0x17,0x03, 0x18,0x02, 0x18,0x03,
  192.                                   0x17,0x03, 0x15,0x02, 0x18,0x03, 0x17,0x03, 0x18,0x02,
  193.                                   0x10,0x03, 0x15,0x03, 0x16,0x02, 0x15,0x03, 0x16,0x03,
  194.                                   0x17,0x02, 0x17,0x03, 0x18,0x03, 0x19,0x02, 0x1A,0x03,
  195.                                   0x1B,0x03, 0x1F,0x03, 0x1F,0x03, 0x17,0x03, 0x18,0x03,
  196.                                   0x19,0x02, 0x16,0x03, 0x17,0x03, 0x18,0x03, 0x17,0x03,
  197.                                   0x18,0x03, 0x1F,0x03, 0x1F,0x02, 0x16,0x03, 0x17,0x03,
  198.                                   0x18,0x03, 0x17,0x03, 0x18,0x03, 0x20,0x03, 0x20,0x02,
  199.                                   0x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x20,0x03, 0x21,0x03,
  200.                                   0x20,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x1F,0x03,
  201.                                   0x1B,0x03, 0x19,0x03, 0x19,0x03, 0x15,0x03, 0x1A,0x66,
  202.                                   0x1A,0x03, 0x19,0x03, 0x15,0x03, 0x15,0x03, 0x17,0x03,
  203.                                   0x16,0x66, 0x17,0x04, 0x18,0x04, 0x18,0x03, 0x19,0x03,
  204.                                   0x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x20,0x03, 0x21,0x03,
  205.                                   0x20,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x1F,0x03,
  206.                                   0x1B,0x03, 0x19,0x03, 0x19,0x03, 0x15,0x03, 0x1A,0x66,
  207.                                   0x1A,0x03, 0x19,0x03, 0x19,0x03, 0x1F,0x03, 0x1B,0x03,
  208.                                   0x1F,0x00, 0x1A,0x03, 0x1A,0x03, 0x1A,0x03, 0x1B,0x03,
  209.                                   0x1B,0x03, 0x1A,0x03, 0x19,0x03, 0x19,0x02, 0x17,0x03,
  210.                                   0x15,0x17, 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x18,0x03,
  211.                                   0x17,0x04, 0x18,0x0E, 0x18,0x03, 0x17,0x04, 0x18,0x0E,
  212.                                   0x18,0x66, 0x17,0x03, 0x18,0x03, 0x17,0x03, 0x18,0x03,
  213.                                   0x20,0x03, 0x20,0x02, 0x1F,0x03, 0x1B,0x03, 0x1F,0x66,
  214.                                   0x20,0x03, 0x21,0x03, 0x20,0x03, 0x1F,0x03, 0x1B,0x03,
  215.                                   0x1F,0x66, 0x1F,0x04, 0x1B,0x0E, 0x1B,0x03, 0x19,0x03,
  216.                                   0x19,0x03, 0x15,0x03, 0x1A,0x66, 0x1A,0x03, 0x19,0x03,
  217.                                   0x15,0x03, 0x15,0x03, 0x17,0x03, 0x16,0x66, 0x17,0x04,
  218.                                   0x18,0x04, 0x18,0x03, 0x19,0x03, 0x1F,0x03, 0x1B,0x03,
  219.                                   0x1F,0x66, 0x20,0x03, 0x21,0x03, 0x20,0x03, 0x1F,0x03,
  220.                                   0x1B,0x03, 0x1F,0x66, 0x1F,0x03, 0x1B,0x03, 0x19,0x03,
  221.                                   0x19,0x03, 0x15,0x03, 0x1A,0x66, 0x1A,0x03, 0x19,0x03,
  222.                                   0x19,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x00, 0x18,0x02,
  223.                                   0x18,0x03, 0x1A,0x03, 0x19,0x0D, 0x15,0x03, 0x15,0x02,
  224.                                   0x18,0x66, 0x16,0x02, 0x17,0x02, 0x15,0x00, 0x00,0x00};
  225. //同一首歌
  226. unsigned char code Music_Same[]={ 0x0F,0x01, 0x15,0x02, 0x16,0x02, 0x17,0x66, 0x18,0x03,
  227.                                   0x17,0x02, 0x15,0x02, 0x16,0x01, 0x15,0x02, 0x10,0x02,
  228.                                   0x15,0x00, 0x0F,0x01, 0x15,0x02, 0x16,0x02, 0x17,0x02,
  229.                                   0x17,0x03, 0x18,0x03, 0x19,0x02, 0x15,0x02, 0x18,0x66,
  230.                                   0x17,0x03, 0x19,0x02, 0x16,0x03, 0x17,0x03, 0x16,0x00,
  231.                                   0x17,0x01, 0x19,0x02, 0x1B,0x02, 0x1B,0x70, 0x1A,0x03,
  232.                                   0x1A,0x01, 0x19,0x02, 0x19,0x03, 0x1A,0x03, 0x1B,0x02,
  233.                                   0x1A,0x0D, 0x19,0x03, 0x17,0x00, 0x18,0x66, 0x18,0x03,
  234.                                   0x19,0x02, 0x1A,0x02, 0x19,0x0C, 0x18,0x0D, 0x17,0x03,
  235.                                   0x16,0x01, 0x11,0x02, 0x11,0x03, 0x10,0x03, 0x0F,0x0C,
  236.                                   0x10,0x02, 0x15,0x00, 0x1F,0x01, 0x1A,0x01, 0x18,0x66,
  237.                                   0x19,0x03, 0x1A,0x01, 0x1B,0x02, 0x1B,0x03, 0x1B,0x03,
  238.                                   0x1B,0x0C, 0x1A,0x0D, 0x19,0x03, 0x17,0x00, 0x1F,0x01,
  239.                                   0x1A,0x01, 0x18,0x66, 0x19,0x03, 0x1A,0x01, 0x10,0x02,
  240.                                   0x10,0x03, 0x10,0x03, 0x1A,0x0C, 0x18,0x0D, 0x17,0x03,
  241.                                   0x16,0x00, 0x0F,0x01, 0x15,0x02, 0x16,0x02, 0x17,0x70,
  242.                                   0x18,0x03, 0x17,0x02, 0x15,0x03, 0x15,0x03, 0x16,0x66,
  243.                                   0x16,0x03, 0x16,0x02, 0x16,0x03, 0x15,0x03, 0x10,0x02,
  244.                                   0x10,0x01, 0x11,0x01, 0x11,0x66, 0x10,0x03, 0x0F,0x0C,
  245.                                   0x1A,0x02, 0x19,0x02, 0x16,0x03, 0x16,0x03, 0x18,0x66,
  246.                                   0x18,0x03, 0x18,0x02, 0x17,0x03, 0x16,0x03, 0x19,0x00,
  247.                                   0x00,0x00 };
  248. //兩只蝴蝶                                 
  249. unsigned char code Music_Two[] ={ 0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03,
  250.                                   0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02,
  251.                                   0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03,
  252.                                   0x10,0x0E, 0x15,0x04, 0x0F,0x01, 0x17,0x03, 0x16,0x03,
  253. ……………………

  255. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

所有資料51hei提供下載:
音樂程序.rar (641.6 KB, 下載次數: 157)


回復

使用道具 舉報

ID:429208 發表于 2019-2-3 14:08 | 顯示全部樓層
信息分享
回復

使用道具 舉報

ID:497951 發表于 2019-4-17 19:05 來自觸屏版 | 顯示全部樓層
感謝分享，學習了？
回復

使用道具 舉報

ID:536351 發表于 2019-5-12 18:56 | 顯示全部樓層
感謝分享 學到了
回復

使用道具 舉報

ID:71883 發表于 2019-6-29 13:46 | 顯示全部樓層
編譯不通過
回復

使用道具 舉報

ID:613854 發表于 2019-12-17 15:33 | 顯示全部樓層
感恩                  
回復

使用道具 舉報

ID:689551 發表于 2020-2-2 20:55 | 顯示全部樓層
怎么我的編譯不通過？?
回復

使用道具 舉報

ID:701390 發表于 2020-3-2 20:49 | 顯示全部樓層
不會調用
回復

使用道具 舉報

ID:90566 發表于 2020-5-15 10:34 | 顯示全部樓層
這個得調用兩個定時器呀
回復

使用道具 舉報

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

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 欧美a级网站 | 伊人久久麻豆 | 免费的av网站 | 日韩视频 中文字幕 | www.三级| 999热视频| 亚洲欧洲中文日韩 | 久久av.com | 刘亦菲国产毛片bd | 麻豆亚洲| 国产1区| 国产91久久久久蜜臀青青天草二 | 国产精品乱码一区二区三区 | 国产亚洲欧美另类一区二区三区 | 国产精品久久久久久久久久久久久 | 久久网一区二区三区 | 综合另类 | 精品国产一区二区三区日日嗨 | 蜜桃视频在线观看免费视频网站www | 啪啪免费网 | 国产精品一二三区 | 一区二区免费视频 | 久久久999国产精品 中文字幕在线精品 | 日韩福利在线观看 | 久久精品亚洲一区二区三区浴池 | 中文字幕日韩欧美一区二区三区 | 日本又色又爽又黄的大片 | 久久精品日产第一区二区三区 | 国产精品久久久久久久久图文区 | 日本手机看片 | 国产欧美一区二区精品久导航 | 色综网| 粉嫩一区二区三区四区公司1 | 国产成人精品综合 | 久久久综合久久 | 日日av| 精品乱码一区二区 | 尤物视频在线免费观看 | 黄在线免费观看 | 天天干天天干 | 亚洲欧美日本国产 |