找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 14853|回复: 14
打印 上一主题 下一主题
收起左侧

单片机声光电子琴,含原理图,源代码(c代码),成品图

  [复制链接]
跳转到指定楼层
楼主
这是之前做过的一个声光电子琴小制作;
很有意思;
51单片机的,拿来和大家一起分享一下




电路原理图如下:

单片机源程序如下:
  1. /*
  2. 8个按键发出8个基本音,
  3. 能播放内置音乐,音乐跟随灯光闪烁
  4. */
  5. #include<reg52.h>
  6. #define uint unsigned int
  7. #define uchar unsigned char
  8. sbit speaker=P1^4;//喇叭接30脚
  9. sbit key1=P1^0;//流水灯按键(暂时)
  10. sbit key2=P1^1;//播放音乐按键(暂定)
  11. uchar a,b,num1,s1num,n1,n2;
  12. uchar qushu=0;
  13. char num;//定义num为可以负数
  14. uchar code yinfu[]={0xfb,0xe9,      //Do
  15.                    0xfc,0x5c,      //Re
  16.                    0xfc,0xc1,      //Mi
  17.                    0xfc,0xef,      //Fa
  18.                    0xfd,0x45,      //So
  19.                    0xfd,0x92,      //La
  20.                    0xfd,0xd0,      //Si
  21.                    0xfd,0xee,      //Do#
  22.                                    0x00,0x00,           //间隔
  23. };
  24. uchar code shengri_tone[]={   1,0,1,2,1,4,3,0, //生日快乐音调
  25.                                    1,0,1,2,1,5,4,0,
  26.                                    1,0,1,8,6,4,3,2,0,
  27.                                    7,0,7,6,4,5,4,0       //0代表不发声,即停顿;数字即为音调
  28. };
  29. uchar code laohu_tone[]={1,2,3,1,0,1,2,        //两只老虎乐谱 40个音符
  30.                                         3,1,0,3,4,5,0,3,
  31.                                         4,5,0,5,6,5,4,3,
  32.                                         1,0,5,6,5,4,3,1,
  33.                                         0,3,2,1,0,3,2,1,0

  34. };
  35. uchar code yishan_tone[]={1,1,5,5,6,6,5,        //星星乐谱  54个音符
  36.                                                 0,4,4,3,3,2,2,
  37.                                                 1,0,5,5,4,4,3,
  38.                                                 3,2,0,5,5,4,4,
  39.                                                 3,3,2,0,1,1,5,5,
  40.                                                 6,6,5,0,4,4,3,
  41.                                                 3,2,2,1,0
  42. };
  43. uchar code shengri_beat[]={   24,1,24,48,48,48,72,5,//节拍
  44.                                    24,1,24,48,48,48,72,5,
  45.                                    24,1,24,48,48,48,48,72,5,
  46.                                    24,1,24,48,48,48,72,5    //节拍,即tone表各音调的延时
  47. };
  48. uchar code laohu_beat[]={   24,24,24,48,5,24,24,//节拍
  49.                                    24,48,5,24,24,48,5,24,
  50.                                     24,72,5,24,24,24,24,//节拍
  51.                                    24,48,5,24,24,24,24,24,72,
  52.                                                                      5,24,24,48,5,24,24,//节拍
  53.                                    72,5//节拍  //节拍,即tone表各音调的延时
  54. };
  55. uchar code yishan_beat[]={   24,24,24,24,24,24,48,//节拍
  56.                                    5,24,24,24,24,24,24,72,
  57.                                     5,24,24,24,24,24,24,//节拍
  58.                                    48,5,24,24,24,24,24,24,72,
  59.                                                                      5,24,24,24,24,24,24,//节拍
  60.                                    48,5,24,24,24,24,24,24,72,5//节拍,即tone表各音调的延时
  61. };
  62. uchar code ledtable[]={0x7f,0xbf,0xdf,0xef, //取反
  63. 0xf7,0xfb,0xfd,0xfe};//P0组口的发光二极管代码(焊接过程可能会相反,具体更改)
  64. uchar code ledtable2[]={0x7f,0xbf,0xdf,0xef, //取反
  65. 0xf7,0xfb,0xfd,0xfe};//P2组口发光二极管代码,相反!
  66. void check_key();//改为P3组为按键
  67. void keyscan();
  68. void turn();//顺时针流动
  69. void back();
  70. void qianhou();
  71. void dangshuang();
  72. void delay(uint z);//延时函数声明
  73. void delay1(void);//声明第二个延时函数
  74. void play1(void);//播放生日快乐

  75. void main()
  76. {
  77.         s1num=0;//流水灯种类标志
  78.         key1=1;
  79.         key2=1;
  80.         TMOD=0x01;
  81.         TH0=a;
  82.         TL0=b;
  83.         ET0=1;//打开定时器,但是未允许中断
  84.         TR0=1;
  85.         while(1)
  86.         {
  87.         check_key();
  88.         keyscan();
  89.         }
  90. }

  91. void time0() interrupt 1
  92. {
  93.         TH0=a;
  94.         TL0=b;
  95.         speaker=~speaker;
  96. }
  97. void check_key()
  98. {
  99.         P3=0xff;//先赋给P2组口高电平
  100.         switch(P3)//按下一个键相应4个灯亮
  101.         {
  102.                 case 0xfe:P0=0xee;P2=0x77;a=0xfb;b=0xe9;EA=1;break;//P0,P2组为发光二极管组
  103.                 case 0xfd:P0=0xdd;P2=0xbb;a=0xfc;b=0x5c;EA=1;break;//注意:EA不能改为TR0
  104.                 case 0xfb:P0=0xbb;P2=0xdd;a=0xfc;b=0xc1;EA=1;break;
  105.                 case 0xf7:P0=0x77;P2=0xee;a=0xfc;b=0xef;EA=1;break;
  106.                 case 0xef:P0=0xee;P2=0x77;a=0xfd;b=0x45;EA=1;break;
  107.                 case 0xdf:P0=0xdd;P2=0xbb;a=0xfd;b=0x92;EA=1;break;
  108.                 case 0xbf:P0=0xbb;P2=0xdd;a=0xfd;b=0xd0;EA=1;break;
  109.                 case 0x7f:P0=0x77;P2=0xee;a=0xfd;b=0xee;EA=1;break;
  110.                 default:EA=0;speaker=0;//P0=0xff;P2=0xff ;
  111.         }
  112. }
  113. void delay(uint z)
  114. {
  115.         uint x,y;
  116.         for(x=z;x>0;x--)
  117.         for(y=110;y>0;y--);
  118. }
  119. void keyscan()
  120. {
  121.           if(key1==0)
  122.           {
  123.                   delay(5);
  124.                 if(key1==0)
  125.                 {
  126.                         s1num++;
  127.                         while(!key1);
  128.                         if(s1num==1)
  129.                         {
  130.                                 turn();
  131.                         }
  132.                 }
  133.                 if(s1num==2)
  134.                 {
  135.                         back();
  136.                 }
  137.                 if(s1num==3)
  138.                 {
  139.                         qianhou();
  140.                 }
  141.                 if(s1num==4)
  142.                 {
  143.                         dangshuang();
  144.                 }
  145.                 if(s1num==5)
  146.                         s1num=1;
  147.           }
  148.                 if(key2==0)
  149.                 {
  150.                         delay(5);
  151.                         if(key2==0)
  152.                         {
  153.                                    qushu++;
  154.                                  if(qushu==4)
  155.                                 {
  156.                                          qushu=1;
  157.                             }
  158.                                  while(~key2);
  159.                                  play1();
  160.                         }                                         
  161.                
  162.                 }
  163. }

  164. void delay1(void)//第二个延时函数
  165. {
  166.        uchar n=15;
  167.        while(n--)
  168.        {
  169.               uchar i;
  170.               for(i=0;i<125;i++);
  171.        }
  172. }
  173. void play1(void)//播放生日快乐
  174. {

  175.        uchar m=0;
  176.        uchar s;     
  177.        uchar c=1;
  178.            P0=0xaa;
  179.            P2=0x55;
  180.            if(qushu==1)
  181.            {
  182.                while(1)
  183.                {
  184.                       EA=0;
  185.                       c=shengri_tone[m];                            //取音符
  186.                       s=shengri_beat[m];                      //取节拍
  187.                       a=yinfu[2*c-2];                           
  188.                       b=yinfu[2*c-1];                           
  189.                       EA=1;
  190.                       while(s--)
  191.                       {
  192.                              delay1();
  193.                                                  P0=~P0;
  194.                                                  P2=~P2;
  195.                       }
  196.                       m++;
  197.                       if(m>=33) return;                      //数值是shengri相关表中的元素数量  
  198.                }
  199.           }
  200.           else if(qushu==2)
  201.           {
  202.                    while(1)
  203.                {
  204.                       EA=0;
  205.                       c=laohu_tone[m];                            //取音符
  206.                       s=laohu_beat[m];                      //取节拍
  207.                       a=yinfu[2*c-2];                           
  208.                       b=yinfu[2*c-1];                           
  209.                       EA=1;
  210.                       while(s--)
  211.                       {
  212.                              delay1();
  213.                                                  P0=~P0;
  214.                                                  P2=~P2;
  215.                       }
  216.                       m++;
  217.                       if(m>=40) return;                      //数值是shengri相关表中的元素数量  
  218.                }
  219.           }  
  220.                     else if(qushu==3)
  221.           {
  222.                    while(1)
  223.                {
  224.                       EA=0;
  225.                       c=yishan_tone[m];                            //取音符
  226.                       s=yishan_beat[m];                      //取节拍
  227.                       a=yinfu[2*c-2];                           
  228.                       b=yinfu[2*c-1];                           
  229.                       EA=1;
  230.                       while(s--)
  231.                       {
  232.                              delay1();
  233.                                                  P0=~P0;
  234.                                                  P2=~P2;
  235.                       }
  236.                       m++;
  237.                       if(m>=48) return;                      //数值是shengri相关表中的元素数量  
  238.                }
  239.           }   
  240. }


  241. /*以下为N种流水灯流动花式*/
  242. void turn()//流水灯顺时针走动(5次)
  243. {

  244.          for(num1=0;num1<8;num1++)
  245.          {
  246.          for(num=0;num<8;num++)
  247.          {
  248.                    P0=ledtable[num];
  249.                   delay(30);//时间暂定
  250.          }
  251.          P0=0xff;//之后关闭P1组
  252.          for(num=7;num>-1;num--)
  253.          {
  254.                  P2=ledtable2[num];
  255.                 delay(30);
  256.          }
  257.          P2=0xff;//之后关闭P2组
  258.          }
  259. }
  260. void back()//逆时针流动
  261. {
  262.         for(num1=0;num1<8;num1++)
  263.         {
  264.         for(num=0;num<8;num++)
  265.         {
  266.                 P2=ledtable[num];
  267.                 delay(30);
  268.         }
  269.         P2=0xff;
  270.         for(num=7;num>-1;num--)
  271.         {
  272.                 P0=ledtable2[num];
  273.                 delay(30);
  274.         }
  275.         P0=0xff;
  276.         }
  277. }
  278. void qianhou()//前后来回
  279. ……………………

  280. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
