//----------------------------------------------------------------------
/*EASTRISING TECHNOLOGY CO,.LTD.*/
// Module    : ERM1602-5 SEIES
// Lanuage   : C51 Code
// Create    : JAVEN
// Date      : Dec-19-2018
// Drive IC  : ST7070
// INTERFACE : 4LINE SPI
// MCU 	: STC89C52
// VDD		 : 5V
//----------------------------------------------------------------------

#include <reg51.h>
#include <intrins.h>

#define	uchar	unsigned char
#define	uint	unsigned int


sbit 	CS=P2^0;
sbit 	SCL=P2^1;
sbit 	SDA=P2^2;
sbit    RS=P2^3;
sbit    RST=P2^4;
bit 	log=0;
sbit	int0=P3^2;


void LCD_initialize(void);
void Write_CGRAM(uchar  a[]);
void Write_LCM(uchar dat);
void Busy(void);
void Delay(uint n);
void Delay1(uint n);
void Write_DDRAM(uchar a);
void write_CGROM(uchar a);
void shaw_character_string(uchar a[]);


uchar code character_string[]=
{
	   "*buydisplay.com*"
	   "EastRisingTechno"
};

uchar code font[]=
{
	0x1f,0x00,0x1f,0x00,0x1f,0x00,0x1f,0x00,
	0x00,0x1f,0x00,0x1f,0x00,0x1f,0x00,0x1f,
	0x15,0x15,0x15,0x15,0x15,0x15,0x15,0x15,
	0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,
	0x08,0x0f,0x12,0x0f,0x0a,0x1f,0x02,0x02,	//Äê
	0x0f,0x09,0x0f,0x09,0x0f,0x09,0x09,0x13,	//ÔÂ
	0x1f,0x11,0x11,0x1f,0x11,0x11,0x11,0x1F,	//ÈÕ
	0x0C,0x0a,0x11,0x1f,0x09,0x09,0x09,0x13,	//·Ö
};



void Step(void) interrupt 0 using 0
{
	Delay1(500);
	if(int0==0)	log=!log;
   while(!int0);
  return;

}


void Delay1(uint n)
{while(n--);
   
}

void Delay(uint n)
{while(n)
 { 
	  n--;
 }
 	for(;log==1;)
	{

	}

}


void Write_Instruction(unsigned char cmd)
{
  unsigned int j;
     CS=0;
     RS=0;

  for(j=0;j<8;j++)
    {
	if (cmd&0x80)
    SDA=1;
    else
    SDA=0; 
    SCL=0;
    cmd=cmd<<1;
    SCL=1;      
     }
  CS=1;
}


/*******************************************************************************
* Function Name  : Write_Data
* Description    : Write Data
* Input          : dat
* Output         : None
* Return         : None
*******************************************************************************/
void Write_Data(unsigned char  dat)
{
  unsigned int j;
     CS=0;
     RS=1;

  for(j=0;j<8;j++)
    {
	if (dat&0x80)
    SDA=1;
    else
    SDA=0; 
    SCL=0;
    dat=dat<<1;
    SCL=1;      
     }
  CS=1;
}




void Write_CGRAM(uchar  a[])
{uchar i=64,k;
	Write_Instruction(0x40);	//CGRAM ADDRESS
		Delay1(40);	

	for(k=0;k<64;k++)
	{Write_Data(a[k]);
	}
}

void LCD_initialize(void)
{  
/*	RST=0;		
	Delay1(10000);
	RST=1;		
	Delay1(10000);
*/	
	Write_Instruction(0x38);//FUNCTION SET#1, EXT=0
    Delay1(40);			
	Write_Instruction(0x0c); //DISPLAY ON 
	Delay(40);			
	 Write_Instruction(0x01);//DISPLAY CLEAR
	Delay1(2000);			
	 Write_Instruction(0x06);//ENTRY MODE SET
	Delay1(40);	
				
	 Write_CGRAM(font);

}

void Write_DDRAM(uchar a)
{uchar j;

	Write_Instruction(0x80);//1ST LINE ADDRESS
	Delay1(40);
	
	for(j=0;j<16;j++)
	{Write_Data(a);
	}

 	Write_Instruction(0xc0);//2ST LINE ADDRESS
	Delay1(40);	


	for(j=0;j<16;j++)
	{Write_Data(a);
	}
		Delay(35000);
		Delay(65000);

}


void write_CGROM(uchar a)
{uchar j;
 	Write_Instruction(0x80);//1ST LINE ADDRESS
	Delay1(40);
 	for(j=0;j<16;j++)
	{Write_Data(a);a+=1;
	}
 	Write_Instruction(0xc0);//2ST LINE ADDRESS
	Delay1(40);
	
	for(j=0;j<16;j++)
	{Write_Data(a);a+=1;
	}
		Delay(35000);
		Delay(65000);

}

void shaw_character_string(uchar a[])
{uchar j;
 	Write_Instruction(0x80);//1ST LINE ADDRESS
	Delay1(40);	
 	for(j=0;j<16;j++)
	{Write_Data(a[j]);
	}
 	Write_Instruction(0xc0);//2ST LINE ADDRESS
	Delay1(40);
	
 	for(j=16;j<32;j++)
	{Write_Data(a[j]);
	}
		Delay(35000);
		Delay(65000);

}


void main(void)
{	IE=0x81;
	IP=0x01;
	TCON=0x01;
	int0=1;
	P1=0xff;
	P2=0xff;
	Delay(50000);
    
	LCD_initialize();
while(1)

	{
	
 	Write_Instruction(0x3c);//FUNCTION SET#2, EXT=1
	Delay1(40);
 	Write_Instruction(0x40);  //SEG,COM direction  
	Delay1(40);
 	Write_Instruction(0x38);//FUNCTION SET#2, EXT=1
	Delay1(40);

	Write_DDRAM(0xff);	
	Write_Instruction(0x01);
	Delay(35000);
	shaw_character_string(character_string);
	Write_DDRAM(0);	
	Write_DDRAM(1);
	Write_DDRAM(2);
	Write_DDRAM(3);
	write_CGROM(0xA0);
	Write_DDRAM(4);	
	Write_DDRAM(5);
	Write_DDRAM(6);
	Write_DDRAM(7);

 	Write_Instruction(0x3c);//FUNCTION SET#2, EXT=1
	Delay1(40);
 	Write_Instruction(0x4F);  //SEG,COM direction
	Delay1(40);
 	Write_Instruction(0x38);//FUNCTION SET#2, EXT=1
	Delay1(40);


	Write_DDRAM(0xff);	
	Write_Instruction(0x01);
	Delay(35000);
//	shaw_character_string(character_string);
	Write_DDRAM(0);	
	Write_DDRAM(1);
	Write_DDRAM(2);
	Write_DDRAM(3);
	write_CGROM(0xA0);
	Write_DDRAM(4);	
	Write_DDRAM(5);
	Write_DDRAM(6);
	Write_DDRAM(7);

	}
}