⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 xianjian.lst

📁 用51单片机设计的歌曲播放
💻 LST
字号:
C51 COMPILER V7.06   XIANJIAN                                                              10/27/2007 17:02:02 PAGE 1   


C51 COMPILER V7.06, COMPILATION OF MODULE XIANJIAN
OBJECT MODULE PLACED IN xianjian.OBJ
COMPILER INVOKED BY: C:\Keil\C51\BIN\C51.EXE xianjian.c BROWSE DEBUG OBJECTEXTEND

stmt level    source

   1          #define uchar unsigned char //定义一下方便使用
   2          #define uint  unsigned int
   3          #define ulong unsigned long
   4          #include <reg52.h>     //包括一个 52 标准内核的头文件
   5          
   6          char code dx516[3] _at_ 0x003b;//这是为了仿真设置的
   7          
   8          sbit   BEEP=P3^0; //喇叭输出脚
   9          //sbit K1= P3^0;
  10          //sbit K2= P3^1;
  11          //sbit K3= P3^2;
  12          //sbit K4= P3^3;    
  13          
  14          uchar th0_f; //在中断中装载的 T0 的值高 8 位
  15          uchar tl0_f; //在中断中装载的 T0 的值低 8 位 
  16          //T0 的值,及输出频率对照表
  17          uchar code freq[36*2]={
  18          0xA9,0xEF,//00220HZ ,1
  19          0x93,0xF0,//00233HZ ,1#
  20          0x73,0xF1,//00247HZ ,2
  21          0x49,0xF2,//00262HZ ,2#
  22          0x07,0xF3,//00277HZ ,3
  23          0xC8,0xF3,//00294HZ ,4
  24          0x73,0xF4,//00311HZ ,4#
  25           
  26          0x1E,0xF5,//00330HZ ,5
  27          0xB6,0xF5,//00349HZ ,5#
  28          0x4C,0xF6,//00370HZ ,6
  29          0xD7,0xF6,//00392HZ ,6#
  30          0x5A,0xF7,//00415HZ ,7    
  31          0xD8,0xF7,//00440HZ 1     //12
  32          0x4D,0xF8,//00466HZ 1#    //13
  33          0xBD,0xF8,//00494HZ 2     //14
  34          0x24,0xF9,//00523HZ 2#    //15
  35          0x87,0xF9,//00554HZ 3     //16
  36          0xE4,0xF9,//00587HZ 4     //17
  37          0x3D,0xFA,//00622HZ 4#    //18
  38          0x90,0xFA,//00659HZ 5     //19
  39          0xDE,0xFA,//00698HZ 5#    //20
  40          0x29,0xFB,//00740HZ 6     //21
  41          0x6F,0xFB,//00784HZ 6#    //22
  42          0xB1,0xFB,//00831HZ 7     //23
  43          0xEF,0xFB,//00880HZ `1
  44          0x2A,0xFC,//00932HZ `1#
  45          0x62,0xFC,//00988HZ `2
  46          0x95,0xFC,//01046HZ `2#
  47          0xC7,0xFC,//01109HZ `3
  48          0xF6,0xFC,//01175HZ `4
  49          0x22,0xFD,//01244HZ  `4#
  50          0x4B,0xFD,//01318HZ `5
  51          0x73,0xFD,//01397HZ `5#
  52          0x98,0xFD,//01480HZ `6
  53          0xBB,0xFD,//01568HZ `6#
  54          0xDC,0xFD,//01661HZ `7     //35
  55           
C51 COMPILER V7.06   XIANJIAN                                                              10/27/2007 17:02:02 PAGE 2   

  56          };
  57          
  58          //定时中断 0,用于产生唱歌频率
  59          timer0() interrupt 1  
  60          {
  61   1          TL0=tl0_f;TH0=th0_f;  //调入预定时值
  62   1       
  63   1       
  64   1              BEEP=~BEEP;                      //取反音乐输出 IO
  65   1      }
  66          
  67          //******************************
  68          //音乐符号串解释函数
  69          //入口:要解释的音乐符号串,输出的音调串,输出的时长串
  70          changedata(uchar *song,uchar *diao,uchar *jie)
  71          {
  72   1          uchar i,i1,j;
  73   1          char gaodi; //高低+/-12 音阶
  74   1          uchar banyin;//有没有半个升音阶
  75   1          uchar yinchang;//音长
  76   1          uchar code jie7[8]={0,12,14,16,17,19,21,23}; //C 调的 7 个值
  77   1      
  78   1          *diao=*song;
  79   1          for(i=0,i1=0;;)
  80   1              { 
  81   2                      gaodi=0; //高低=0
  82   2                      banyin=0;//半音=0
  83   2                      yinchang=4;//音长 1 拍
  84   2              if((*(song+i)=='|') || (*(song+i)==' ')) i++;  
  85   2      //拍子间隔和一个空格过滤
  86   2      
  87   2              switch(*(song+i))  
  88   2                      {         
  89   3                              case ',': gaodi=-12;i++;//低音
  90   3                              break; 
  91   3      
  92   3                              case '`': gaodi=12;i++; //高音
  93   3                              break; 
  94   3                      } 
  95   2      
  96   2              if(*(song+i)==0)  //遇到 0 结束
  97   2                      { 
  98   3                              *(diao+i1)=0; //加入结束标志 0
  99   3                              *(jie+i1)=0; 
 100   3                              return; 
 101   3                      } 
 102   2      
 103   2              j=*(song+i)-0x30; i++; //取出基准音
 104   2              j=jie7[j]+gaodi; //加上高低音
 105   2      yinc:   switch(*(song+i))  
 106   2       
 107   2                      {         
 108   3                              case '#': //有半音 j 加一个音阶
 109   3                                      i++;j++; 
 110   3                                                                      goto yinc;
 111   3                              case '-': //有一个音节加长
 112   3                                      yinchang+=4; 
 113   3                                      i++;   
 114   3                                      goto yinc; 
 115   3      
 116   3                              case '_': //有一个音节缩短
 117   3                                      yinchang/=2; 
C51 COMPILER V7.06   XIANJIAN                                                              10/27/2007 17:02:02 PAGE 3   

 118   3                                      i++;   
 119   3                                                                      goto yinc;
 120   3      
 121   3      
 122   3      
 123   3                              case '.': //有一个加半拍
 124   3                                                       yinchang=yinchang+yinchang/2;
 125   3                                                                              i++; 
 126   3                                                                              goto yinc;
 127   3      
 128   3                      } 
 129   2      
 130   2                      *(diao+i1)=j; //记录音符
 131   2                      *(jie+i1)=yinchang; //记录音长
 132   2                      i1++;         
 133   2              } 
 134   1      }
 135          //******************************************
 136          //奏乐函数
 137          //入口:要演奏的音乐符号串
 138          void play(uchar *songdata)
 139          {
 140   1          uchar i,c,j=0;
 141   1              uint    n; 
 142   1          uchar xdata diaodata[112]; //音调缓冲
 143   1          uchar xdata jiedata[112];  //音长缓冲
 144   1      
 145   1          changedata(songdata,diaodata,jiedata); //解释音乐符号串
 146   1              TR0=1; 
 147   1          for(i=0;diaodata[i]!=0;i++)  //逐个符号演奏
 148   1              { 
 149   2              tl0_f=freq[diaodata[i]*2]; //取出对应的定时值送给 T0
 150   2              th0_f=freq[diaodata[i]*2+1];
 151   2              for(c=0;c<jiedata[i];c++) //按照音长延时
 152   2                  for(n=0;n<32000;n++);
 153   2                      TR0=0; 
 154   2              for(n=0;n<500;n++);    //音符间延时
 155   2                      TR0=1; 
 156   2              } 
 157   1              TR0=0; 
 158   1      }
 159          
 160          //仙剑
 161          uchar code xianjian[]={
 162          "|3_3_3_2_3-|2_3_2_2_,6,6_,7_|12_1_,7,6_,5_|,6---|"
 163          "3_3_3_2_3.6_|5_6_5_5_22_3_|45_4_32_1_|3.--3_|" 
 164          "67_6_55_3_|5--3_5_|26_5_32_3_|3---|"
 165          "26_6_6-|16_6_66_7_|`17_6_76_7_|3.--3_|" 
 166          "67_6_55_3_|5--3_5_|67_6_76_7_|3---|"
 167          "26_6_6-|16_6_66_7_|`17_6_7.5_|6---|"
 168          };
 169          
 170          //乐谱方式输入的音乐播放,仙剑奇侠传
 171          void main(void) //      主程序
 172          {
 173   1      TMOD = 0x01;   //使用定时器 0 的 16 位工作模式
 174   1      TR0 = 0;
 175   1      ET0 = 1;
 176   1      EA = 1;
 177   1      
 178   1      while(1)
 179   1      {
C51 COMPILER V7.06   XIANJIAN                                                              10/27/2007 17:02:02 PAGE 4   

 180   2      play(xianjian);
 181   2      }
 182   1      }


MODULE INFORMATION:   STATIC OVERLAYABLE
   CODE SIZE        =    422    ----
   CONSTANT SIZE    =    318    ----
   XDATA SIZE       =   ----     224
   PDATA SIZE       =   ----    ----
   DATA SIZE        =      2      15
   IDATA SIZE       =   ----    ----
   BIT SIZE         =   ----    ----
END OF MODULE INFORMATION.


C51 COMPILATION COMPLETE.  0 WARNING(S),  0 ERROR(S)

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -