- 15
- 0
- 约2.13千字
- 约 3页
- 2021-11-30 发布于福建
- 举报
89c51 单片机 4*4 键盘应用实例
硬件仿真电路图如下:
程序如下(编译成功) :
#includereg51.h
#includeLCD1602.h
#includehardware.h
char code tab[4][4]={ {1,4,7,#},
{2,5,8,0},
{3,6,9,*},
{A,B,C,D}}; //0 到 F 的 16 个键植
void delay(unsigned char a)
{
unsigned char i;
while(a--)
for(i=100;i0;i--)
;
}
char kbscan() // 键盘扫描
{
unsigned char hang,lie,key;
if(P3!=0x0f)
delay(5);
if(P3!=0x0f)
{
switch(P30x0f)
{
case 0x0e:lie=0;break;
case 0x0d:lie=1;break;
case 0x0b:lie=2;break;
case 7:lie=3;break;
}
P3=0xf0;
P3=0xf0;
switch(P30xf0)
{
case 0xe0:hang=0;break;
case 0xd0:hang=1;break;
case 0xb0:hang=2;break;
case 0x70:hang=3;break;
}
P3=0x0f;
while(P3!=0x0f);
key=tab[hang][lie];
}
else
key=0;
return (key);
}
void main()
{
unsigned char temp;
LCD_initial();
LCD_prints(piaoling);
P3=0x0f;
P0=0xff;
while(1)
{
temp=kbscan();
if(temp!=0)
{
P0=temp;
LCD_set_position(0x40);
您可能关注的文档
最近下载
- 陕西省金太阳2026届高三上学期1月期末联考化学试卷(含答案详解).pdf
- 2023-2024学年北京市第十八中教育集团七年级上学期期中考试数学试卷含详解.docx VIP
- 做账实操-马来西亚公司全盘账务处理分录实例.doc
- 甲苯二异氰酸酯msds.docx VIP
- 甲苯24二异氰酸酯MSDS.docx VIP
- 基于QFD创新型品管圈的危重患者连续性肾脏替代治疗管理模式构建.docx VIP
- 26年中考 中考主干背默本答案.doc VIP
- SP1232F_最新原厂规格书.pdf
- WJ30059-2023军工燃烧爆炸品工程设计安全规范.docx VIP
- (高清版)DG∕TJ 08-55-2019 城市居住地区和居住区公共服务设施设置标准.pdf VIP
原创力文档

文档评论(0)