诚心求教，帮忙修改，适合这个单片机学习板的 4*4矩阵键盘程序

现在在写一个DS1302的闹钟程序，可是我们学校的实验板很麻烦，矩阵键盘程序我开始写的一行一行扫描的，太麻烦而且有问题，后来又改成下面这样的，还是不行，麻烦高人指点下,部分原理图如下

#include <REGX52.H>
#define ui unsigned int
#define uc unsigned char
sbit dig=P1^1;
sbit key=P1^3;
uc keyscan()
{
uc h,l;


dig=1;
P0=0;
dig=0;
P0=0x0f;
key=0;

if((P0&0x0f)!=0x0f)
{
delay(10);
if((P0&0x0f)!=0x0f)
{
h=0xfe;
while((h&0x10)!=0)
{

dig=1;
P0=h;
dig=0;
P0=h>>4;
key=0;

if((P0&0x0f)!=0x0f)
{
temp=P0;
P0=temp<<4;
l=(P0&0xf0)|0x0f;
return((~h)+(~l));
}
else h=(h<<1)|0x01;
}

}
}
}