声光电子琴.zip (8.96 MB, 下载次数: 180)












分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏8 分享淘帖 顶2 踩
回复

使用道具 举报

沙发
ID:331965 发表于 2018-5-23 00:10 来自手机 | 只看该作者
元件清单有吗,还有供多少V电压的???
回复

使用道具 举报

板凳
ID:242960 发表于 2018-5-23 18:33 | 只看该作者
我下载了 什么都没有(只有一个代码) 我真的是心寒 心碎了 有没有原理图啊 仿真图啊啊啊啊啊 求求求 可怜.JPG
回复

使用道具 举报

地板
ID:1 发表于 2018-5-24 00:28 | 只看该作者
蜉蝣的梦乡 发表于 2018-5-23 18:33
我下载了 什么都没有(只有一个代码) 我真的是心寒 心碎了 有没有原理图啊 仿真图啊啊啊啊啊 求求求 可怜. ...

我刚看了一下 确实只有电路原理图+代码   没有仿真
回复

使用道具 举报

5#
ID:101345 发表于 2018-5-25 17:58 | 只看该作者
pan888 发表于 2018-5-23 00:10
元件清单有吗,还有供多少V电压的???

5V电源就ok了、

回复

使用道具 举报

6#
ID:101345 发表于 2018-5-25 17:59 | 只看该作者
蜉蝣的梦乡 发表于 2018-5-23 18:33
我下载了 什么都没有(只有一个代码) 我真的是心寒 心碎了 有没有原理图啊 仿真图啊啊啊啊啊 求求求 可怜. ...

