標(biāo)題: 單片機(jī)音樂(lè)播放器程序和原理圖 [打印本頁(yè)]
作者: 大帝七七    時(shí)間: 2019-3-18 10:13
標(biāo)題: 單片機(jī)音樂(lè)播放器程序和原理圖
程序：



musicPlayerMain.c

  1. /*************************************************
  2. *實(shí)例名稱：音樂(lè)播放器
  3. *實(shí)例功能：通過(guò)分解存儲(chǔ)音樂(lè)節(jié)拍數(shù)組中的信息,實(shí)現(xiàn)音
  4. 樂(lè)的方波
  5. *作者：yd
  6. *時(shí)間：09.06.20
  7. *************************************************/
  8. #include "music.h"
  9. #include "musicCode.h"
  10. void main()
  11. {
  12.   InitialPlayer();         //播放器初始化
  13.   sei();             //開(kāi)總中斷
  14.   while(1)
  15.   {
  16.         Play(Music_Girl,0,3,360);  //播放第一首歌
  17.         Delay1ms(500);
  18.         Play(Music_Same,0,3,360);  //播放第二首歌
  19.         Delay1ms(500);
  20.         Play(Music_Two,0,3,360);   //播放第二首歌
  21.         Delay1ms(500);
  22.   }
  23. }
復(fù)制代碼

