设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 注释详细的51单片机电子琴的仿真和程序 内含多种音乐,可 ...
返回列表 发新帖
查看: 1261|回复: 0
打印 上一主题 下一主题
收起左侧

注释详细的51单片机电子琴的仿真和程序 内含多种音乐,可以自己调节

[复制链接]
跳转到指定楼层
楼主
ID:607623 发表于 2023-4-29 14:47 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
51电子琴的设计  内含多种音乐，可以自己调节

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


带注释的单片机源程序如下:

  2. #include <reg52.h>

  4. #define SONG 4                                        // 歌曲的数量

  6. #define uchar unsigned char                // 以后unsigned char就可以用uchar代替
  7. #define uint  unsigned int                // 以后unsigned int 就可以用uint 代替
  8. #define ulong unsigned long                // 以后unsigned long就可以用ulong代替

  10. sbit Key1_P = P1^3;                                // 弹奏键1的管脚
  11. sbit Key2_P = P1^7;                                // 弹奏键2的管脚
  12. sbit Key3_P = P3^2;                                // 弹奏键3的管脚
  13. sbit Key4_P = P3^3;                                // 弹奏键4的管脚
  14. sbit Key5_P = P1^2;                                // 弹奏键5的管脚
  15. sbit Key6_P = P1^6;                                // 弹奏键6的管脚
  16. sbit Key7_P = P3^1;                                // 弹奏键7的管脚
  17. sbit Key8_P = P3^5;                                // 弹奏键8的管脚

  19. sbit Key9_P = P1^4;                                // 播放内置歌曲的按键管脚
  20. sbit Beep_P = P2^7;                                // 扬声器管脚           

  22. uchar gTone=0;                                        // gTone代表当前要播放的音调
  23. uchar gPlayStatus;                                // gPlayStatus代表当前的播放状态，0是停止，1是播放
  24. uchar gSong;                                    // gSong代表当前播放到第几首歌


  27. /*  定时器初值          低1  低2  低3  低4  低5  低6  低7  中1  中2  中3  中4  中5  中6  中7  高1  高2  高3  高4  高5  高6  高7 */
  28. uchar code  ArrTL0[]={ 140,  91,  21, 103,   4, 144,  12,  68, 121, 220,  52, 130, 200,   6,  34,  86, 133, 154, 193, 228,   3 };
  29. uchar code  ArrTH0[]={ 248, 249, 250, 250, 251, 251, 252, 252, 252, 252, 253, 253, 253, 254, 254, 254, 254, 254, 254, 254, 255 };
  30. //                      0    1    2    3     4   5    6     7           8   9          10   11   12   13   14   15   16   17   18   19   20

  32. /*  数码管的显示值       1    2    3    4    5     6   7 */
  33. uchar code  ArrDig[]={ 0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8};



  37. /*  《水手》的乐谱  */
  38. uchar code Music1[]={
  39.         
  40.         8,3,  7,1,  7,4
  41.         } ;




  46. /********************************************************************
  47. * 名称 : uchar ChangeFor(uchar dat)
  48. * 功能 : 交换一个字节位的位置,用于数码管显示
  49. * 输入 : 需要改变的数
  50. * 输出 : 改变后的数
  51. ***********************************************************************/
  52. #define LED_a                6        //数码管段选的a段接在段选IO口的第0位
  53. #define LED_b                7
  54. #define LED_c                5
  55. #define LED_d                3
  56. #define LED_e                2
  57. #define LED_f                1
  58. #define LED_g                0
  59. #define LED_dp        4

  61. uchar ChangeFor(uchar dat)
  62. {
  63.         uchar temp=0;
  64.         if(dat&0x01)                //判断数据的第一位是否为1
  65.                 temp|=0x01<<LED_a;//如果为1,放到控制数码管a段的位置
  66.         if(dat&0x02)
  67.                 temp|=0x01<<LED_b;
  68.         if(dat&0x04)
  69.                 temp|=0x01<<LED_c;
  70.         if(dat&0x08)
  71.                 temp|=0x01<<LED_d;
  72.         if(dat&0x10)
  73.                 temp|=0x01<<LED_e;
  74.         if(dat&0x20)
  75.                 temp|=0x01<<LED_f;
  76.         if(dat&0x40)
  77.                 temp|=0x01<<LED_g;
  78.         if(dat&0x80)
  79.                 temp|=0x01<<LED_dp;
  80.         return temp;
  81. }

  83. /*********************************************************/
  84. // 毫秒级的延时函数，time是要延时的毫秒数
  85. /*********************************************************/
  86. void DelayMs(uint time)
  87. {
  88.         uint i,j;
  89.         for(i=time;i>0;i--)
  90.                 for(j=110;j>0;j--);
  91. }



  95. /*********************************************************/
  96. // 发出指定音调及其节拍的声音，tone代表音调，beat代表节拍
  97. /*********************************************************/                 
  98. void PlayTone(uchar tone,float beat)
  99. {
  100.         int i;
  101.         P0=ChangeFor(ArrDig[tone%7]);                        // 数码管显示当前音调值
  102.         gTone=tone;                                        // 将音调值赋给全局变量gTone
  103.         TH0 = ArrTH0[tone];                        // 装入定时器TH0的初值
  104.         TL0 = ArrTL0[tone];                        // 装入定时器TL0的初值
  105.         TR0=1;                                                // 启动定时器
  106.         for(i=0;i<beat;i++)               
  107.         {
  108.                 DelayMs(200);         
  109.         }
  110.         TR0=0;                                                // 停止定时器
  111.         P0=0xff;                                   // 关闭数码管显示                 
  112. }


  115. /*********************************************************/
  116. // 播放内置的音乐
  117. // arr[]是要播放的乐谱数组，num是数组里面的元素个数
  118. /*********************************************************/
  119. void PlayMusic(uchar music[],uint num)
  120. {
  121.         uint i=0;
  122.         while(i<num)                        
  123.         {   
  124.                 if(gPlayStatus==1)                                                  // 判断播放状态是否为播放还是暂停
  125.                 {   
  126.                         PlayTone(music[i],music[i+1]);                   // 开始演奏一个节拍
  127.                         i+=2;                                                                // 进入下一个节拍，因为每2个数为1组，所以每次要加2
  128.                         if(i==num)                                                        // 判断歌曲是否播放完了
  129.                         {
  130.                                 gPlayStatus=0;                                        // 播放完了的话，则把播放状态改为暂停，否则会循环播放
  131.                         }
  132.                 }
  133.                
  134.                 if(Key9_P==0)                                                         // 下一曲
  135.                 {
  136.                         DelayMs(10);                                                // 消除按键按下的抖动
  137.                         while(!Key9_P);                                            // 等待按键释放
  138.                         DelayMs(10);                                                // 消除按键松开的抖动
  139.                         gSong++;                                                        // 把当前播放到第几首歌的变量gSong加1，即切到下一曲
  140.                         if(gSong>SONG)                                                // 如果gSong为SONG，说明到后面的尽头了，则转为第一首
  141.                                 gSong=1;
  142.                         break;        
  143.                 }                                
  144.         }
  145. }



  149. /*********************************************************/
  150. // 定时器初始化函数
  151. /*********************************************************/
  152. void TimerInit()
  153. {
  154.         TMOD=1;                        // 定时器0，工作方式1
  155.         TH0=0;                        // 装定时器TH0的初值
  156.         TL0=0;                        // 装定时器TL0的初值
  157.         ET0=1;                        // 开启定时器0中断                  
  158.         EA=1;                        // 开启总中断
  159. }


  162. /*********************************************************/
  163. // 弹奏键扫描函数
  164. /*********************************************************/
  165. uchar KeyScanf()
  166. {
  167.         if(Key1_P==0)        // 按键1被按下，返回1
  168.                 return 1;
  169.         if(Key2_P==0)        // 按键2被按下，返回2
  170.                 return 2;
  171.         if(Key3_P==0)         // 按键3被按下，返回3
  172.                 return 3;
  173.         if(Key4_P==0)         // 按键4被按下，返回4
  174.                 return 4;
  175.         if(Key5_P==0)         // 按键5被按下，返回5
  176.                 return 5;
  177.         if(Key6_P==0)        // 按键6被按下，返回6
  178.                 return 6;
  179.         if(Key7_P==0)        // 按键7被按下，返回7
  180.                 return 7;
  181.         if(Key8_P==0)          // 按键8被按下，返回8
  182.                 return 8;
  183.         return 0;                  // 8个按键都没被按下，返回0
  184. }


  187. /*********************************************************/
  188. // 主函数，程序从这里开始执行
  189. /*********************************************************/        
  190. void main()
  191. {  
  192.         uchar ret;                                        // 用于保存音调键函数的返回值

  194.         TimerInit();
  195.         gSong=0;                                        // 上电默认第一首歌
  196.         gPlayStatus=0;                                // 上电默认是0停止状态（1为播放状态）

  198.         while(1)
  199.         {
  200.                 if(gPlayStatus==1)                // 如果处于播放状态，则判断是哪一首歌曲需要播放
  201.                 {
  202.                         switch(gSong)                 
  203.                         {
  204.                                 case 1 : PlayMusic(Music1,sizeof(Music1)); break;
  205.                                 case 2 : PlayMusic(Music2,sizeof(Music2)); break;
  206.                                 case 3 : PlayMusic(Music3,sizeof(Music3)); break;
  207.                                 case 4 : PlayMusic(Music4,sizeof(Music4)); break;
  208.                                 default:                                       break;        
  209.                         }        
  210.                 }
  211.                
  212.                 if(Key9_P==0)                                                // 开始播放
  213.                 {
  214.                         DelayMs(10);                                        // 消除按键按下的抖动
  215.                         while(!Key9_P);                                        // 等待按键释放
  216.                         DelayMs(10);                                        // 消除按键松开的抖动
  217.                         gSong++;                                                // 把当前播放到第几首歌的变量gSong加1，即切到下一曲
  218.                         if(gSong>SONG)                                        // 如果gSong为SONG，说明到后面的尽头了，则转为第一首
  219.                                 gSong=1;
  220.                         gPlayStatus=1;                                         // 播放状态改为1，即播放
  221.                         
  222.                 }
  223.                                 
  224.                 ret=KeyScanf();
  225.                 if(ret!=0)
  226.                 {
  227.                         P0=ChangeFor(ArrDig[(ret-1)%7]);                        // 数码管显示当前音调值
  228.                         TH0 = ArrTH0[ret+6];                        // 装入定时器TH0的初值
  229.                         TL0 = ArrTL0[ret+6];                        // 装入定时器TL0的初值
  230.                         gTone=ret+6;
  231.                         TR0=1;
  232.                         while(KeyScanf());                                // 等待按键释放
  233.                         DelayMs(70);                                        // 按键释放之后，再播放70毫秒，达到余音的效果
  234.                         TR0=0;                                                        // 停止定时器
  235.                         P0=0xff;                                           // 关闭数码管显示
  236.                 }               
  237.         }
  238. }

  240.                                        
  241. /*********************************************************/
  242. // 功能：定时器0中断处理函数
  243. /*********************************************************/                  
  244. void time0() interrupt 1
  245. {
  246.         Beep_P=!Beep_P;                        // 将控制扬声器的管脚取反
  247.         TH0=ArrTH0[gTone];                // 重装定时器TH0的初值
  248.         TL0=ArrTL0[gTone];                // 重装定时器TL0的初值        
  249. }
复制代码

Keil代码与Proteus仿真下载:
01__c程序 注释.zip (128.94 KB, 下载次数: 32)

评分

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

查看全部评分

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

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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