求一个单片机4X4矩阵键盘扫描程序，C语言的。

淘bao 旺铺： 广州局悉华电 单片机学习板 单片机外围学习模块/传感器模块

//4*4键盘检测程序,按下键后相应的代码显示在数码管上

#include<reg51.h>

sbit beep=P2^3

sbit dula=P2^6

sbit wela=P2^7

unsigned char i=100

unsigned char j,k,temp,key

void delay(unsigned char i)

{

for(j=ij>0j--)

for(k=125k>0k--)

}

unsigned char code table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,

0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71}

display(unsigned char num)

{

P0=table[num]

dula=1

dula=0

P0=0xc0

wela=1

wela=0

}

void main()

{

dula=0

wela=0

while(1)

{

P3=0xfe

temp=P3

temp=temp&0xf0兄腊册

if(temp!=0xf0)

{

delay(10)

if(temp!=0xf0)

{

temp=P3

switch(temp)

{

case 0xee:

key=0

break

case 0xde:

key=1

break

case 0xbe:

key=2

break

case 0x7e:

key=3

break

}

while(temp!=0xf0)

{

temp=P3

temp=temp&0xf0

beep=0

}

beep=1

display(key)

P1=0xfe

}

}

P3=0xfd

temp=P3

temp=temp&0xf0

if(temp!=0xf0)

{

delay(10)

if(temp!=0xf0)

{

temp=P3

switch(temp)

{

case 0xed:

key=4

break

case 0xdd:

key=5

break

case 0xbd:

key=6

break

case 0x7d:

key=7

break

}

while(temp!=0xf0)

{

temp=P3

temp=temp&0xf0羡宏

beep=0

}

beep=1

display(key)

}

}

P3=0xfb

temp=P3

temp=temp&0xf0

if(temp!=0xf0)

{

delay(10)

if(temp!=0xf0)

{

temp=P3

switch(temp)

{

case 0xeb:

key=8

break

case 0xdb:

key=9

break

case 0xbb:

key=10

break

case 0x7b:

key=11

break

}

while(temp!=0xf0)

{

temp=P3

temp=temp&0xf0

beep=0

}

beep=1

display(key)

}

}

P3=0xf7

temp=P3

temp=temp&0xf0

if(temp!=0xf0)

{

delay(10)

if(temp!=0xf0)

{

temp=P3

switch(temp)

{

case 0xe7:

key=12

break

case 0xd7:

key=13

break

case 0xb7:

key=14

break

case 0x77:

key=15

break

}

while(temp!=0xf0)

{

temp=P3

temp=temp&0xf0

beep=0

}

beep=1

display(key)

}

}

}

}

unsigned char Keycan(void) //按键扫描程序 P1.0--P1.3为行线 P1.4--P1.7为列线

{

unsigned char rcode, ccode

P1 = 0xF0 // 发全0行扫描码，列线输入

if((P1&0xF0) != 0xF0) // 若有键按下

{

delay()// 延时去抖动

if((P1&0xF0) != 0xF0)

{ rcode = 0xFE// 逐行扫描信旁初值

while((rcode&0x10) != 0)

{

P1 = rcode// 输出行扫描前枣码

if((P1&0xF0) != 0xF0) // 本行有键按下

{

ccode = (P1&0xF0)|0x0F

do{}while((P1&0xF0) != 0xF0)//等待慧坦拆键释放

return ((~rcode) + (~ccode))// 返回键编码

}

else

rcode = (rcode<<1)|0x01// 行扫描码左移一位

}

}

}

---