标题: 单片机演奏音乐(F调3个8度7音阶)程序+Proteus仿真 [打印本页]
作者: 帅哥辉    时间: 2019-3-1 21:46
标题: 单片机演奏音乐(F调3个8度7音阶)程序+Proteus仿真
单片机演奏音乐仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. /********本程序中，FOSC=11.0592M*********/
  2. #include<reg51.h>

  4. #include<intrins.h>

  6. #define uchar unsigned char
  7. #define uint  unsigned int

  9. struct music_type{
  10.         uchar tone;
  11.         uchar delay;
  12. };



  16. /**********F调3个8度7音阶的音高参数**********/
  17. uint code tonetab[]={  
  18.     64216,64360,64489,64603,64654,64752,64837, //低音1~7
  19.     64876,64948,65012,65042,65095,65144,65186, //中音1~7
  20.     65206,65242,65274,65289,65315,65340,65361  //高音1~7
  21. };
  22. //曲谱，每个音符含两项数据，第1项为音高，第2项为节拍（以1/4拍为单位）
  23. /**************康定情歌乐谱***************/
  24. struct music_type code  songtab[]={  
  25.         3+7,0x02,5+7,0x02,6+7,0x02,6+7,0x01,5+7,0x01,6+7,0x03,3+7,0x01,2+7,0x04,
  26.         3+7,0x02,5+7,0x02,6+7,0x02,6+7,0x01,5+7,0x01,6+7,0x03,3+7,0x06,
  27.         3+7,0x02,5+7,0x02,6+7,0x02,6+7,0x01,5+7,0x01,6+7,0x03,3+7,0x01,2+7,0x04,
  28.         5+7,0x02,3+7,0x02,2+7,0x01,3+7,0x01,2+7,0x01,1+7,0x01,2+7,0x02,6+0,0x06,
  29.         6+0,0x02,2+7,0x06,5+7,0x02,3+7,0x06,2+7,0x01,1+7,0x01,6+0,0x06,
  30.         5+7,0x02,3+7,0x02,2+7,0x01,3+7,0x01,2+7,0x01,1+7,0x01,2+7,0x02,6+0,0x06,
  31.         //
  32.         3+7,0x01,2+7,0x01,3+7,0x01,5+7,0x01,6+7,0x01,5+7,0x01,1+14,0x01,6+7,0x01,
  33.         5+7,0x01,3+7,0x01,5+7,0x04,6+7,0x02,
  34.         1+14,0x02,2+14,0x01,3+14,0x01,2+14,0x01,1+14,0x01,6+7,0x01,1+14,0x01,
  35.         5+7,0x08,
  36.         5+7,0x01,3+7,0x01,5+7,0x04,6+7,0x02,
  37.         1+14,0x02,2+14,0x01,3+14,0x01,1+14,0x01,6+7,0x01,5+7,0x02,
  38.         5+7,0x02,2+7,0x02,3+7,0x01,5+7,0x01,3+7,0x01,2+7,0x01,
  39.         1+7,0x01,6,0x01,1+7,0x06,
  40.         3+7,0x01,2+7,0x01,1+7,0x02,2+7,0x03,3+7,0x01,
  41.         5+7,0x02,6+7,0x01,1+14,0x01,6+7,0x02,5+7,0x02,
  42.         5+7,0x01,3+7,0x01,2+7,0x02,3+7,0x01,5+7,0x01,3+7,0x01,2+7,0x01,
  43.         1+7,0x01,2+7,0x01,6,0x04,1+7,0x02,
  44.         2+7,0x03,3+7,0x01,1+7,0x01,2+7,0x01,1+7,0x02,6,0x01,
  45.         1+7,0x01,6,0x01,5,0x05,
  46.         //
  47.         3+7,0x01,2+7,0x01,3+7,0x01,5+7,0x01,6+7,0x01,5+7,0x01,1+14,0x01,6+7,0x01,
  48.         5+7,0x01,3+7,0x01,5+7,0x04,6+7,0x02,
  49.         1+14,0x02,2+14,0x01,3+14,0x01,2+14,0x01,1+14,0x01,6+7,0x01,1+14,0x01,
  50.         5+7,0x08,
  51.         5+7,0x01,3+7,0x01,5+7,0x04,6+7,0x02,
  52.         1+14,0x02,2+14,0x01,3+14,0x01,1+14,0x01,6+7,0x01,5+7,0x02,
  53.         5+7,0x02,2+7,0x02,3+7,0x01,5+7,0x01,3+7,0x01,2+7,0x01,
  54.         1+7,0x01,6,0x01,1+7,0x06,
  55.         3+7,0x01,2+7,0x01,1+7,0x02,2+7,0x03,3+7,0x01,
  56.         5+7,0x02,6+7,0x01,1+14,0x01,6+7,0x02,5+7,0x02,
  57.         5+7,0x01,3+7,0x01,2+7,0x02,3+7,0x01,5+7,0x01,3+7,0x01,2+7,0x01,
  58.         1+7,0x01,2+7,0x01,6,0x04,1+7,0x02,
  59.         2+7,0x03,3+7,0x01,1+7,0x01,2+7,0x01,1+7,0x02,6,0x01,
  60.         1+7,0x01,6,0x01,5,0x05,

  62.         0,0x00
  63. };
  64. /*********端口及变量定义**********/
  65. sbit SPEAKER = P3^7;

  67. uchar tlow1,thig1;

  69. /*******软件延时,约n*10us******/
  70. void delay10us(unsigned char n){
  71.         do{
  72.         _nop_();
  73.         _nop_();
  74.         _nop_();
  75.         _nop_();
  76.         _nop_();
  77.         }while(--n);
  78. }
  79. /*******软件延时,约n ms******/
  80. void delayms(unsigned int n){
  81.         do {
  82.                 delay10us(131);
  83.         }while(--n);
  84. }


  87. main () {
  88.         uchar i,j;
  89.         EA=1;ET0=1;
  90.         TMOD=0X01;
  91.         while(1){
  92.                 i=0;
  93.                 while(songtab[i].delay!=0){
  94.                         if(songtab[i].tone==0)TR0=0;  //音高数据为0
  95.                         else{     //音高数据不为0
  96.                                 //用定时器参数控制T1的振荡频率，即音高
  97.                                 thig1=TH0=tonetab[songtab[i].tone-1]/256;
  98.                                 tlow1=TL0=tonetab[songtab[i].tone-1]%256;
  99.                                 TR0=1;
  100.                         }
  101.                         //控制音符的持续时间，即节拍
  102.                         for(j=0;j<songtab[i].delay;j++){

  104.                                 delayms(200);
  105.                         }
  106.                         i++; //下一个音符
  107.                 }
  108.                 TR0=0;  //停止演奏
  109.                 delayms(1000);  //一遍完成后等待
  110.         }
  111. }

  113. /*******定时器1中断，控制蜂鸣器发声频率*******/
  114. void  t0 () interrupt 1{
  115.         TH0=thig1;TL0=tlow1;
  116.         SPEAKER = !SPEAKER;  //蜂鸣器发声
  117. }
复制代码

所有资料51hei提供下载:
单片机演奏音乐.rar (54.52 KB, 下载次数: 43)






欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1