【proteus练一练2.15】数码管显示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 仿真图：

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

Somnr · 2016-6-28 09:58:46

学习一下，看一下

Giliable · 2016-7-2 22:31:32

谢谢楼主的分享。谢谢楼主的分享。

Giliable · 2016-7-2 22:32:12

谢谢楼主的分享。谢谢楼主的分享
谢谢楼主的分享。谢谢楼主的分享

qazxcefas · 2016-7-4 12:31:30

很有借鉴价值，我找了很多这类的，这个看起来比较好用

Giliable · 2016-7-13 22:14:37

学习一下！学习一下！学习一下！

Giliable · 2016-7-13 22:15:33

学习一下！学习一下！

Giliable · 2016-7-14 20:39:08

谢谢分享，好东西大家一起来分享！

a305662771 · 2016-7-14 21:34:51

谢谢分享咯！！！！

奇迹 · 2016-9-20 15:08:15

看看，学习学习！

*150*^#

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

wenchang1993 · 2016-9-28 23:25:25

感谢楼主，可也看看

camille_wu · 2016-10-8 12:27:17

谢谢楼主分享，，，

h1654155959.6129 · 2016-10-8 16:01:21

wqiling · 2016-10-11 09:27:34

下载看看

new henry · 2016-10-13 13:14:55

不错正需要

kui1573 · 2016-10-30 15:31:17

花纹印 · 2016-11-2 14:33:42

{:12:}{:12:}{:12:}{:12:}{:12:}{:12:}{:12:}

黄电发 · 2016-11-3 19:55:21

学习学习

朱清耀 · 2016-11-5 12:36:15

李俊峰 · 2016-11-18 23:31:02

搜索历史

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

相关推荐

254 条评论

评论

精选推荐

站长推荐 /6