#include <ADUC814.H>
/*cs=p1.5	wr=p1.3		data=p1.2*/
sbit p1_5=P1^5;
sbit p1_3=P1^3;
sbit p1_2=P1^2;

void timedelay(unsigned int time);
void wrcom(unsigned int *p);
void wrdd(unsigned int *p);
void wrda(unsigned int *p);
void walp(unsigned int *p);


unsigned int command;
unsigned int lcdaddr;
unsigned int lcdaddrtemp;
unsigned int lcddata;
unsigned int lcddatatemp;


void main(void) 
{
unsigned int *p;
p=&command;
P1=0xff;	timedelay(500);
*p=0x29;	wrcom(p);	//initialize
*p=0x18;	wrcom(p);	//rc
*p=0x18;	wrcom(p);	//sys en
*p=0x03;	wrcom(p);	//lcd on 
lcdaddr=0x00;	lcdaddrtemp=lcdaddr;
p=&lcdaddr;		wrdd(p);
lcddata=0x00;	lcddatatemp=lcddata;
p=&lcddata;		wrda(p);	walp(p);

}

void wrcom(unsigned int *p)
{	unsigned char i;
	p1_5=1;	timedelay(5);	p1_5=0;	timedelay(5);
	p1_3=0;	timedelay(5);	p1_2=1;	timedelay(5);
	p1_3=1;	timedelay(5);	p1_3=1;	timedelay(5);	
	p1_2=0;	timedelay(5);	p1_3=1;	timedelay(5);
	p1_3=0;	timedelay(5);	p1_2=0;	timedelay(5);
	p1_3=1;	timedelay(5);
	CY=0;
	for(i=9;i>0;i--)
	{timedelay(5);
	 p1_3=0;timedelay(5);
	 if(*p&0x80)	{p1_2=1;timedelay(5);}	
	 else 		{p1_2=0;timedelay(5);}
	 p1_3=0;timedelay(5);
	 *p=(*p)<<1;	
	}
}

void wrdd(unsigned int *p)
{	unsigned char i;
	p1_5=1;	timedelay(5);	p1_5=0;	timedelay(5);
	p1_3=0;	timedelay(5);	p1_2=1;	timedelay(5);
	p1_3=1;	timedelay(5);	p1_3=1;	timedelay(5);	
	p1_2=0;	timedelay(5);	p1_3=1;	timedelay(5);
	p1_3=0;	timedelay(5);	p1_2=1;	timedelay(5);
	p1_3=1;	timedelay(5);
	for(i=9;i>0;i--)
	{timedelay(5);
	 p1_3=0;timedelay(5);
	 if(*p&0x80)	{timedelay(5);p1_2=1;timedelay(5);}	
	 else 		{p1_2=0;timedelay(5);}
	 timedelay(5);p1_3=1;timedelay(5);
	 *p=(*p)<<1;	
	}
}

void wrda(unsigned int *p)
{
	unsigned char i;
	for(i=4;i>0;i--)
		{timedelay(5);	p1_3=0;	timedelay(5);
		 if(*p&0x01)	{timedelay(5);p1_2=1;timedelay(5);}	
	 	 else 		{p1_2=0;timedelay(5);}
	 	 timedelay(5);p1_3=1;timedelay(5);
	 	 *p=(*p)>>1;	
		}
}
void walp(unsigned int *p)
{
unsigned char i;
for(i=0;i<32;i++)
{wrdd();
wrda();}
}

void timedelay(unsigned int time)
{
}