设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 51单片机播放音乐SoundPlay.h头文件 程序Proteus仿真图
返回列表 发新帖
查看: 2079|回复: 2
收起左侧

51单片机播放音乐SoundPlay.h头文件 程序Proteus仿真图

[复制链接]
ID:1014599 发表于 2022-4-17 08:56 | 显示全部楼层 |阅读模式
仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）

仿真图

仿真图 51hei.png

部分单片机代码展示
SoundPlay.h头文件
  1. /*说明**************************************************************************
  2. 曲谱存贮格式 unsigned char code MusicName{音高，音长，音高，音长...., 0,0};        末尾:0,0 表示结束(Important)

  4. 音高由三位数字组成：
  5.                  个位是表示 1~7 这七个音符
  6.                  十位是表示音符所在的音区:1-低音，2-中音，3-高音;
  7.                  百位表示这个音符是否要升半音: 0-不升，1-升半音。

  9. 音长最多由三位数字组成：
  10.                  个位表示音符的时值，其对应关系是：
  11.                          |数值(n):  |0 |1 |2 |3 | 4 | 5 | 6
  12.                          |几分音符: |1 |2 |4 |8 |16 |32 |64                 音符=2^n
  13.                  十位表示音符的演奏效果(0-2):  0-普通，1-连音，2-顿音
  14.                  百位是符点位: 0-无符点，1-有符点

  16. 调用演奏子程序的格式
  17.                  Play(乐曲名,调号,升降八度,演奏速度);
  18.         |乐曲名           : 要播放的乐曲指针,结尾以(0,0)结束;
  19.         |调号(0-11)       :        是指乐曲升多少个半音演奏;
  20.         |升降八度(1-3)          : 1:降八度, 2:不升不降, 3:升八度;
  21.         |演奏速度(1-12000):        值越大速度越快;

  23. ***************************************************************************/
  24. #ifndef __SOUNDPLAY_H_REVISION_FIRST__
  25. #define __SOUNDPLAY_H_REVISION_FIRST__

  27. //**************************************************************************

  29. #define SYSTEM_OSC                 12000000        //定义晶振频率12000000HZ
  30. #define SOUND_SPACE         4/5                 //定义普通音符演奏的长度分率,//每4分音符间隔
  31. sbit    BeepIO    =           P3^7;                //定义输出管脚

  33. unsigned int  code FreTab[12]  = { 262,277,294,311,330,349,369,392,415,440,466,494 }; //原始频率表
  34. unsigned char code SignTab[7]  = { 0,2,4,5,7,9,11 };                                                                   //1~7在频率表中的位置
  35. unsigned char code LengthTab[7]= { 1,2,4,8,16,32,64 };                                                
  36. unsigned char Sound_Temp_TH0,Sound_Temp_TL0;        //音符定时器初值暂存
  37. unsigned char Sound_Temp_TH1,Sound_Temp_TL1;        //音长定时器初值暂存
  38. //**************************************************************************
  39. void InitialSound(void)
  40. {
  41.         BeepIO = 0;
  42.         Sound_Temp_TH1 = (65535-(1/1200)*SYSTEM_OSC)/256;        // 计算TL1应装入的初值         (10ms的初装值)
  43.         Sound_Temp_TL1 = (65535-(1/1200)*SYSTEM_OSC)%256;        // 计算TH1应装入的初值
  44.         TH1 = Sound_Temp_TH1;
  45.         TL1 = Sound_Temp_TL1;
  46.         TMOD  |= 0x11;
  47.         ET0    = 1;
  48.         ET1           = 0;
  49.         TR0           = 0;
  50.         TR1    = 0;
  51.         EA     = 1;
  52. }

  54. void BeepTimer0(void) interrupt 1        //音符发生中断
  55. {
  56.         BeepIO = !BeepIO;
  57.         TH0    = Sound_Temp_TH0;
  58.          TL0    = Sound_Temp_TL0;
  59. }
  60. //**************************************************************************
  61. void Play(unsigned char *Sound,unsigned char Signature,unsigned Octachord,unsigned int Speed)
  62. {
  63.         unsigned int NewFreTab[12];                //新的频率表
  64.         unsigned char i,j;
  65.         unsigned int Point,LDiv,LDiv0,LDiv1,LDiv2,LDiv4,CurrentFre,Temp_T,SoundLength;
  66.         unsigned char Tone,Length,SL,SH,SM,SLen,XG,FD;
  67.         for(i=0;i<12;i++)                                 // 根据调号及升降八度来生成新的频率表
  68.         {
  69.                 j = i + Signature;
  70.                 if(j > 11)
  71.                 {
  72.                         j = j-12;
  73.                         NewFreTab[i] = FreTab[j]*2;
  74.                 }
  75.                 else
  76.                         NewFreTab[i] = FreTab[j];

  78.                 if(Octachord == 1)
  79.                         NewFreTab[i]>>=2;
  80.                 else if(Octachord == 3)
  81.                         NewFreTab[i]<<=2;
  82.         }                                                                        
  83.         
  84.         SoundLength = 0;
  85.         while(Sound[SoundLength] != 0x00)        //计算歌曲长度
  86.         {
  87.                 SoundLength+=2;
  88.         }

  90.         Point = 0;
  91.         Tone   = Sound[Point];        
  92.         Length = Sound[Point+1];                         // 读出第一个音符和它时时值
  93.         
  94.         LDiv0 = 12000/Speed;                                // 算出1分音符的长度(几个10ms)         
  95.         LDiv4 = LDiv0/4;                                         // 算出4分音符的长度
  96.         LDiv4 = LDiv4-LDiv4*SOUND_SPACE;         // 普通音最长间隔标准
  97.         TR0          = 0;
  98.         TR1   = 1;
  99.         while(Point < SoundLength)
  100.         {
  101.                 SL=Tone%10;                                                                 //计算出音符
  102.                 SM=Tone/10%10;                                                                 //计算出高低音
  103.                 SH=Tone/100;                                                                 //计算出是否升半
  104.                 CurrentFre = NewFreTab[SignTab[SL-1]+SH];         //查出对应音符的频率         
  105.                 if(SL!=0)
  106.                 {
  107.                         if (SM==1) CurrentFre >>= 2;                 //低音
  108.                         if (SM==3) CurrentFre <<= 2;                 //高音
  109.                         Temp_T = 65536-(50000/CurrentFre)*10/(12000000/SYSTEM_OSC);//计算计数器初值
  110.                         Sound_Temp_TH0 = Temp_T/256;
  111.                         Sound_Temp_TL0 = Temp_T%256;
  112.                         TH0 = Sound_Temp_TH0;  
  113.                         TL0 = Sound_Temp_TL0 + 12; //加12是对中断延时的补偿
  114.                 }
  115.                 SLen=LengthTab[Length%10];         //算出是几分音符
  116.                 XG=Length/10%10;                         //算出音符类型(0普通1连音2顿音)
  117.                 FD=Length/100;
  118.                 LDiv=LDiv0/SLen;                         //算出连音音符演奏的长度(多少个10ms)
  119.                 if (FD==1)
  120.                         LDiv=LDiv+LDiv/2;
  121.                 if(XG!=1)        
  122.                         if(XG==0)                                 //算出普通音符的演奏长度
  123.                                 if (SLen<=4)        
  124.                                         LDiv1=LDiv-LDiv4;
  125.                                 else
  126.                                         LDiv1=LDiv*SOUND_SPACE;
  127.                         else
  128.                                 LDiv1=LDiv/2;                 //算出顿音的演奏长度
  129.                 else
  130.                         LDiv1=LDiv;
  131.                 if(SL==0) LDiv1=0;
  132.                         LDiv2=LDiv-LDiv1;                 //算出不发音的长度
  133.                   if (SL!=0)
  134.                 {
  135.                         TR0=1;
  136.                         for(i=LDiv1;i>0;i--)         //发规定长度的音
  137.                         {
  138.                                 while(TF1==0);
  139.                                 TH1 = Sound_Temp_TH1;
  140.                                 TL1 = Sound_Temp_TL1;
  141.                                 TF1=0;
  142. ……………………

  144. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

51hei.png

Keil代码与Proteus仿真下载: 程序和仿真图.7z (50.71 KB, 下载次数: 28)

评分

参与人数 1黑币 +40 收起 理由
admin + 40 共享资料的黑币奖励！

查看全部评分

回复

使用道具 举报

ID:262 发表于 2022-4-23 02:12 | 显示全部楼层
好资料，51黑有你更精彩!!!
回复

使用道具 举报

ID:1081963 发表于 2023-6-4 15:37 | 显示全部楼层
好资料，51黑有你更精彩!!!
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表