单片机论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1661|回复: 2
收起左侧

基于单片机简易电子琴仿真和源程序

[复制链接]
xieqiang520 发表于 2018-7-1 17:16 | 显示全部楼层 |阅读模式
简易电子琴仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)
0.png 0.png

单片机电子琴源程序如下:
  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;//液晶使能端

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

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

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

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


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

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

  151.   }
  152. }
复制代码

所有资料51hei提供下载:
简易电子琴.zip (57.99 KB, 下载次数: 36)

评分

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

查看全部评分

回复

使用道具 举报

 楼主| xieqiang520 发表于 2018-7-1 17:19 | 显示全部楼层
很实用的 可以用
回复

使用道具 举报

feiji666 发表于 2018-7-1 20:38 | 显示全部楼层
可以自己做个玩
回复

使用道具 举报

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

本版积分规则

QQ|手机版|小黑屋|单片机论坛 |51Hei单片机16群 联系QQ:125739409;技术交流QQ群7344883

Powered by 单片机教程网

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