/*****************************************************/
/*
NHD-1-8-128160ZF.c
Program for writing to Newhaven Display 1.8" TFT

(c)2009 Curt Lagerstam - Newhaven Display International, Inc. 

 	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>
#include "picture.h"
/*****************************************************/ 
sbit CS = P3^0;							//Chip select
sbit RS = P3^7;							//Data/Instruction Register select
sbit WR1 = P3^4;						//Write
sbit RD1 = P3^6;						//Read
sbit RESET = P3^1;						//Reset
/*****************************************************/
void delay(unsigned int n)				//Delay subroutine
{
	unsigned int i,j;
	for (i=0;i<n;i++)
  		for (j=0;j<350;j++)
  			{;}
}
/*****************************************************/
void data_out(unsigned char i) //Data Output 8-bit Bus Interface
{
	RS  = 1;							//Data register
	RD1  = 1;							//Read disable
	WR1  = 0;							//Write enable
	P1  = i;							//put byte on port 1
	//nop
	WR1  = 1;							//Clock in data
}
void comm_out(unsigned char j) //Command Output 8-bit Bus Interface
{
	RS  = 0;							//Instruction register
	RD1  = 1;							//Read disable
	WR1  = 0;							//Write enable
	P1 = j;								//put byte on port 1
	//nop
	WR1  = 1;							//Clock in data
}

/*****************************************************/
void Fulldisplay(unsigned char d1,unsigned char d2)//Fill display with RGB color
{
	int i,j;
	RS = 1;	 							//Data register
	for(i=0;i<160;i++)				    //160 lines
    {
       for(j=0;j<128;j++)				//128pixels/line
          {
		  		P1 = d1;				//high 8bits
           	  	WR1 = 0;
				//nop
				WR1 = 1;				//clock in data
				P1 = d2;				//low 8 bits
           	  	WR1 = 0;
				//nop
				WR1 = 1;				//clock in data
          }
    }
}
/*****************************************************/
void dispPic(unsigned char *lcd_string)	//show 16bpp bitmap, 128x107pixels
{
	int i,j;
	RS = 1;	 							//Data register

    for(i=0;i<26;i++)  					//MAY REMOVE THIS LOOP - write 26 lines of black pixels
    {
       for(j=0;j<256;j++) 				//256bytes = 128pixels/line
          {
           	  	P1 = 0x00;
				WR1 = 0;
				//nop
				WR1 = 1;
          }
    }
	for(i=0;i<107;i++)	  				//MAY CHANGE TO i<160 - write 107 lines of picture data
   		{
		lcd_string += (112);			//MAY REMOVE - 
										//my picture data is for 240pixels/line, skip first 56bytes
     		for(j=0;j<128;j++)		   	//Write 128pixels/line
      			{
						P1 = *lcd_string;//put high 8bits on port 1
						WR1 = 0;
						//nop		
						WR1 = 1;		//Clock in data
						P1 = *(++lcd_string);//put low 8bits on port 1
						WR1 = 0;
						//nop		
						WR1 = 1;		//Clock in data
						lcd_string++;	//point to next byte of picture data
    		 	}
		lcd_string += (112);			//MAY REMOVE - 
										//my picture data is for 240pixels/line, skip last 56bytes also
   		}
	for(i=0;i<27;i++)  					//MAY REMOVE THIS LOOP - write 27 lines of black pixels
    {
       for(j=0;j<256;j++) 				//256bytes = 128pixels/line
          {
           	  	P1 = 0x00;
				WR1 = 0;
				//nop
				WR1 = 1;
          }
    }
}
/****************************************************/
void displayQuads()	//split the display into quadrants of different colors
{
	int i,j;
	RS = 1;	 							//Data register
    for(i=0;i<80;i++){					//80 lines tall					
	 for(j=0;j<64;j++){					//64 pixels wide
    	P1 = 0x00;
		WR1 = 0;
		//nop
		WR1 = 1;
		P1 = 0x1F;						//0x00,0x1F = Blue
		WR1 = 0;
		//nop
		WR1 = 1;
    }
	 for(j=0;j<64;j++){	  				//64 pixels wide
    	P1 = 0xF8;
		WR1 = 0;
		//nop
		WR1 = 1;
		P1 = 0x00;						//0xF8,0x00 = Red
		WR1 = 0;
		//nop
		WR1 = 1;
    }
    }
	for(i=0;i<80;i++){					//80 lines tall
	 for(j=0;j<64;j++){					//64 pixels wide
    	P1 = 0xFF;
		WR1 = 0;
		//nop
		WR1 = 1;
		P1 = 0xE0;						//0xFF,0xE0 = Yellow
		WR1 = 0;
		//nop
		WR1 = 1;
    }
	 for(j=0;j<64;j++){				   	//64 pixels wide
    	P1 = 0x07;
		WR1 = 0;
		//nop
		WR1 = 1;
		P1 = 0xE0;						//0x07,0xE0 = Green
		WR1 = 0;
		//nop
		WR1 = 1;
    }
    }
}
/****************************************************
*           Initialization For ILI9163              *
*****************************************************/
void resetLCD()
{
	RESET = 0;
	delay(100);
	RESET = 1;
	delay(100);
}
void init_LCD() 
{
CS = 0;										//Chip Select = Active
comm_out(0x11); 							//exit sleep mode
delay(100);
comm_out(0x26); data_out(0x04);				//set gamma curve 3
comm_out(0xF2); data_out(0x00);				//gamma adjustment enabled
comm_out(0xB1); data_out(0x0A);	data_out(0x14);	//frame rate
comm_out(0xC0); data_out(0x0A);	data_out(0x00);	//power control 1
comm_out(0xC1); data_out(0x02);				//power control 2
comm_out(0xC5); data_out(0x2F);	data_out(0x3E);	//VCOM control 1
comm_out(0xC7); data_out(0x40);				//VCOM offset control
comm_out(0x2A);								//column address set
data_out(0x00);	
data_out(0x00);								//start column 0x0000
data_out(0x00);
data_out(0x7F);								//end column 0x007F = 127
comm_out(0x2B);								//page address set
data_out(0x00);
data_out(0x00);								//start line 0x0000
data_out(0x00);
data_out(0x9F); 							//end line 0x009F = 159
comm_out(0x36); data_out(0xC0);				//Memory access control
comm_out(0x3A); data_out(0xC5);				//Pixel format = 16bit/pixel
comm_out(0x29);								//display on
comm_out(0x2C);				//write to frame memory(begin writing data)
}
/*****************************************************/
/*****************************************************/
/*****************************************************/
/*****************************************************/
/*****************************************************/
/*****************************************************/
int main(void)
{
P1 = 0;
resetLCD();
init_LCD();
while(1) 								//continue 
{
	displayQuads();	   					//color quadrants
	delay(2000);
	Fulldisplay(0xF8,0x00);	  			//Red
	delay(1500);
	Fulldisplay(0x07,0xE0);				//Green
	delay(1500);
	Fulldisplay(0x00,0x1F);				//Blue
	delay(1500);
	Fulldisplay(0xFF,0xFF);				//White
	delay(1500);
	Fulldisplay(0x00,0x00);				//Black
	delay(1500);
	dispPic(picture);		   			//16bpp bitmap
	delay(2000);
}
}