求一個(gè)矩陣式鍵盤掃描的C程序

各位高手能發(fā)一個(gè)矩陣式鍵盤掃描的C程序嗎??能夠有效防抖動(dòng)的..我自己寫的感覺太長了,想?yún)⒖枷聞e人的想法....多謝!!!

矩陣鍵盤  http://www.zg4o1577.cn/bbs/dpj-3008-1.html  這個(gè)是板子附帶的程序  100% 測試通過.4*4鍵盤 接在p3 口.

謝謝了!!

謝謝二樓分享

#include<reg52.h>

sbit dula=P2^7;
#define uchar unsigned char
#define uint  unsigned int

unsigned char const dofly[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,
                      0x77,0x7c,0x39,0x5e,0x79,0x71};//0-F
uchar keyscan(void);//鍵盤掃描
void delay(uint i); //演示程序
void main()
{
 uchar key;
 P2=0x00;        //1數(shù)碼管亮 按相應(yīng)的按鍵，會(huì)顯示按鍵上的字符
 while(1)
{
 dula=1;
 key=keyscan();  //調(diào)用鍵盤掃描，
 switch(key)
 {
  case 0x7e:P0=dofly[0];break;//0 按下相應(yīng)的鍵顯示相對應(yīng)的碼值
  case 0x7d:P0=dofly[1];break;//1
  case 0x7b:P0=dofly[2];break;//2
  case 0x77:P0=dofly[3];break;//3
  case 0xbe:P0=dofly[4];break;//4
  case 0xbd:P0=dofly[5];break;//5
  case 0xbb:P0=dofly[6];break;//6
  case 0xb7:P0=dofly[7];break;//7
  case 0xde:P0=dofly[8];break;//8
  case 0xdd:P0=dofly[9];break;//9
  case 0xdb:P0=dofly[10];break;//a
  case 0xd7:P0=dofly[11];break;//b
  case 0xee:P0=dofly[12];break;//c
  case 0xed:P0=dofly[13];break;//d
  case 0xeb:P0=dofly[14];break;//e
  case 0xe7:P0=dofly[15];break;//f
 }
 }
}
uchar keyscan(void)  //鍵盤掃描函數(shù)，使用行列反轉(zhuǎn)掃描法
{
 uchar cord_h,cord_l;//行列值中間變量
 P3=0x0f;            //行線輸出全為0
 cord_h=P3&0x0f;     //讀入列線值
 if(cord_h!=0x0f)    //先檢測有無按鍵按下
 {
  delay(100);        //去抖
  if(cord_h!=0x0f)
  {
    cord_h=P3&0x0f;  //讀入列線值
    P3=cord_h|0xf0;  //輸出當(dāng)前列線值
    cord_l=P3&0xf0;  //讀入行線值
    return(cord_h+cord_l);//鍵盤最后組合碼值
   }
  }return(0xff);     //返回該值
}
void delay(uint i)  //延時(shí)函數(shù)
{
while(i--);
}