有原理图的啊
回复

使用道具 举报

7#
ID:367110 发表于 2018-7-8 20:14 | 只看该作者
蜉蝣的梦乡 发表于 2018-5-23 18:33
我下载了 什么都没有(只有一个代码) 我真的是心寒 心碎了 有没有原理图啊 仿真图啊啊啊啊啊 求求求 可怜. ...

为什么我下载没有代码啊。。。。。请问可以发一份吗!156397614@qq.com拜托了!
回复

使用道具 举报

8#
ID:437399 发表于 2018-12-1 22:26 | 只看该作者
有元件清单吗,求~~~~
回复

使用道具 举报

9#
ID:435783 发表于 2018-12-4 03:52 | 只看该作者
我下进去了怎么在乱叫,用蜂鸣器不行吗
回复

使用道具 举报

10#
ID:447455 发表于 2018-12-17 09:07 | 只看该作者
我想把每个独立按键对应的灯设置为一颗,要怎么改这个程序呀?
回复

使用道具 举报

11#
ID:432687 发表于 2019-4-22 16:05 来自手机
灵感和学习效果的完美页面..我对这项创新感到非常惊讶好主意,和我们在一起!不幸的是,我不懂你的语言,我严重依赖翻译。谢谢分享。

12#
ID:492586 发表于 2019-4-29 21:06 | 只看该作者
原理图有错误,怎么改
回复

使用道具 举报

13#
ID:551847 发表于 2019-5-31 15:11 | 只看该作者
有大神可以发一份完整代码给我吗 很急
回复

使用道具 举报

14#
ID:510532 发表于 2019-6-1 01:07 来自手机 | 只看该作者
楼主强啊
回复

使用道具 举报

15#
ID:868129 发表于 2020-12-26 09:57 | 只看该作者
请教一下
a=yinfu[2*c-2];                           
b=yinfu[2*c-1];
是什么意思呢?
回复

使用道具 举报

16#
ID:868957 发表于 2020-12-28 10:14 | 只看该作者
额,就一个原理图
回复

使用道具 举报

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

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

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