标题: 基于51单片机的简易电子琴源码 [打印本页]
作者: k2914    时间: 2018-12-7 21:36
标题: 基于51单片机的简易电子琴源码
用到了数码管显示，矩阵键盘，蜂鸣器，适合新接触51的朋友们，只是程序，一看就明白  c语言程序

单片机源程序如下:
  1. /*********************************************************************************************
  2. 程序名： 　　 8键电子琴C程序
  3. 编写人： 　　 杜洋　
  4. 编写时间：　　2009年5月18日
  5. 硬件支持：　　STC系列单片机 12MHz
  6. 接口说明：　　  
  7. 修改日志：　　
  8. 　　NO.1-                                                               
  9. /*********************************************************************************************
  10. 说明：

  12. /*********************************************************************************************/

  14. #include <at89x52.h>
  15. #define uchar unsigned char
  16.        
  17. #define KEY  P3
  18. #define LED  P1
  19. sbit dula=P2^6;                //段选信号的锁存器控制
  20. sbit wela=P2^7;                //位选信号的锁存器控制
  21. sbit SPEAKER  = P2^3;
  22. bit flag; //标志音乐输出脚电平的高低
  23. uchar ptr = 0x00; //取音符
  24. uchar high; //计数器高位
  25. uchar low; //计数器低位

  27. unsigned char KeyValue;
  28. unsigned char KeyValue2;
  29. unsigned char STH0;
  30. unsigned char STL0;
  31. unsigned char i;
  32. unsigned char lednum=0;
  33. /*unsigned int code tab[]={
  34. 64021,64103,64260,64400,//低音3开始
  35. 64524,64580,64684,64777,
  36. 64820,64898,64968,65030,
  37. 65058,65110,65157,65178
  38. }; */
  39. unsigned int code tab[]={
  40. /*10000,64103,64260,64400,//低音3开始          */
  41. 64580,64633,64684,64732,
  42. 64777,64820,64860,64898,
  43. 64934,64968,64994,65030
  44. };
  45. unsigned int code music[] ={
  46. 4 ,6 ,8, 9 ,11,13,15
  47. };
  48. unsigned char code music2[] = {
  49. // 1 _ 1_ 1 .5
  50. 0xFC,0x44,0x7F, 0xFC,0x44,0x7F, 0xFC,0x44,0xFF, 0xFA,0x68,0xFF,
  51. // 3 _ 3_ 3 1
  52. 0xFD,0x23,0x7F, 0xFD,0x23,0x7F, 0xFD,0x23,0xFF, 0xFC,0x44,0xFF,
  53. // 1_ 3_ 5 5
  54. 0xFC,0x44,0x7F, 0xFD,0x23,0x7F, 0xFD,0x82,0xFF, 0xFD,0x82,0xFF,
  55. // 4_ 3_ 2 -
  56. 0xFD,0x23,0x7F, 0xFD,0x23,0x7F, 0xFC,0xAC,0xFF, 0xFF,0xFF,0xFF,
  57. // 2_ 3_ 4 4
  58. 0xFC,0xAC,0x7F, 0xFD,0x23,0x7F, 0xFD,0x34,0xFF, 0xFD,0x34,0xFF,
  59. // 3_ 2_ 3 1
  60. 0xFD,0x23,0x7F, 0xFC,0xAC,0x7F, 0xFD,0x23,0xFF, 0xFC,0x44,0xFF,
  61. // 1_ 3_ 2 .5
  62. 0xFC,0x44,0x7F, 0xFD,0x23,0x7F, 0xFC,0xAC,0xFF, 0xFA,0x68,0xFF,
  63. // .7_ 2_ 1 -
  64. 0xFC,0x0C,0x7F, 0xFC,0xAC,0x7F, 0xFC,0x44,0xFF, 0xFF,0xFF,0xFF,
  65. 0x00//结束
  66. };
  67. unsigned char code music_num[] ={
  68. 1,20,1,20,1,1,5,5,
  69. 3,20,3,20,3,3,1,1,
  70. 1,20,3,20,5,5,5,5,
  71. 4,20,3,20,2,19,2,19,
  72. 2,20,3,20,4,4,4,4,
  73. 3,20,2,20,3,3,1,1,
  74. 1,20,3,20,2,2,5,5,
  75. 7,20,2,20,1,19,1,19}  ;
  76. unsigned int code key_num[] ={1,1,2,2,3,4,4,5,5,6,6,7
  77. } ;
  78. unsigned int code key2_num[] ={0,16,1,16,2,3,16,4,16,5,16,6
  79. } ;
  80. /*unsigned int code twotiger[] ={
  81. 1,2,3,1,1,2,3,1,3,4,5,5,3,4,5,5,5,6,5,4,3,3,1,1,5,6,
  82. 5,4,3,3,1,1,2,2,5,5,1,1,0,0,2,2,5,5,1,1,0,0 };
  83. unsigned int code twotiger2[] =        {
  84. 1,1,5,5,6,6,5,5,4,4,3,3,2,2,1,1         ,5        ,5,4,4,3,3,2,2,5
  85. ,5,4,4,3,3,2,2,1,1,5,5,6,6,5,5,4,4,3,3,2,2,1,1
  86. };        */
  87. unsigned char code num[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,
  88.                         0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,
  89.                                                 0x00,0x76,0x40,0x40,0x08};
  90.                                                 //0-F,,,19,,20的码表

  92. unsigned char code numb[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
  93. unsigned char i3;                                                //0-7数码管
  94. void Init(void); //初始化函数
  95. void DelayMs(unsigned int time); //毫秒级延时函数
  96. /*void Delay (unsigned int a);*/
  97. void newmusic(void);
  98. void keyy(void);
  99. void led8(void);
  100. void main(void){
  101.        
  102.         TMOD=0x01;
  103.         ET0=1;
  104.         EA=1;
  105.         KEY = 0xf0;
  106.         LED=0xff;
  107.         while(1){
  108.         KeyValue=15;       
  109.                
  110.         if(KEY != 0xf0){
  111.         DelayMs(10);//?óê±10ms??DD????
  112.         if(KEY!=0xf0)//?ù′??ì2a?ü?ìê?·?°′??
  113.                 {
  114.                 KEY=0X0F;
  115.                 switch(KEY)
  116.                         {
  117.                                 case(0X0e):        KeyValue=0;LED=0xfe;break;
  118.                                 case(0X0d):        KeyValue=1;LED=0xfd;break;
  119.                                 case(0X0b): KeyValue=2;LED=0xfb;break;
  120.                                 case(0X07):        KeyValue=3;LED=0xf7;break;
  121.                         }
  122.                         //2aê?DD
  123.                         KEY=0XF0;
  124.                         switch(KEY)
  125.                         {
  126.                                 case(0Xe0):        KeyValue=KeyValue;break;
  127.                                 case(0Xd0):        KeyValue=KeyValue+4;break;
  128.                                 case(0Xb0): KeyValue=KeyValue+8;break;
  129.                                 case(0X70):        KeyValue=KeyValue+12;break;
  130.                                 }
  131.                                  }         }
  132.                
  133.                 if( KeyValue<12){
  134.                        
  135.                        
  136.                    
  137.                         high=tab[KeyValue]/256;
  138.                     low=tab[KeyValue]%256;
  139.                     TR0=1;
  140.                         led8();
  141.                        
  142.                          }

  144.                 else if(KeyValue==12)  
  145.                                  {KeyValue=0;
  146.                                   while(KeyValue!=12){


  149.                                   keyy();
  150.                                  if (KeyValue2==15){KeyValue=0;break;}
  151.                                  else if (KeyValue2==0){break;}
  152.                                   
  153.                                          high=tab[KeyValue]/256;
  154.                                     low=tab[KeyValue]%256;
  155.                                     TR0=1;
  156.                                         DelayMs(160);

  158.                                        
  159.                                 led8();

  161.                                         SPEAKER = 1;
  162.                                         TR0=0;
  163.                                         DelayMs(600);
  164.                                         KeyValue++;
  165.                                                  
  166.                                                 }} //按键1遍历12个音
  167.                
  168.                
  169.        
  170.                 else if(KeyValue==13)
  171.                 {i=0 ;
  172.                 while(i!=7){
  173.        
  174.                 keyy();
  175.                                  if (KeyValue2==15){i=0;break;}
  176.                                  else if (KeyValue2==0){break;}
  177.                 KeyValue=music[i]-4 ;

  179.                

  181.                 high=tab[KeyValue]/256;
  182.             low=tab[KeyValue]%256;
  183.             TR0=1;
  184.                 DelayMs(160);
  185.                 led8();
  186.                 SPEAKER = 1;
  187.                 TR0=0;
  188.                 DelayMs(600);
  189.                 i++;

  191.                 }}//按键0遍历7个音
  192.                 else if(KeyValue==14)
  193.                                 {       
  194.                                 newmusic();
  195.                                 }//按键3播放音乐
  196.                 else{
  197.                                         SPEAKER = 1;        //按键4复位
  198.                                         TR0=0;}
  199.                                
  200.            
  201.                
  202.    }
  203. }
  204. /*void t0(void) interrupt 1 using 0{
  205.   TH0=STH0;
  206.   TL0=STL0;
  207.   SPEAKER=~SPEAKER;
  208. } */
  209. /*********************************************************************************
  210. * 名称：Count1(void) interrupt 1
  211. * 功能：设置计时器0 溢出中断,每中断一次改变P2_3 引脚电平
  212. *********************************************************************************/
  213. void Count1(void) interrupt 1
  214. {
  215.         TH0 = high;
  216.         TL0 = low;
  217.         if (flag == 0) //改变P2_3 引脚电平
  218.         {
  219.                 SPEAKER = 0;
  220.                 flag = 1;
  221.         }
  222.         else
  223.         {
  224.                 SPEAKER = 1;
  225.                 flag = 0;
  226.         }
  227. }
  228. /*************************************************************
  229. * 杜洋工作室 DoYoung Studio
  230. * 与电子爱好者同行 www.DoYoung.net
  231. 音乐播放
  232. /*************************************************************/
  233. void newmusic()
  234. {
  235.         uchar time;
  236.         Init();
  237.         TH0 = high;
  238.         TL0 = low;
  239.         while (1)
  240.         {
  241.                 if (music2[ptr] != 0xFF && music2[ptr] != 0x00)//判断是否是正常音符
  242.                 {                 keyy();
  243.                                  if (KeyValue2==15){ptr=0;break;}
  244.                                  else if (KeyValue2==0){break;}          
  245.                         TR0 = 0;
  246.                         SPEAKER = 1;
  247.                         DelayMs(10); //间歇
  248.                         TR0 = 1;
  249.                         high = music2[ptr]; //取设置频率数值的高8 位
  250.                         low = music2[ptr + 1]; //取设置频率数值的低8 位
  251.                         time = music2[ptr + 2]; //取发声时间
  252.                        
  253.                                  for(i3=0;i3<40;i3++){
  254.                         P0=num[music_num[lednum]];          
  255.                         dula=1;
  256.                         dula=0;
  257.                        
  258.                         P0=numb[0];           //选中第一个数码管
  259.                         wela=1;
  260.                         wela=0;
  261.                         DelayMs(1);
  262.                                
  263.                         P0=num[music_num[lednum+1]];          
  264.                         dula=1;
  265.                         dula=0;
  266.                         P0=numb[1];           //选中第2个数码管
  267.                         wela=1;
  268.                         wela=0;
  269.                         DelayMs(1);
  270.                         }
  271.                         P0=num[16];          //什么都不显示的代码
  272.                         dula=1;
  273.                         dula=0;

  275.                        
  276.                         DelayMs(time);
  277.                         ptr += 3;
  278.                         lednum+=2;
  279.                 }
  280.                 else if (music2[ptr] == 0xFF) //判断是否是休止符
  281.                 {
  282.                         time = music2[ptr + 2];
  283.                         DelayMs(time);
  284.                         ptr += 3;
  285.                         lednum+=2;
  286.                 }

  288.                 else //结束符,停止2 秒后继续
  289.                 {
  290.                         TR0 = 0;
  291.                         SPEAKER = 1;
  292.                         DelayMs(1000);
  293.                         ptr = 0;
  294.                         lednum=0;
  295.                 }
  296.         }
  297. }
  298. /*******************************************

  300. ms延时*/
  301. void DelayMs(unsigned int time)
  302. {
  303.         unsigned int i;
  304.         unsigned int j;
  305.         for (j =0; j < time; j++) //每个循环 约 3ms
  306.         {
  307.                 for (i =0; i < 363; i++)
  308.                 {;}
  309.         }
  310. }
  311. /***************************************延时
  312. ***************************************/
  313. /*void Delay (unsigned int a){                                //需要输入变量值0~65535
  314.                 unsigned int i;
  315.                 while( --a != 0){                                        //i 从0加到600，CPU大概就耗时1毫秒
  316.                                 for(i = 0; i < 87; i++);        //空指令循环               
  317.                 }
  318. }*/
  319. /*******************************/
  320. void Init()
  321. {
  322.         TMOD = 0x01; //定时器0 处于计时方式,16 位
  323.         EA = 1;
  324.         ET0 = 1; //定时器0 溢出中断
  325. }

  327. /*******************************/
  328. void keyy()
  329. {
  330.         KEY = 0xf0;
  331.         if(KEY != 0xf0){
  332.                         DelayMs(10);//?óê±10ms??DD????
  333.                         if(KEY!=0xf0)//?ù′??ì2a?ü?ìê?·?°′??
  334.                 {         KEY=0X0F;
  335.                 switch(KEY)
  336.                         {
  337.                                 case(0X0e):        KeyValue2=0;break;
  338.                                 case(0X0d):        KeyValue2=1;break;
  339.                                 case(0X0b): KeyValue2=2;break;
  340.                                 case(0X07):        KeyValue2=3;break;
  341.                         }
  342.                         //2aê?DD
  343.                         KEY=0XF0;
  344.                         switch(KEY)
  345.                         {
  346.                                 case(0Xe0):        KeyValue2=KeyValue2;break;
  347.                                 case(0Xd0):        KeyValue2=KeyValue2+4;break;
  348.                                 case(0Xb0): KeyValue2=KeyValue2+8;break;
  349.                                 case(0X70):        KeyValue2=KeyValue2+12;break;
  350.                                 }
  351.                                
  352.                
  353.                                  }         }
  354. }
  355. /*******************************************************/
  356. void led8()           {           for(i3=0;i3<50;i3++){
  357.                         P0=num[key_num[KeyValue]];          
  358.                         dula=1;
  359.                         dula=0;
  360.                        
  361.                         P0=numb[0];           //选中第一个数码管
  362.                         wela=1;
  363.                         wela=0;
  364.                         DelayMs(1);
  365.                                
  366.                         P0=num[key2_num[KeyValue]+1];          
  367.                         dula=1;
  368.                         dula=0;
  369.                         P0=numb[1];           //选中第2个数码管
  370.                         wela=1;
  371.                         wela=0;
  372.                         DelayMs(1);
  373.                         }
  374.                         P0=num[16];          //什么都不显示的代码
  375.                         dula=1;
  376.                         dula=0;
  377.                                
  378. }
复制代码

所有资料51hei提供下载:
8键电子琴.rar (23.08 KB, 下载次数: 48)


作者: guodaxia123    时间: 2019-10-23 09:28
好的，不错
作者: guodaxia123    时间: 2019-10-23 10:20
能有proteus的图就好了
作者: 2107816079    时间: 2019-11-21 16:55
guodaxia123 发表于 2019-10-23 09:28
好的，不错

你的可以用吗
作者: chengengsishi    时间: 2021-7-20 11:17
感谢楼主

(%JGI8TZOYTWB7%TQ)}9(HE.png (94.63 KB, 下载次数: 35)

没有数码管，但可以放音乐

没有数码管，但可以放音乐




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