单片机论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 6|回复: 0
打印 上一主题 下一主题
收起左侧

单片机音乐播放系统的proteus仿真电路及C语言程序设计

[复制链接]
跳转到指定楼层
楼主
尘心的光 发表于 2019-11-8 14:21 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
(分享设计)音乐播放

单片机源程序如下:
  1. #define uchar unsigned char //定义一下方便使用
  2. #define uint  unsigned int
  3. #define ulong unsigned long
  4. #include <reg52.h>     //包括一个 52 标准内核的头文件



  5. sbit    BEEP=P1^7; //喇叭输出脚
  6. sbit  P10=P1^0;
  7. sbit K1= P3^2;      
  8. sbit K2= P3^5;  


  9. uchar th0_f; //在中断中装载的 T0 的值高 8 位
  10. uchar tl0_f; //在中断中装载的 T0 的值低 8 位

  11. //T0 的值,及输出频率对照表
  12. uchar code freq[36*2]={
  13. 0xA9,0xEF,//00220HZ ,1  //0
  14. 0x93,0xF0,//00233HZ ,1#
  15. 0x73,0xF1,//00247HZ ,2
  16. 0x49,0xF2,//00262HZ ,2#
  17. 0x07,0xF3,//00277HZ ,3
  18. 0xC8,0xF3,//00294HZ ,4
  19. 0x73,0xF4,//00311HZ ,4#
  20. 0x1E,0xF5,//00330HZ ,5  
  21. 0xB6,0xF5,//00349HZ ,5#
  22. 0x4C,0xF6,//00370HZ ,6
  23. 0xD7,0xF6,//00392HZ ,6#
  24.   0x5A,0xF7,//00415HZ ,7     
  25.   0xD8,0xF7,//00440HZ 1     //12
  26.   0x4D,0xF8,//00466HZ 1#    //13
  27.   0xBD,0xF8,//00494HZ 2     //14
  28.   0x24,0xF9,//00523HZ 2#    //15
  29.   0x87,0xF9,//00554HZ 3     //16
  30.   0xE4,0xF9,//00587HZ 4     //17
  31.   0x3D,0xFA,//00622HZ 4#    //18   0x90,0xFA,//00659HZ 5     //19
  32.   0xDE,0xFA,//00698HZ 5#    //20
  33.   0x29,0xFB,//00740HZ 6     //21
  34.   0x6F,0xFB,//00784HZ 6#    //22
  35.   0xB1,0xFB,//00831HZ 7     //23
  36. 0xEF,0xFB,//00880HZ `1
  37. 0x2A,0xFC,//00932HZ `1#
  38. 0x62,0xFC,//00988HZ `2
  39. 0x95,0xFC,//01046HZ `2#
  40. 0xC7,0xFC,//01109HZ `3
  41. 0xF6,0xFC,//01175HZ `4
  42.   0x22,0xFD,//01244HZ  `4#
  43. 0x4B,0xFD,//01318HZ `5
  44. 0x73,0xFD,//01397HZ `5#
  45. 0x98,0xFD,//01480HZ `6
  46. 0xBB,0xFD,//01568HZ `6#
  47.   0xDC,0xFD,//01661HZ `7     //35
  48. };

  49. //定时中断 0,用于产生唱歌频率
  50. timer0() interrupt 1   
  51. {
  52.     TL0=tl0_f;TH0=th0_f;  //调入预定时值
  53.     BEEP=~BEEP;           //取反音乐输出 IO
  54. }

  55. //******************************
  56. //音乐符号串解释函数
  57. //入口:要解释的音乐符号串,输出的音调串,输出的时长串
  58. changedata(uchar *song,uchar *diao,uchar *jie)
  59. {
  60.     uchar i,i1,j;
  61.     char gaodi; //高低+/-12 音阶
  62.     uchar banyin;//有没有半个升音阶
  63.     uchar yinchang;//音长
  64.     uchar code jie7[8]={0,12,14,16,17,19,21,23}; //C 调的 7 个值

  65.     *diao=*song;
  66.     for(i=0,i1=0;;)
  67.     {
  68.         gaodi=0; //高低=0
  69.         banyin=0;//半音=0
  70.         yinchang=4;//音长 1 拍
  71.         if((*(song+i)=='|') || (*(song+i)==' ')) i++;    //拍子间隔和一个空格过滤

  72.         switch(*(song+i))  
  73.         {     
  74.             case ',': gaodi=-12;i++;//低音
  75.             break;
  76.      
  77.             case '`': gaodi=12;i++; //高音
  78.             break;
  79.         }

  80.         if(*(song+i)==0)  //遇到 0 结束
  81.         {
  82.             *(diao+i1)=0; //加入结束标志 0
  83.             *(jie+i1)=0;
  84.             return;
  85.         }

  86.         j=*(song+i)-0x30; i++; //取出基准音
  87.         j=jie7[j]+gaodi; //加上高低音
  88.       

  89. yinc:   switch(*(song+i))  
  90.         {     
  91.             case '#': //有半音 j 加一个音阶  
  92.                 i++;j++;
  93.     goto yinc;  
  94.             

  95.             case '-': //有一个音节加长
  96.                 yinchang+=4;
  97.                 i++;  
  98.                 goto yinc;

  99.             case '_': //有一个音节缩短
  100.                 yinchang/=2;
  101.                 i++;  
  102.     goto yinc;
  103.             
  104.             
  105.             case '.': //有一个加半拍
  106.                 yinchang=yinchang+yinchang/2;
  107.     i++;
  108.     goto yinc;              
  109.         }

  110.         *(diao+i1)=j; //记录音符
  111.         *(jie+i1)=yinchang; //记录音长
  112.         i1++;     
  113.     }
  114. }
  115. //******************************************
  116. //奏乐函数
  117. //入口:要演奏的音乐符号串
  118. void play(uchar *songdata)
  119. {
  120.     uchar i,c,j=0;
  121.     uint  n;
  122.     uchar xdata diaodata[112]; //音调缓冲
  123.     uchar xdata jiedata[112];  //音长缓冲

  124.     changedata(songdata,diaodata,jiedata); //解释音乐符号串
  125.     TR0=1;
  126.     for(i=0;diaodata[i]!=0;i++)  //逐个符号演奏
  127.     {
  128.         tl0_f=freq[diaodata[i]*2]; //取出对应的定时值送给 T0
  129.         th0_f=freq[diaodata[i]*2+1];
  130.         for(c=0;c<jiedata[i];c++) //按照音长延时
  131.   {
  132.             for(n=0;n<32000;n++);
  133.    if((!K1)||(!K2))//发现按键,立即退出播放
  134.    {  
  135.     TR0=0;
  136.     return;  
  137.    }
  138.   }
  139.         TR0=0;
  140.         for(n=0;n<500;n++);    //音符间延时
  141.    
  142.         TR0=1;
  143.     }
  144.     TR0=0;
  145. }

  146. //仙剑
  147. uchar code xianjian[]={
  148. "|3_3_3_2_3-|2_3_2_2_,6,6_,7_|12_1_,7,6_,5_|,6---|" "3_3_3_2_3.6_|5_6_5_5_22_3_|45_4_32_1_|3.--3_|"
  149. "67_6_55_3_|5--3_5_|26_5_32_3_|3---|"
  150. "26_6_6-|16_6_66_7_|`17_6_76_7_|3.--3_|"
  151. "67_6_55_3_|5--3_5_|67_6_76_7_|3---|"
  152. "26_6_6-|16_6_66_7_|`17_6_7.5_|6---|"
  153. };
  154. uchar code song3[]={
  155. "5-5_3_2_1_|3---|6-6_4_2_1_"
  156. ",7--,5_|1.3_5.1_|,7.3_5 5_|"
  157. "6.7_`1.6_|6_5_5-3_2_|1.1_13_2_|"
  158. "1.1_12_3_|2.1_,62_3_|2-- ,5_|"
  159. "1.3_5.1_|,7.3_55_|6.7_`1.6_|"
  160. "6_5_5-3_2_|1.1_13_2_|1.1_12_3_"
  161. "2.,6_,71_2_|1--"
  162. };
  163. //世上只有妈妈好
  164. uchar code mamahao[]={
  165. "6.5_35|`16_5_6-|35_6_53_2_|1_,6_5_3_2-|"
  166. "2.3_55_6_|321-|5.3_2_1_,6_1_|,5--"
  167. };
  168. //我是一只菠萝
  169. uchar code boluo[]={
  170. "1-|2_4_3_2_55|5_6_3_4_22|2_4_3_2_1_`1_7_6_|5_4_2_3_11|"
  171. "2_4_3_2_55|5_6_3_4_22|2_4_3_2_1_5_2_3_|1---|"
  172. };
  173. //小星星
  174. uchar code xingxing[]={
  175. "1155|665-|4433|221-|"
  176. "5544|332-|5544|332-|"
  177. "1155|665-|4433|221-|"
  178. };

  179. //老鼠爱大米
  180. uchar code dami[]={
  181. "321-|3.2_1-|3231|3_6.5-|3_5_665|65-3_2_|122_3_2|12--|"
  182. };
  183. //一个按键选择播放六首音乐
  184. void main(void)  // 主程序
  185. {
  186. uchar i=2;

  187.   TMOD = 0x01;    //使用定时器 0 的 16 位工作模式
  188.   TR0 = 0;
  189.   ET0 = 1;      //定时器 0 中断  
  190.   EA = 1;      //打开总中断

  191. while(1)
  192. {
  193.   if(!K1)  
  194.   {
  195.    while(!K1);
  196.    
  197.    switch(i)
  198.    {
  199.     case 0:
  200.       play(xianjian);   //播放音乐
  201.     break;
  202.     case 1:
  203.       play(song3);   //播放音乐
  204.     break;
  205.     case 2:
  206.       play(mamahao);   //播放音乐
  207.     break;
  208.     case 3:
  209.       play(boluo);   //播放音乐
  210.     break;
  211.     case 4:
  212.       play(xingxing);   //播放音乐
  213.     break;
  214.     case 5:
  215.       play(dami);   //播放音乐
  216.     break;
  217.    }
  218.    i++;if(i==6)i=0;
  219.   }
  220. }
  221. }
复制代码

所有资料51hei提供下载:
音乐播放系统的proteus仿真电路及C语言程序设计.rar (67.78 KB, 下载次数: 1)


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 转播转播 分享分享 分享淘帖 顶 踩
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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