标题: 基于51单片机和Proteus仿真的简易电子琴程序 [打印本页]
作者: futao    时间: 2019-5-9 17:14
标题: 基于51单片机和Proteus仿真的简易电子琴程序

  1. #include<AT89X52.h>
  2. #define KeyPort P1
  3. unsigned char High,Low; //定时器预装值的高8位和低8位
  4. sbit SPK=P3^7;          //定义蜂鸣器接口
  5. sbit playSongKey=P0^0;          //功能键
  6. sbit RS=P2^0;//液晶数据命令选择
  7. sbit RW=P2^1;//液晶读写选择
  8. sbit EN=P2^2;//液晶使能端

  10. unsigned char code freq[][2]={
  11.   0xD8,0xF7,//00440HZ 1   
  12.   0xBD,0xF8,//00494HZ 2  
  13.   0x87,0xF9,//00554HZ 3  
  14.   0xE4,0xF9,//00587HZ 4   
  15.   0x90,0xFA,//00659HZ 5     
  16.   0x29,0xFB,//00740HZ 6     
  17.   0xB1,0xFB,//00831HZ 7      
  18.   0xEF,0xFB,//00880HZ `1
  19. };

  21. unsigned char Time;
  22. unsigned char code YINFU[9][1]={{' '},{'1'},{'2'},{'3'},{'4'},{'5'},{'6'},{'7'},{'8'}};
  23.                           //世上只有妈妈好数据表
  24. unsigned char code MUSIC[]={ 6,2,3,      5,2,1,      3,2,2,    5,2,2,    1,3,2,    6,2,1,    5,2,1,
  25.                      6,2,4,      3,2,2,      5,2,1,    6,2,1,           5,2,2,         3,2,2,           1,2,1,
  26.                      6,1,1,      5,2,1,      3,2,1,         2,2,4,           2,2,3,         3,2,1,    5,2,2,
  27.                      5,2,1,      6,2,1,      3,2,2,         2,2,2,    1,2,4,         5,2,3,           3,2,1,
  28.                      2,2,1,      1,2,1,      6,1,1,         1,2,1,           5,1,6,         0,0,0
  29.                                       };
  30.                          // 音阶频率表 高八位
  31. unsigned char code FREQH[]={
  32.                          0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,
  33.                          0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i
  34.                          0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,
  35.                          0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,
  36.                                } ;
  37.                          // 音阶频率表 低八位
  38. unsigned char code FREQL[]={
  39.                          0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,
  40.                          0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i
  41.                          0xEE,0x44, 0x6B,0xB4,0xF4,0x2D,
  42.                          0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,
  43.                                 };

  45. void Init_Timer0(void);//定时器初始化

  47. //延时函数大约约2*z+5us
  48. void delay2xus(unsigned char z)
  49. {
  50.    while(z--);
  51. }
  52. // 延时函数大约约1ms
  53. void delayms(unsigned char x)
  54. {
  55.    while(x--)
  56.    {
  57.      delay2xus(245);
  58.      delay2xus(245);
  59.    }
  60. }


  63. /*------------------------------------------------
  64.                 节拍延时函数
  65. 各调1/4节拍时间：
  66. 调4/4  125ms
  67. 调2/4  250ms
  68. 调3/4  187ms
  69. ------------------------------------------------*/
  70. void delayTips(unsigned char t)
  71. {
  72.     unsigned char i;
  73.           for(i=0;i<t;i++)
  74.     {
  75.             delayms(250);
  76.     }
  77.     TR0=0;
  78. }
  79. //播放音乐的函数
  80. void PlaySong()
  81. {
  82.    TH0=High;//赋值定时器时间，决定频率
  83.    TL0=Low;
  84.    TR0=1;      //打开定时器
  85.    delayTips(Time); //延时所需要的节拍                     
  86. }

  88. //定时器T0初始化子程序
  89. void Init_Timer0(void)
  90. {
  91. TMOD |= 0x01;          //使用模式1，16位定时器，使用"|"符号可以在使用多个定时器时不受影响                     
  92. EA=1;            //总中断打开
  93. ET0=1;           //定时器中断打开
  94. }
  95. //定时器T0中断子程序
  96. void Timer0_isr(void) interrupt 1
  97. {
  98. TH0=High;
  99. TL0=Low;
  100. SPK=!SPK;
  101. }
  102. //主函数
  103. void main (void)
  104. {
  105.   unsigned char num,k,i;                 
  106.   Init_Timer0();    //初始化定时器0，主要用于数码管动态扫描
  107.   SPK=0;                        //在未按键时，喇叭低电平，防止长期高电平损坏喇叭         
  108.   while (1)
  109.   {
  110.    switch(KeyPort)          //对按键进行处理
  111.                 {
  112.                  case 0xfe:num= 1;break;
  113.                  case 0xfd:num= 2;break;
  114.                  case 0xfb:num= 3;break;
  115.                  case 0xf7:num= 4;break;
  116.                  case 0xef:num= 5;break;
  117.                  case 0xdf:num= 6;break;
  118.                  case 0xbf:num= 7;break;
  119.                  case 0x7f:num= 8;break;      //分别对应不用的音调
  120.                  default:num= 0;break;
  121.                 }
  122.     P2 = KeyPort;
  123.     if(num==0)
  124.     {
  125.        TR0=0;
  126.        SPK=0;   //在未按键时，喇叭低电平，防止长期高电平损坏喇叭
  127.           }
  128.     else
  129.     {
  130.             High=freq[num-1][1];
  131.                    Low =freq[num-1][0];
  132.                   TR0=1;
  133.           }
  134.    if(playSongKey==0)        //如果播放音乐按键被按下
  135.    {
  136.      delayms(10);
  137.      if(playSongKey==0)
  138.      {
  139.        i=0;  
  140.        while(i<100)
  141.             {         
  142.             k=MUSIC[i]+7*MUSIC[i+1]-1;//去音符振荡频率所需数据
  143.             High=FREQH[k];
  144.             Low=FREQL[k];
  145.             Time=MUSIC[i+2];          //节拍时长
  146.             i=i+3;
  147.                         if(P1!=0xff)//长按任意8音键退出播放
  148.                         {
  149.                delayms(10);
  150.                if(P1!=0xff)
  151.                                  i=101;
  152.                         }
  153.             PlaySong();  
  154.             }
  155.                    TR0=0;
  156.      }
  157.    }

  159.   }
  160. }

复制代码

全部资料51hei下载地址：
基于51单片机和Proteus仿真的简易电子琴.zip (57.99 KB, 下载次数: 133)


作者: 小白白123    时间: 2020-6-9 11:07
问一下我按你这个弄完后  右边的二极管不亮是啥原因啊
作者: 仁仁仙    时间: 2020-6-10 09:53
小白白123 发表于 2020-6-9 11:07
问一下我按你这个弄完后  右边的二极管不亮是啥原因啊

你现在解决好了嘛
作者: 三阿    时间: 2020-12-19 14:04
可以试着重新进一下hex文件
作者: 123kkkk    时间: 2021-6-22 09:43
仁仁仙 发表于 2020-6-10 09:53
你现在解决好了嘛

我也想问，我这也不亮



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