/*****************************************************/
/*
C0216CiZ.c
Program for writing to Newhaven Display Character COG - I2C interface

(c)2010 Curt Lagerstam - Newhaven Display International, LLC. 

 	This program is free software; you can redistribute it and/or modify
	it under the terms of the GNU General Public License as published by
	the Free Software Foundation; either version 2 of the License, or
	(at your option) any later version.

	This program is distributed in the hope that it will be useful,
	but WITHOUT ANY WARRANTY; without even the implied warranty of
	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
	GNU General Public License for more details.
*/
/*****************************************************/
#include <REG52.H>
/*****************************************************/
code char text1[]={
"NEWHAVEN Display"};
code char text2[]={
"2x16 LCD Module "};
code char text3[]={
0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f};
code char text4[]={
0x10,0x11,0x12,0x13,0x14,0x15,0x16,0x17,0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f};
/*****************************************************/
sbit SDA = P1^0;						//Serial data
sbit SCL = P3^4;						//Serial clock
//sbit XRESET = HIGH;						//RESET
/*****************************************************/
const char Slave = 0x7C;
const char Comsend = 0x00;
const char Datasend = 0x40;
const char Line2 = 0xC0;
/*****************************************************/
void delay(unsigned int n)				//Delay subroutine
{
	unsigned int i,j;
	for (i=0;i<n;i++)
  		for (j=0;j<350;j++)
  			{;}
}
/*****************************************************/
void I2C_out(unsigned char j) 			//I2C Output
{
	int n;
	unsigned char d;
	d=j;
	for(n=0;n<8;n++){
		if((d&0x80)==0x80)
		SDA=1;
		else
		SDA=0;
		d=(d<<1);
		SCL = 0;
		SCL = 1;
		SCL = 0;
		}
	SCL = 1;
	while(SDA==1){
		SCL=0;
		SCL=1;
		}
	SCL=0;
}
/*****************************************************/
void I2C_Start(void)
{
	SCL=1;
	SDA=1;
	SDA=0;
	SCL=0;
}
/*****************************************************/
void I2C_Stop(void)
{
	SDA=0;
	SCL=0;
	SCL=1;
	SDA=1;
}
/*****************************************************/
void Show(unsigned char *text)
{
	int n, d;
	d=0x00;
	I2C_Start();
	I2C_out(Slave);
	I2C_out(Datasend);
	for(n=0;n<16;n++){
		I2C_out(*text);
		++text;
		}
	I2C_Stop();
}
/*****************************************************/
void nextline(void)
{
	I2C_Start();
	I2C_out(Slave);
	I2C_out(Comsend);
	I2C_out(Line2);
	I2C_Stop();
}
void CGRAM (void)
{
 	I2C_Start();
	I2C_out(Slave);
	I2C_out(Comsend);
	I2C_out(0x38);		//go to instructino table 0
	I2C_out(0x40);		//Set CGRAM address to 0x00
	I2C_Stop();
	delay(10);
	
	I2C_Start();
	I2C_out(Slave);
	I2C_out(Datasend);
	I2C_out(0x00);		//write to first CGRAM address
	I2C_out(0x1E);
	I2C_out(0x18);
	I2C_out(0x14);
	I2C_out(0x12);
	I2C_out(0x01);
	I2C_out(0x00);
	I2C_out(0x00);		//8 bytes per character
	//continue writing to remaining CGRAM if desired
	I2C_Stop();
}
/****************************************************
*           Initialization For ST7032i              *
*****************************************************/
void init_LCD() 
{
I2C_Start();
I2C_out(Slave);
I2C_out(Comsend);
I2C_out(0x38);
delay(10);
I2C_out(0x39);
delay(10);
I2C_out(0x14);
I2C_out(0x78);
I2C_out(0x5E);
I2C_out(0x6D);
I2C_out(0x0C);
I2C_out(0x01);
I2C_out(0x06);
delay(10);
I2C_stop();

CGRAM();			//define CGRAM

I2C_Start();
I2C_out(Slave);
I2C_out(Comsend);
I2C_out(0x39);		
I2C_out(0x01);		//go back Home
I2C_Stop();
delay(10);
}
/*****************************************************/
/*****************************************************/
int main(void)
{
P1 = 0;
P3 = 0;
while(1) 								//continue 
{
	init_LCD();
	delay(2);
	Show(text1);
	nextline();
	Show(text2);
	delay(2500);

   	init_LCD();
	Show(text3);//first 16chars in font table(should show CGRAM chars two times)
	nextline();
	Show(text4);
	delay(3000);		
}
}