找回密码
 立即注册

QQ登录

只需一步,快速开始

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

用AT89C51来制作简单电子琴

[复制链接]
跳转到指定楼层
楼主
ID:548138 发表于 2019-5-29 12:46 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
#include <REGX51.H>
sbit key1=P0^0;
sbit key2=P0^1;
sbit key3=P0^2;
sbit key4=P0^3;
sbit key5=P0^4;
sbit key6=P0^5;
sbit key7=P0^6;
sbit key8=P0^7;
sbit beep=P2^7;
bit mode;
unsigned char TH,TL;
code unsigned int music[]={3816,3401,3030,2857,2551,2272,2024,        958,852,759,714,638,568,506};

void delay_ms(unsigned char ms)
{
        unsigned char i;
        while(ms--)
        for(i=0;i<123;i++);
}
unsigned char key_scan()
{
        unsigned char key_no=14;
        if(key1==0)
        {
        delay_ms(10);
        if(key1==0)
        {
        mode=!mode;
        }
        while(!key1);
        }
        if(mode==0)
        {
         if(key2==0) key_no=0;
        if(key3==0) key_no=1;
        if(key4==0) key_no=2;
        if(key5==0) key_no=3;
        if(key6==0) key_no=4;
        if(key7==0) key_no=5;
        if(key8==0) key_no=6;
        }else
        {
        if(key2==0) key_no=7;
        if(key3==0) key_no=8;
        if(key4==0) key_no=9;
        if(key5==0) key_no=10;
        if(key6==0) key_no=11;
        if(key7==0) key_no=12;
        if(key8==0) key_no=13;
        }
        return key_no;
}
void main()
{
        unsigned char key_no;
        TMOD=0x00;
        ET0=1;
        TR0=0;
        EA=1;
        while(1)
        {
        key_no=key_scan();
         if(key_no!=14)
         {
         TR0=1;
         TH=65536-music[key_no]/256;
         TL=65536-music[key_no]%256;
         }else
         {
         TR0=0;
         }
        }
}
void time0() interrupt 2
{
        TH0=TH;
        TL0=TL;
        beep=!beep;
}

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

使用道具 举报

沙发
ID:1 发表于 2019-5-29 18:22 | 只看该作者
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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