#include<reg51.h>

#define uchar unsigned char
#define uint  unsigned int
uint z,num,numduan,temp,middle;
uint left=0,right=0,flag=0;

uchar code tableduan[]={       //鍵盤表
0x3f,0x06,0x5b,0x4f,
0x66,0x6d,0x7d,0x07,
0x7f,0x6f,0x77,0x7c,
0x39,0x5e,0x79,0x71};

uchar jianpan();
void init();
void sent(uchar aa);
void delay(uint z);
void display1(uchar dis);
void display2(uchar dis2);

void main()
{  init();
  while(1)
  {   middle =jianpan();
     if (flag==1)
      {  flag=0;

	if(middle<4)
	  right=right+middle;
	 else if (middle==4)
            right=right-1;
          else if (middle==8)
            left=left-1; 
            else
	    left=left+middle%4;
            
         sent(left);
         sent(right); 
       }
       
       
     
     display1(left);
     display2(right);
    }
}

void init()
{
  SM0=0;
   SM1=1;
   REN=1;
   TMOD=0x20;
   TH1=0xfd;
   TL1=0xfd;
   TR1=1;
   TI=0;

 }


void display1(uchar dis)
{  uchar ge,shi;
    shi=dis/10;
	ge=dis%10;

    P0=tableduan[ge];
    P2=0xfe;
   delay(1);
	P0=tableduan[shi];
	P2=0xfd;
	delay(1);
}

void display2(uchar dis2)
{
    uchar shi2,ge2;
    shi2=dis2/10;
	ge2=dis2%10;

    P0=tableduan[ge2];
    P2=0xfb;
    delay(1);
	P0=tableduan[shi2];
	P2=0xf7;
	delay(1);
}


 void sent(uchar aa)
{
   SBUF=aa;
   while(1)
     {
     if(TI)
        {TI=0;
         break;
        }
      }
}



void delay(uint z)

  {
       uint x,y;
     for(x=z;x>0;x--)
       for(y=120;y>0;y--);
   }


uchar jianpan( )
    {

           P1=0xfe;
           temp=P1;
           temp=temp&0xf0;

           if(temp!=0xf0)

	            {
	               delay(5);
	               temp=P1;
	               temp=temp&0xf0;
	               if(temp!=0xf0)
		                {
		                  temp=P1;
		                switch(temp)
			                  {
			                     case 0xee: num=1; break;
					 case 0xde: num=2; break;
				   	 case 0xbe: num=3; break;
					 case 0x7e: num=4; break;
			                  }
		                }
	                while(temp!=0xf0)                   //松手檢測
		                 {
		                     temp=P1;
		                     temp=temp&0xf0;

		                  }
                                  flag=1;
	             }



//-------------------------------------------
       P1=0xfd;
           temp=P1;
           temp=temp&0xf0;

           if(temp!=0xf0)

	            {
	               delay(5);
	               temp=P1;
	               temp=temp&0xf0;
	               if(temp!=0xf0)
		                {
		                  temp=P1;
		                switch(temp)
			                  {
			                     case 0xed: num=5; break;
					     case 0xdd: num=6; break;
					     case 0xbd: num=7; break;
					     case 0x7d: num=8; break;
			                  }
		                }
	                while(temp!=0xf0)                   //松手檢測
		                 {
		                     temp=P1;
		                     temp=temp&0xf0;

		                  }
                                   flag=1;
	             }


//-------------------------------------------
        P1=0xfb;
        temp=P1;
        temp=temp&0xf0;

         if(temp!=0xf0)

           {
                delay(5);
               temp=P1;
               temp=temp&0xf0;
               if(temp!=0xf0)
                {
                  temp=P1;
                switch(temp)
                  {
                     case 0xeb: num=9; break;
		 case 0xdb: num=10; break;
		 case 0xbb: num=11; break;
		 case 0x7b: num=12; break;
                  }
                }
                    while(temp!=0xf0)                   //松手檢測
	                 {
	                     temp=P1;
	                     temp=temp&0xf0;

	                  }
                           flag=1;
             }


//-----------------------------------------------
        P1=0xf7;
        temp=P1;
        temp=temp&0xf0;

         if(temp!=0xf0)

           {
               delay(5);
               temp=P1;
               temp=temp&0xf0;
               if(temp!=0xf0)
                {
                  temp=P1;
                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=P1;
	                     temp=temp&0xf0;

	                  }
                           flag=1;
             }

   return num;
 }