#include<reg52.h>
   
sfr scon=0x98;
sfr tmod=0x89;
sfr pcon=0x97;
sfr sbuf=0x99;
sfr p0=0x80; 
sfr p1=0x90;
sfr p2=0xA0;
 
sbit p00=p0^0;
sbit p01=p0^1;
sbit p02=p0^2;
sbit p03=p0^3;
sbit p04=p0^4;
sbit p05=p0^5;
sbit p06=p0^6;
sbit p07=p0^7;
sbit p10=p1^0;
sbit p11=p1^1;
sbit p12=p1^2;
sbit p13=p1^3;
sbit p14=p1^4;
sbit p15=p1^5;
sbit p16=p1^6;
sbit p17=p1^7;
sbit p20=p2^0;
sbit p21=p2^1;
sbit p22=p2^2;
sbit p23=p2^3;
sbit p24=p2^4;
sbit p25=p2^5;
sbit p26=p2^6;
sbit p27=p2^7;

void main(void)
{ unsigned char temp;
    
   tmod=0x20;
   TL1=0xfd; TH1=0xfd;
   scon=0xd8;pcon=0x00;
  
   TR1=1;

        while(1)
        { while(RI==0);
           temp=sbuf;
           RI=0;
            switch(temp)
             { 
               case'A':
                  p00=1;
                   break;
               case'B':
                  p01=1;
                    break;
               case'C':
                  p02=1;
                    break;
               case'D':
                  p03=1;
                  break;
               case'E':
                  p04=1;
                  break;
               case'F':
                  p05=1;
                  break;
               case'G':
                  p06=1;
                  break; 
               case'H':   
                  p07=1;
                  break;
               case'I':
                  p10=1;
                  break; 
               case'J':
                  p11=1;
                  break;
               case'K':
                  p12=1;
                  break;
               case'L':
                  p13=1;
                  break;
               case'M':
                  p14=1;
                  break;
               case'N':
                  p15=1;
                  break;
               case'O':
                  p16=1;
                  break;
               case'P':
                  p17=1;
                  break;
               case'Q':
                  p20=1;
                  break;
               case'R':
                  p21=1;
                  break;
               case'S':
                  p22=1;
                  break;
               case'T':
                  p23=1;
                  break;
               case'U':
                  p24=1;
                  break;  
               case'V':
                  p25=1;
                  break;
               case'W':
                  p26=1;
                  break;
               case'X':
                  p27=1;
                  break;

               case'a':
                  p00=0;
                   break;
               case'b':
                  p01=0;
                    break;
               case'c':
                  p02=0;
                    break;
               case'd':
                  p03=0;
                  break;
               case'e':
                  p04=0;
                  break;
               case'f':
                  p05=0;
                  break;
               case'g':
                  p06=0;
                  break; 
               case'h':   
                  p07=0;
                  break;
               case'i':
                  p10=0;
                  break; 
               case'j':
                  p11=0;
                  break;
               case'k':
                  p12=0;
                  break;
               case'l':
                  p13=0;
                  break;
               case'm':
                  p14=0;
                  break;
               case'n':
                  p15=0;
                  break;
               case'o':
                  p16=0;
                  break;
               case'p':
                  p17=0;
                  break;
               case'q':
                  p20=0;
                  break;
               case'r':
                  p21=0;
                  break;
               case's':
                  p22=0;
                  break;
               case't':
                  p23=0;
                  break;
               case'u':
                  p24=0;
                  break;  
               case'v':
                  p25=0;
                  break;
               case'w':
                  p26=0;
                  break;
               case'x':
                  p27=0;
                  break;
             }
     }
 }