#include<reg51.h>
#define uchar unsigned char
#define uint unsigned int
void dlms(void);
uchar kbscan(void);
void main(void)
{
        SCON=0x40;
	while(1)
	{
		SBUF=kbscan();/*鍵盤掃描函數(shù)，返回鍵碼送key保存*/
                while(!TI);
                TI=0;
	}
}
void dlms(void)
{
	uchar i;
	for(i=200;i>0;i--){}/*延時函數(shù)*/
}
uchar kbscan(void)/*鍵盤掃描函數(shù)*/
{
	uchar sccode,recode;
	P1=0xf0;
	if((P1&0xf0)!=0xf0)/*如P1口高4位不全為1，有鍵按下*/
	{
		dlms();		/*延時去掉抖動*/
		if((P1&0xf0)!=0xf0)/*重讀輸入值*/
		{
			sccode=0xfe;/*最低位置0*/
			while((sccode&0x10)!=0)/*不到最后一行*/
			{
				P1=sccode;/*P1口輸出掃描碼*/
				if((P1&0xf0)!=0xf0)
				{
					recode=P1&0xf0;
					sccode=sccode&0x0f;
					return(sccode+recode);
				}//if
				else
					sccode=(sccode<<1)|0x01;/*如該行無鍵按下，查下一行，行掃描值左移一位*/
			}//while
		}//if

















	}//if
	return(0);/*無鍵按下，返回值為0*/
}