【proteus练一练2.16】数码管显示4X4矩阵键盘按

proteus

欢迎大家积极讨论：

/*  名称：数码管显示 4X4矩阵
键盘按键号
  说明：按下任意键时，数码
管都会显示其键的序号，扫描程
序首先判断按键发生在哪一列，
然后根据所发生的行附加不同的
值，从而得到按键的序号。
*/
#include
#define uchar unsigned char
#define uint unsigned int
//段码
uchar code DSY_CODE[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,
0x88,0x83,0xc6,0xa1,0x86,0x8e,0x00};
***it BEEP=P3^7;
//上次按键和当前按键的序号，该矩阵中序号范围 0~15，16表示无按键
uchar Pre_KeyNo=16,KeyNo=16;
//延时
void DelayMS(uint x)
{
uchar i;
while(x--) for(i=0;i<120;i++);
}
//矩阵键盘扫描
void Keys_Scan()
{
uchar Tmp;
P1=0x0f; //高4 位置0，放入 4 行
DelayMS(1);
Tmp=P1^0x0f;//按键后0f变成 0000XXXX，X中一个为 0，3 个仍为 1，通过异或把 3 个1 变为0，唯
一的 0 变为1
switch(Tmp) //判断按键发生于 0~3 列的哪一列
{
  case 1: KeyNo=0;break;
  case 2: KeyNo=1;break;
  case 4: KeyNo=2;break;
  case 8: KeyNo=3;break;
  default:KeyNo=16; //无键按下
}
  P1=0xf0; //低 4 位置0，放入 4 列
DelayMS(1);
Tmp=P1>>4^0x0f;//按键后 f0 变成 XXXX0000，X中有 1 个为 0，三个仍为 1；高4 位转移到低 4位并
异或得到改变的值
switch(Tmp) //对0~3 行分别附加起始值 0，4，8，12
{
  case 1: KeyNo+=0;break;
  case 2: KeyNo+=4;break;
  case 4: KeyNo+=8;break;
  case 8: KeyNo+=12;
}
}
//蜂鸣器
void Beep()
{
uchar i;
for(i=0;i<100;i++)
{
  DelayMS(1);
  BEEP=~BEEP;
}
BEEP=0;
}
//主程序
void main()
{
P0=0x00;
BEEP=0;
while(1)
{
  P1=0xf0;
  if(P1!=0xf0) Keys_Scan();  //获取键序号
  if(Pre_KeyNo!=KeyNo)
  {
P0=~DSY_CODE[KeyNo];
Beep();
Pre_KeyNo=KeyNo;
  }
  DelayMS(100);
}
}
proteus 仿真图：

游客
，如果您要查看本帖隐藏内容请回复

2015-12-21 19:54:30

顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶顶

starsword3 · 2015-12-22 22:10:15

学习一下，看看是什么？

M李嘉图 · 2015-12-27 12:06:12

哟哦哟哟~~~~~~~~~~~~~~~~

wangwo28 · 2015-12-28 12:54:13

楼主发布资源辛苦了，谢谢分享！！！！！！！！

张达子 · 2015-12-29 22:16:59

有没有计算器啊

czy19940818 · 2016-5-3 15:29:29

可以可以，这个很有意思

67^#

提示: 该帖被管理员或版主屏蔽

SHUSHENG1994 · 2016-5-8 16:06:49

Pre_KeyNo=KeyNo;
}
DelayMS(100);
}
}
proteus仿真图

kk80805588 · 2016-5-9 20:15:42

谢谢分享下来学习

梧桐灯下 · 2016-5-27 22:25:48

想看看，学习学习嘛、、、、、、、、、、、、、、、、、、、、、、、、、、、、

qazxcefas · 2016-7-4 12:33:45

好东西，在学习中谢谢大家支持

Giliable · 2016-7-19 13:20:35

【proteus练一练2.16】数码管显示4X4矩阵键盘按键序号

73^#

提示: 该帖被管理员或版主屏蔽

absyra · 2016-10-18 01:59:13

{:3:}{:3:}{:3:}谢谢档主分享好东西

朱硕 · 2016-10-29 17:23:19

你很强给你攒你很强给你攒你很强给你攒你很强给你攒你很强给你攒

2016-10-29 22:39:25

好东西想看一看

scccx8106 · 2016-11-28 20:40:51

版主武力戡乱第一个proteus开发板——proteus51

太奇葩丶看不懂 · 2016-12-4 10:59:43

蟹蟹！

郭逸阳 · 2016-12-4 12:28:54

沙发啊啊 · 2017-6-30 10:31:25

Safari

搜索历史

【proteus练一练2.16】数码管显示4X4矩阵键盘按

相关推荐

95 条评论

评论

精选推荐

浏览过的版块

站长推荐 /9