4-4.txt

来自「在单片机应用设计中」· 文本 代码 · 共 128 行

///键盘扫描程序////
keyscan()
{
  uchar h,n,m;
  P1=0xf0;
  if((P1&0Xf0)!=0Xf0)
    { Delay1ms(2);
	  if((P1&0Xf0)!=0Xf0)
	  {  
	  h=P1;
		h=h&0xf0;
	  }
	}
	  P1=0x0f;
   if((P1&0x0f)!=0x0f)
     {Delay1ms(2);
	  if((P1&0x0f)!=0x0f)
	  {
	   n=P1;
	   n=n&0x0f;
	  }
	 }
   m=n|h;
  return(m);
  }

///////////////////////////////////////////
        switch(p)
	{
		case 0x77:
		{	
		 GotoXY(0,1);
		Print("0");
		break;
		}

        case 0x7b:
		{	GotoXY(0,1);
		Print("1");
		break;
		}

	    case 0x7d:
		{	GotoXY(0,1);
		Print("2");
		break;
		}

		case 0x7e:
		{	GotoXY(0,1);
		Print("3");
		break;
		}

		case 0xb7:
		{	GotoXY(0,1);
		Print("4");
		break;
		}

		case 0xbb:
		{	GotoXY(0,1);
		Print("5");
		break;
		}

           case 0x00bd:
	   {	GotoXY(0,1);
		Print(&T[6]);
		break;
		}

		case 0x00be:
	   {	GotoXY(0,1);
		Print(&T[7]);
		break;
		}

		case 0x00d7:
	    {	GotoXY(0,1);
		Print(&T[8]);
		break;
		}

		case 0x00db:
		{	GotoXY(0,1);
		Print(&T[9]);
		break;
		}

		case 0x00dd:
		{	GotoXY(0,1);
		Print(&T[10]);
		break;
		}

		case 0x00de:
	    {	GotoXY(0,1);
		Print(&T[11]);
		break;
		}

		case 0x00e7:
		{	GotoXY(0,1);
		Print(&T[12]);
		break;
		}

		case 0x00eb:
	        { GotoXY(0,1);
		Print(&T[13]);
		break;
		}

		case 0x00ed:
		{	GotoXY(0,1);
		Print(&T[14]);
		break;
		}


		case 0x00ee:
		{
			GotoXY(0,1);
		Print(&T[15]);
		break;
		}
	}