找回密码
 立即注册

QQ登录

只需一步,快速开始

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

基于89C51简易电子琴的设计

[复制链接]
跳转到指定楼层
楼主
简易电子琴的设计

主程序代码如下:
  1. #include <reg52.h>
  2. #include <stdio.h>
  3. #define uchar unsigned char
  4. #define uint  unsigned int
  5. sbit buz=P0^1;
  6. uchar keycode;
  7. /* 各音阶对应计数器初值: 1,2,3,4,5,6,7,1(高)*/
  8. uint toneh[8]={ 0xfc43,0xfcab,0xfd08,0xfd32,0xfd81,0xfdc7,0xf05e,0xfe21};
  9. uchar keymode[8]={ 0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
  10. void main()
  11. {
  12.     Sys_Init();
  13.     do
  14.     {
  15.         keycode=Get_Key();  /*获取键值索引*/
  16.         Play(keycode);
  17.     }
  18. }
  19. 子程序Get_Key ()为键值读取子函数。代码如下:
  20. uchar Get_Key ()                                /*读取键值,并转换为索引值*/
  21. {
  22.     uchar temp,i;
  23.     P1=0xff;
  24.     temp=P1;
  25.     for (i=0;i<8;i++)
  26.     {
  27.         if (temp==keymode)  return i;
  28.     }
  29.     return (8);  //无正确对应的键值,则忽略
  30. }
  31. 系统初始化子程序Sys_Init用于设定定时器工作模式,开启中断。代码如下:
  32. void sys_init()
  33. {
  34.     TMOD=0x10; /*启动定时器1*/
  35.     EA=1;  /*开总中断*/
  36.     ET1=1;  /*允许定时器1中断*/
  37.    P1=0xff;  /*设置P1口为输入模式*/
  38. }
  39. 子程序Play()代码如下:
  40. void play(uchar key)
  41. {
  42.     if (key==8)/*无键按下或多键按下,不响应*/
  43.     {
  44.         TR1=0;
  45.         buz=0;
  46.     }   
  47.     else
  48.     {
  49.         TR1=1; /*有键按下,开中断*/
  50.         keycode=key; /*键值索引赋值*/
  51.     }   
  52. }
  53. 定时器T1主要用于生成各音阶对应的方波频率。
  54. 代码如下:
  55. void timer0(void) interrupt 3  using  1                /*定时器1中断服务程序*/
  56. {


  57. *************///////////文本限制,移步下载附件///////**************
复制代码


电子琴设计.rar

51.65 KB, 下载次数: 25, 下载积分: 黑币 -5

包含原理图,程序文本,KEIL文件

评分

参与人数 2黑币 +55 收起 理由
shouzi瘦子 + 5
admin + 50 共享资料的黑币奖励!

查看全部评分

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

使用道具 举报

沙发
ID:361773 发表于 2018-7-3 11:14 | 只看该作者
一楼手滑,二楼奉上原理图

I}X[O4R77SJY]Y4LN[})Q8E.png (39.76 KB, 下载次数: 22)

I}X[O4R77SJY]Y4LN[})Q8E.png
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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