矩阵键盘C语言代码，proteus仿真电路

4*4的矩阵键盘C语言源程序，含proteus仿真电路，按不同的键，数码管显示出该键值！

		  #include

void delay（unsigned int x）
{
	unsigned int y;
	while（x--）
	for（y=125;y>0;y--）;
}
void scan（）
{
	unsigned char tempnum;
	P2=0xfe;
	temp=P2;	
	if（（temp&0xf0）!=0xf0）
	{
	   delay（10）;
	   temp=P2;
	   if（（temp&0xf0）!=0xf0）
	  {
	  	 //temp=P2;
		 switch（temp）
		 {
		 	case 0xee:num=0;break;
			case 0xde:num=1;break;
			case 0xbe:num=2;break;
			case 0x7e:num=3;break;
		 }
		 while（temp!=0xf0）
		 {
		 	temp=P2;
			temp=temp&0xf0;
		 }
		 P1=num;
	  }
	}

	P2=0xfd;
	temp=P2;
	if（（temp&0xf0）!=0xf0）
	{
		delay（10）;
		temp=P2;
	
		if（（temp&0xf0）!=0xf0）
		{
		//	temp=P2;
			switch（temp）
			{
				case 0xed:num=4;break;
				case 0xdd:num=5;break;
				case 0xbd:num=6;break;
				case 0x7d:num=7;break;
			}
			while（temp!=0xf0）
			{
				temp=P2;
				temp=temp&0xf0;
			}
			P1=num;
		}
	 }

	 P2=0xfb;
	 temp=P2;
	 if（（temp&0xf0）!=0xf0）
	 {
	 	delay（10）;
		temp=P2;
		if（（temp&0xf0）!=0xf0）
		{
		//	temp=P2;
			switch（temp）
			{
				case 0xeb:num=8;break;
				case 0xdb:num=9;break;
				case 0xbb:num=10;break;
				case 0x7b:num=11;break;
			}
			while（temp!=0xf0）
			{
				temp=P2;
				temp&=0xf0;
			}
			P1=num;
		}
	 }
	 P2=0xf7;
	 temp=P2;
	 if（（temp&0xf0）!=0xf0）
	 {
	 	delay（10）;
		temp=P2;
		if（（temp&0xf0）!=0xf0）
		{
			//temp=P2;
			 switch（temp）
			 {
			 	case 0xe7:num=12;break;
				case 0xd7:num=13;break;
				case 0xb7:num=14;break;
				case 0x77:num=15;break;
			 }
			 while（temp!=0xf0）
			 {
			 	temp=P2;
				temp=temp&0xf0;
			 }
		 P1=num;
		}
	 }
}

void main（）
{
	P1=0;
	while（1）
	{
		scan（）;
	}
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       6376  2008-09-23 09:16  矩阵键盘\STARTUP.A51

     文件        581  2009-08-22 20:56  矩阵键盘\key.plg

     文件       1661  2009-08-22 13:52  矩阵键盘\key.c

     文件      14048  2009-08-22 13:52  矩阵键盘\STARTUP.LST

     文件         39  2009-08-22 13:52  矩阵键盘\key.lnp

     文件       8659  2009-08-22 13:52  矩阵键盘\key.M51

     文件       1156  2009-08-22 13:52  矩阵键盘\key.hex

     文件        758  2009-08-22 13:52  矩阵键盘\STARTUP.OBJ

     文件       6009  2009-08-22 13:52  矩阵键盘\key.LST

     文件       4271  2009-08-22 13:52  矩阵键盘\key.OBJ

     文件       4155  2009-08-22 13:52  矩阵键盘\key

     文件        742  2009-08-22 13:53  矩阵键盘\矩阵键盘.PWI

     文件      96268  2009-08-22 13:51  矩阵键盘\Last Loaded 矩阵键盘.DBK

     文件      96243  2009-08-22 13:53  矩阵键盘\矩阵键盘.DSN

     文件       2172  2009-08-22 20:56  矩阵键盘\key.Uv2

     文件       1030  2009-08-22 20:56  矩阵键盘\key.Opt

     目录          0  2009-08-22 13:50  矩阵键盘

----------- ---------  ---------- -----  ----

               244168                    17