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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 单片机中断+Proteus仿真音乐实现《天空之城》
返回列表 发新帖
查看: 2002|回复: 0
打印 上一主题 下一主题
收起左侧

单片机中断+Proteus仿真音乐实现《天空之城》

[复制链接]
跳转到指定楼层
楼主
ID:767353 发表于 2020-6-2 18:02 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
随手做的天空之城音乐播放
附带流水灯实现的灯谱效果
代码与proteus仿真都为原创
请大家多多指教

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


单片机源程序如下:
  1. #include <reg51.h>
  2. #include "yinfu.h"
  3. #define uchar unsigned char
  4. #define uint unsigned int
  5. sbit k1=P0^0;
  6. sbit BEEP = P2^7;
  7. unsigned char tab[] = {0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
  8. //天空之城
  9. uchar code SONG_TONE[] = {         
  10. z6,z7, g1,z7,g1,g3, z7,z3,z3, z6,z5,z6,g1, z5,0,z3,z3, z4,z3,z4,g1,
  11. z3,0,g1,g1,g1, z7,g4,g4,z7, z7,0,z6,z7, g1,z7,g1,g3, z7,0,z3,z3, z6,z5,z6,g1,
  12. z5,0,z3, z4,g1,z7,z7,g1, g2,g2,g3,g1,0, g1,z7,z6,z6,z7,z5, z6,0,g1,g2, g3,g2,g3,g5,
  13. g2,0,z5,z5, g1,z7,g1,g3, g3,0,0, z6,z7,g1,z7,g2,g2, z1,z5,z5,0, g4,g3,g2,g1,
  14. g3, g3,0,g3, g6,g5,g5, g3,g2,g1,0,g1, g2,g1,g2,g2,g5, g3,0,g3,
  15. g6,g5, g3,g3,g1,0,g1, g2,g1,g2,g2,z7, z6,0,z6,z7, z6,0
  16. };

  18. uchar code SONG_LONG[] = {
  19. 6,6, 12,6,12,12, 36,6,6, 12,6,12,12, 24,12,6,6, 12,6,6,12,
  20. 24,3,3,3,3, 12,6,12,12, 24,12,6,6, 12,6,12,12, 24,12,6,6, 12,6,12,12,
  21. 36,6,6, 12,6,6,12,12, 4,4,4,12,12, 12,6,6,6,12,12, 24,12,6,6, 12,6,12,12,
  22. 24,12,6,6, 6,6,12,12, 24,12,12, 6,6,12,12,6,6, 12,6,12,12, 12,12,12,12,
  23. 48, 24,12,12, 24,12,12, 6,6,12,6,6,12,6,6,6,12, 24,12,12,
  24. 24,24, 6,6,24,6,6, 12,6,6,6,12, 24,12,6,6, 48,0
  25. };


  28. void delay12u(uint j)         //延时12us
  29. {
  30.         uint i;
  31.         for(i=0;i<j;i++)
  32.         {;}
  33. }

  35. void dengpu(uint a)                        // 等谱实现
  36. {
  37.         switch(a)
  38.         {
  39.                 case d7:
  40.                         P1 = 0x7f;
  41.                 break;
  42.                 case d6:
  43.                         P1 = 0xbf;
  44.                 break;
  45.                 case d5:
  46.                         P1 = 0xdf;
  47.                 break;
  48.                 case d4:
  49.                         P1 = 0xef;
  50.                 break;
  51.                 case d3:
  52.                         P1 = 0xf7;
  53.                 break;
  54.                 case d2:
  55.                         P1 = 0xfb;
  56.                 break;
  57.                 case d1:
  58.                         P1 = 0xfd;
  59.                 break;

  61.                 case z7:
  62.                         P1 = 0x7f;
  63.                 break;
  64.                 case z6:
  65.                         P1 = 0xbf;
  66.                 break;
  67.                 case z5:
  68.                         P1 = 0xdf;
  69.                 break;
  70.                 case z4:
  71.                         P1 = 0xef;
  72.                 break;
  73.                 case z3:
  74.                         P1 = 0xf7;
  75.                 break;
  76.                 case z2:
  77.                         P1 = 0xfb;
  78.                 break;
  79.                 case z1:
  80.                         P1 = 0xfd;
  81.                 break;

  83.                 case g7:
  84.                         P1 = 0x7f;
  85.                 break;
  86.                 case g6:
  87.                         P1 = 0xbf;
  88.                 break;
  89.                 case g5:
  90.                         P1 = 0xdf;
  91.                 break;
  92.                 case g4:
  93.                         P1 = 0xef;
  94.                 break;
  95.                 case g3:
  96.                         P1 = 0xf7;
  97.                 break;
  98.                 case g2:
  99.                         P1 = 0xfb;
  100.                 break;
  101.                 case g1:
  102.                         P1 = 0xfd;
  103.                 break;
  104.                 default:
  105.                         P1 = 0xff;
  106.         }
  107. }

  109. void PlayMusic()
  110. {
  111.          uint i=0,j;
  112.         while(SONG_LONG[i]!=0||SONG_TONE[i]!=0)
  113.         {
  114.                 dengpu(SONG_TONE[i]);
  115.                  for(j=0;j<SONG_LONG[i]*50;j++)
  116.                 {
  117.                          BEEP = ~BEEP;
  118.                         delay12u(SONG_TONE[i]);
  119.                 }
  120.                 i++;
  121.         }
  122. }

  124. void main()
  125. {
  126.         k1=1;
  127.          while(1)
  128.         {
  129.                  if(k1==0)
  130.                 {
  131.                         delay12u(900);
  132.                         if(k1==0)
  133.                         {
  134.                                 PlayMusic();
  135.                                 delay12u(5000);
  136.                         }
  137.                 }
  138.         }
  139. }
复制代码

yinfu.h代码
  1. #ifndef __YINFU_H__
  2. #define __YINFU_H__

  4. #define d1 159
  5. #define d2 142
  6. #define d3 126
  7. #define d4 119
  8. #define d5 106
  9. #define d6 95
  10. #define d7 84

  12. #define z1 80
  13. #define z2 71
  14. #define z3 63
  15. #define z4 60
  16. #define z5 53
  17. #define z6 47
  18. #define z7 42

  20. #define g1 40
  21. #define g2 35
  22. #define g3 32
  23. #define g4 30
  24. #define g5 27
  25. #define g6 24
  26. #define g7 21


  29. #endif
复制代码
proteus元件连接图与程序:
51单片机天空之城音乐实现.zip (65.75 KB, 下载次数: 27)

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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