music.c
  1. #define MUSIC_GLOBAL 1
  2. #include "music.h"
  3. /********************************************
  4. *函數(shù)名稱：InitialPlayer(void)
  5. *函數(shù)功能：初始化音樂(lè)播放器
  6. *函數(shù)入口：無(wú)
  7. *函數(shù)出口：無(wú)
  8. ********************************************/
  9. void InitialPlayer(void)
  10. {
  11.   PlayIO = 0;
  12.   Sound_Temp_TH1 = (65535-(1/1200)*SYSTEM_OSC)/256;        // 計(jì)算TL1應(yīng)裝入的初值         (10ms的初裝值)
  13.   Sound_Temp_TL1 = (65535-(1/1200)*SYSTEM_OSC)%256;        // 計(jì)算TH1應(yīng)裝入的初值
  14.   TH1 = Sound_Temp_TH1;
  15.   TL1 = Sound_Temp_TL1;
  16.   TMOD|= 0x11;             //定時(shí)器0和定時(shí)1工作在模式1
  17.   ET0=1;                   //定時(shí)器0溢出中斷使能
  18.   TR0= 0;                  //啟動(dòng)定時(shí)器0
  19.   TR1= 0;                  //啟動(dòng)定時(shí)器1
  20. }
  21. /************************************
  22. *函數(shù)名稱：Delay1ms(uint count)
  23. *函數(shù)功能：ms級(jí)延時(shí)
  24. *函數(shù)入口：延時(shí)計(jì)數(shù)count
  25. *函數(shù)出口：無(wú)
  26. ************************************/
  27. void Delay1ms(uint count)
  28. {
  29.         unsigned int i,j;
  30.         for(i=0;i<count;i++)
  31.         for(j=0;j<120;j++);
  32. }
  33. /**********************************************
  34. *函數(shù)名稱：MusicTimer0
  35. *函數(shù)功能：timer0溢出中斷入口，產(chǎn)生音符中斷        
  36. *函數(shù)入口：無(wú)
  37. *函數(shù)出口：無(wú)
  38. **********************************************/
  39. void MusicTimer0(void) interrupt 1
  40. {
  41.         PlayIO = !PlayIO;
  42.         TH0    = Sound_Temp_TH0;
  43.         TL0    = Sound_Temp_TL0;
  44. }
  45. /************************************************
  46. *函數(shù)名稱：Play(uchar *Sound,uchar Signature,
  47. uchar Octachord,uint Speed)
  48. *函數(shù)功能：播放音樂(lè)函數(shù)
  49. *函數(shù)入口：樂(lè)曲數(shù)組指針Sound;調(diào)號(hào)(0-11)Signature,
  50. *樂(lè)曲升多少個(gè)半音演奏;升降八度(1-3)Octachord,
  51. *1:降八度, 2:不升不降, 3:升八度;
  52. *演奏速度(1-12000)Speed,值越大速度越快
  53. *函數(shù)出口：無(wú)
  54. *************************************************/
  55. void Play(uchar *Sound,uchar Signature,uchar Octachord,uint Speed)
  56. {
  57.         uint NewFreTab[12];                //新的頻率表
  58.         uchar i,j;
  59.         uint Point,LDiv,LDiv0,LDiv1,LDiv2,LDiv4,CurrentFre,Temp_T,SoundLength;
  60.         uchar Tone,Length,SL,SH,SM,SLen,XG,FD;
  61.         for(i=0;i<12;i++)                                 // 根據(jù)調(diào)號(hào)及升降八度來(lái)生成新的頻率表
  62.         {
  63.                 j = i + Signature;
  64.                 if(j > 11)
  65.                 {
  66.                         j = j-12;
  67.                         NewFreTab[i] = FreTab[j]*2;
  68.                 }
  69.                 else
  70.                         NewFreTab[i] = FreTab[j];

  72.                 if(Octachord == 1)
  73.                         NewFreTab[i]>>=2;
  74.                 else if(Octachord == 3)
  75.                         NewFreTab[i]<<=2;
  76.         }                                                                        
  77.         
  78.         SoundLength = 0;
  79.         while(Sound[SoundLength] != 0x00)        //計(jì)算歌曲長(zhǎng)度
  80.         {
  81.                 SoundLength+=2;
  82.         }
  83.         Point = 0;
  84.         Tone   = Sound[Point];        
  85.         Length = Sound[Point+1];                         // 讀出第一個(gè)音符和它時(shí)時(shí)值
  86.         LDiv0 = 12000/Speed;                                // 算出1分音符的長(zhǎng)度(幾個(gè)10ms)         
  87.         LDiv4 = LDiv0/4;                                         // 算出4分音符的長(zhǎng)度
  88.         LDiv4 = LDiv4-LDiv4*SOUND_SPACE;         // 普通音最長(zhǎng)間隔標(biāo)準(zhǔn)
  89.         TR0          = 0;
  90.         TR1   = 1;
  91.         while(Point < SoundLength)
  92.         {
  93.                 SL=Tone%10;                                                                 //計(jì)算出音符
  94.                 SM=Tone/10%10;                                                                 //計(jì)算出高低音
  95.                 SH=Tone/100;                                                                 //計(jì)算出是否升半
  96.                 CurrentFre = NewFreTab[SignTab[SL-1]+SH];         //查出對(duì)應(yīng)音符的頻率         
  97.                 if(SL!=0)
  98.                 {
  99.                         if (SM==1) CurrentFre >>= 2;                 //低音
  100.                         if (SM==3) CurrentFre <<= 2;                 //高音
  101.                         Temp_T = 65536-(50000/CurrentFre)*10/(12000000/SYSTEM_OSC);//計(jì)算計(jì)數(shù)器初值
  102.                         Sound_Temp_TH0 = Temp_T/256;
  103.                         Sound_Temp_TL0 = Temp_T%256;
  104.                         TH0 = Sound_Temp_TH0;  
  105.                         TL0 = Sound_Temp_TL0 + 12; //加12是對(duì)中斷延時(shí)的補(bǔ)償
  106.                 }
  107.                 SLen=LengthTab[Length%10];           //算出是幾分音符
  108.                 XG=Length/10%10;                           //算出音符類型(0普通1連音2頓音)
  109.                 FD=Length/100;
  110.                 LDiv=LDiv0/SLen;                           //算出連音音符演奏的長(zhǎng)度(多少個(gè)10ms)
  111.                 if (FD==1)
  112.                         LDiv=LDiv+LDiv/2;
  113.                 if(XG!=1)        
  114.                         if(XG==0)                                 //算出普通音符的演奏長(zhǎng)度
  115.                                 if (SLen<=4)        
  116.                                         LDiv1=LDiv-LDiv4;
  117.                                 else
  118.                                         LDiv1=LDiv*SOUND_SPACE;
  119.                         else
  120.                                 LDiv1=LDiv/2;                 //算出頓音的演奏長(zhǎng)度
  121.                 else
  122.                         LDiv1=LDiv;
  123.                 if(SL==0) LDiv1=0;
  124.                         LDiv2=LDiv-LDiv1;                 //算出不發(fā)音的長(zhǎng)度
  125.                   if (SL!=0)
  126.                 {
  127.                         TR0=1;
  128.                         for(i=LDiv1;i>0;i--)         //發(fā)規(guī)定長(zhǎng)度的音
  129.                         {
  130.                                 while(TF1==0);
  131.                                 TH1 = Sound_Temp_TH1;
  132.                                 TL1 = Sound_Temp_TL1;
  133.                                 TF1=0;
  134.                         }
  135.                 }
  136.                 if(LDiv2!=0)
  137.                 {
  138.                         TR0=0;
  139.                         PlayIO=0;
  140.                         for(i=LDiv2;i>0;i--)         //音符間的間隔
  141.                         {
  142.                                 while(TF1==0);
  143.                                 TH1 = Sound_Temp_TH1;
  144.                                 TL1 = Sound_Temp_TL1;
  145.                                 TF1=0;
  146.                         }
  147.                 }
  148.                 Point+=2;
  149.                 Tone=Sound[Point];
  150.                 Length=Sound[Point+1];
  151.         }
  152.         PlayIO = 0;
  153. }
復(fù)制代碼

全部資料51hei下載地址：
音樂(lè)播放器.zip (10.76 KB, 下載次數(shù): 121)

作者: 布依族樂(lè)隊(duì)    時(shí)間: 2019-9-24 00:03
謝謝你了·這么多年的工程終于出來(lái)了
作者: 小少    時(shí)間: 2021-12-28 15:14
布依族樂(lè)隊(duì) 發(fā)表于 2019-9-24 00:03
謝謝你了·這么多年的工程終于出來(lái)了

代碼牛逼



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