sbit D=P1;		  
sbit D0=P1^0;
sbit D1=P1^1;
sbit D2=P1^2;
sbit D3=P1^3;

sbit IRQ=P1^4;
sbit CK=P3^5;
sbit RS=P3^6;
sbit RW=P3^7;

extern void rst8880();
extern void snt8880(unsigned char x);

void rst8880()
{RS=1;RW=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=0;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=0;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=0;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=0;D1=0;D2=0;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=0;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=1;RW=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=0;D1=0;D2=1;D3=0;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}


 rd8880(char x)
{

  //RS=0;RW=1;CK=1;delay(10);CK=0;
RS=0;RW=1;x=D; CK=1;delay(10);CK=0;return x;	}




 	
void snt8880(char x)
{	
if (x==48){
RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=0;D1=1;D2=0;D3=1;CK=1;delay(10);CK=0;delay(5000);
 RS=1;RW=0;D0=0;D1=1;D2=0;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==49)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;delay(5000);
 RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==50)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=0;D1=1;D2=0;D3=0;CK=1;delay(10);CK=0;delay(5000);
 RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==51)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=1;D1=1;D2=0;D3=0;CK=1;delay(10);CK=0;delay(5000);
 RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==52)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=0;D1=0;D2=1;D3=0;CK=1;delay(10);CK=0;delay(5000);
 RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==53)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=1;D1=0;D2=1;D3=0;CK=1;delay(10);CK=0;delay(5000);
 RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==54)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=0;D1=1;D2=1;D3=0;CK=1;delay(10);CK=0;delay(5000);
 RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==55)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=1;D1=1;D2=1;D3=0;CK=1;delay(10);CK=0;delay(5000);
 RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==56)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=0;D1=0;D2=0;D3=1;CK=1;delay(10);CK=0;delay(5000);
RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==57)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=1;D1=0;D2=0;D3=1;CK=1;delay(10);CK=0;delay(5000);
 RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}else if (x==42)
{RS=1;RW=0;D0=1;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
RS=0;RW=0;D0=1;D1=1;D2=0;D3=1;CK=1;delay(10);CK=0;delay(5000);
RS=1;RW=0;D0=0;D1=0;D2=1;D3=1;CK=1;delay(10);CK=0;
RS=1;RW=0;D0=1;D1=0;D2=0;D3=0;CK=1;delay(10);CK=0;
}i=i+1;delay(5000);} 
 
 

	
void snts8880(char *aaa){
unsigned int i=0;
for(;aaa[i]!=0;i++)snt8880(aaa[i]);
}