找回密码
 立即注册

QQ登录

只需一步,快速开始

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

51单片机电子琴源程序

[复制链接]
跳转到指定楼层
楼主
ID:414163 发表于 2018-10-23 17:52 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
51单片机电子琴源程序
  1. #include<reg51 h>
  2. #define uint unsigned int
  3. #define uchar unsigned char
  4. void?Init(void);//初始化
  5. void?Key_Scan(void);//键值扫描
  6. void?Delayms(uint?z);//延时
  7. void?LED_Display(void);//数码显示
  8. void?Sound_Player(void);//音频处理
  9. uint?Keycode;//键值
  10. uint?Time?=?0;
  11. uint?Flag?=?0;?
  12. uint?TH0code,TL0code;
  13. sbit?Speaker?=?P3^0;?//扬声器控制引脚
  14. uint?Num?=?0;?
  15. uchar?code?table[]={?//数码管共阴码表
  16. 0x3f,0x06,0x5b,0x4f,
  17. 0x66,0x6d,0x7d,0x07,
  18. 0x7f,0x6f,0x77,0x7c,
  19. 0x39,0x5e,0x79,0x71};

  20. uchar code Music1_Tab[]={  //曲谱1码表
  21. 0xc0,0xf9,0xa4,0xb0,
  22. 0x99,0x92,0x82,0xf8,
  23. 0x80,0x90,0x88,0x83,
  24. 0xc6,0xa1,0x86,0x8e};

  25. uint code Music2_Tab[]={ //曲谱2码表
  26. 64021,64103,64260,64400,
  27. 64524,64580,64684,64777,
  28. 64820,64898,64968,65030,
  29. 65058,65110,65157,65178};  

复制代码


51单片机电子琴代码.zip

667 Bytes, 下载次数: 5, 下载积分: 黑币 -5

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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