void delay_s(volatile long);
void setup() {
  // put your setup code here, to run once:
  volatile char *dirf,*dirk,*outk,*inf,x;
  dirf=0x30;inf=0x2f,dirk=0x107,outk=0x108;
  *dirf=0x00,*dirk=0xFF;
  volatile long i,j;
  while(1)
  {
    x=*inf;
    if((x&0x01)==0x01){
      *outk=x;
      if((x&0x08)==0x08){
        *outk=x;
        if((x&0x40)==0x40){
          *outk=x;
          if((x&0x20)==0x20){
            *outk=0x80;
            delay_s(10); 
          }
        }
      }}
    
    
    else
    {
      *outk=0x00;
      x=0x00;
  }
  }
}
void delay_s(volatile long i)
{
  volatile long j,k;
  for(j=0;j<i;j++)
    for(k=0;k<457142;k++);
}