找回密码
 立即注册

QQ登录

只需一步,快速开始

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

单片机制作简易电子琴

[复制链接]
跳转到指定楼层
楼主
ID:435129 发表于 2018-11-28 17:39 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
#include <reg51.h>
#include <intrins.h>

#define uint unsigned int
#define uchar unsigned char


sbit SPK = P3^7;                  //P3.7外接扬声器
uint FreqTemp;
unsigned int code Freqtab[] = { //定时半周期的初始值
     64021,64103,64260,64400,      //低音3 4 5 6
     64524,64580,64684,64777,      //低音7,中音1 2 3
     64820,64898,64968,65030,      //中音4 5 6 7
     65058,65110,65157,65178};     //高音1 2 3 4



uchar Keyscan(void)             /* 按键扫描程序 */
{
     uchar i, j, temp, Buffer[4] = {0xfe, 0xfd, 0xfb, 0xf7};
     for(j = 0; j < 4; j++) {    //循环四次,扫描四行
       P1 = Buffer[j];           //在低四位分别输出一个低电平
       _nop_();
       temp = 0x80;              //计划先读出P1.7位
       for(i = 0; i < 4; i++) { //循环四次,检查四列
         if(!(P1 & temp)) {      //从高四位,截取1位
           return (i + j * 4); //返回取得的按键值
         }
         temp >>= 1;             //换右边一位
     } }
     return 16;                  //没有键按下就返回16
}



void Display(uchar k)
{
     P2 = ((k / 10) << 4) + (k % 10);
}

void main()
{
     uchar Key_Value = 16, Key_Temp1, Key_Temp2;//读出的键值
     TMOD = 0x01;                   //T0定时方式1
     ET0 = 1;                       //允许T0中断
     EX0 = 1;                       //允许X0中断

     EA = 1;


     while(1)

{
       TR0 = 0;                     //暂不发音
       Key_Temp1 = Keyscan();       //读入按键

       if(Key_Temp1 != 16)

{        
         Display(Key_Value);        //显示键值、延时消抖
         Key_Temp2 = Keyscan();     //再读一次

         if (Key_Temp1 == Key_Temp2) //两次相等

{


           Key_Value = Key_Temp1; //就确认下来
           FreqTemp = Freqtab[Key_Value]; //根据键值,取出定时半周期的初始值
           Display(Key_Value);      //显示
           TR0 = 1;                 //启动定时器,发音
           while (Keyscan() < 16); //等待释放
           SPK = 1;                 //停止发音

}

}

}

}



void T0_INT(void) interrupt 1      /* 按键中断 */
{
     TL0 = FreqTemp;                //载入定时半周期的初始值
     TH0 = FreqTemp >> 8;
     SPK = ~SPK;                    //发音

}


评分

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

查看全部评分

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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