#include "LCD.h"

void Delay1mS(void);
void Delay15mS(void);
void Delay5mS(void);
void Delay200uS(void);
void PulseE(void);
void SendCommand1(byte);
void SendCharacter(char);

byte Swap(byte);

//Sends a byte command to the HD44780 display.
void SendCommand(byte command)
{



	Delay15mS();
	command = 0;

}


//Swaps nibbles of byte
byte Swap(byte command)
{
	byte temp = command <<4;
	temp |= command >>4;

	return temp;
	
}

//Initialises the display
void OpenLCD(void)
{

	
	//Make port outputs
	LCDPORT = 0;
	LCDTRIS = 0;

	//Wait for display
	Delay15mS();
	
	//Send 0x03
	SendCommand1(0x20);
	SendCommand1(0x28);
	SendCommand1(0x06);
	SendCommand1(0x0c);
	SendCommand1(0x01);
	
	SendCharacter('a');
	
	


	
}

void SendCommand1(byte command)
{



	LCDTRIS &= 0x0F;
	LCDPORT &= 0x0F;

	//Swap nibbles
	
	LCDPORT |= command;
	//LCDPORT |= command & 0xF0;
	PulseE();
	
	Delay15mS();
	
}



void SendCharacter(char character)
{
	LCDPORT =0;
	LCD_RS  =1;
	LCDPORT |= character & 0xF0; 
	PulseE();
	LCDPORT |= Swap(character) & 0xF0;
	PulseE();
	Delay15mS();
	
}




void PulseE(void)
{
	LCD_E = 1;
	Delay200uS();
	LCD_E = 0;
	Delay1mS();
}

/*

Pin definitions and macros
Chris Dec 07

*/

#include <P18F4550.h>

//Power check pins
#define PIN_SELFPOWER PORTBbits.RB5
#define PIN_USBPOWER PORTDbits.RD3

//Switch pins
#define PIN_SWITCH1 PORTBbits.RB4
#define PIN_SWITCH2 PORTBbits.RB3


//LED pins
#define PIN_LED1 LATBbits.LATB2
#define PIN_LED2 LATBbits.LATB1
#define PIN_ONLED LATBbits.LATB0

//Piezo pins
#define PIN_PIEZO1 LATCbits.LATC0
#define PIN_PIEZO2 LATCbits.LATC1
//LM35
#define PIN_LM35 PORTEbits.RE1

//LCD pins - bit 3 is not used for LCD and should not be manipulated
#define PIN_BACKLIGHT LATCbits.LATC6
#define LCDPORT PORTD
#define LCDTRIS TRISD
#define LCD_RS PORTDbits.RD0
#define LCD_RW PORTDbits.RD1
#define LCD_E PORTDbits.RD2


//Macros
#define ScreenOn() PIN_BACKLIGHT = 1;
#define ScreenOff() PIN_BACKLIGHT = 0;

;LCD_Write_Acc
;Write acc value to LCD in two consequtive writes
;
LCD_Write_Acc:	push	acc		;Store acc for later
		orl	LCD_Data,#0F0h	;Send high nibble
		orl	a,#00Fh
		anl	LCD_Data,a
		setb	LCD_EN
		clr	LCD_EN
		pop	acc		;Send low nibble
		swap	a
		orl	LCD_Data,#0F0h
		orl	a,#00Fh
		anl	LCD_Data,a
		setb	LCD_EN
		clr	LCD_EN
		RET			;END LCD_Write_Acc

/*
	Lcd functions

*/

#include "LCD.h"

void Delay1mS(void);
void Delay15mS(void);
void Delay5mS(void);
void Delay200uS(void);


void PulseE(void);
void SendCommand(byte);
void SendCharacter(char);
void SendCmdNibble(byte);
int  LCDBusy(void);

void SendLCD(byte);

byte Swap(byte);



//Swaps nibbles of byte
byte Swap(byte command)
{
	byte temp = command <<4;
	temp |= command >>4;

	return temp;
	
}

//Initialises the display
void OpenLCD(void)
{


	//Make port outputs
	LCDPORT = 0;
	LCDTRIS = 0x08; //All outputs except for pin3 which is USb bus sense

	//Wait for display
	Delay15mS();
	Delay15mS();
	PIN_LED1 =1;
	PIN_LED2 = 0;

	//Send 0x03
	SendCmdNibble(0x03);
	SendCmdNibble(0x03);
	SendCmdNibble(0x03);
	
	SendCmdNibble(0x02);
	SendCommand(0x23);
	SendCommand(0x08);

	SendCommand(0x01);
	

	SendCommand(0x06);

	PIN_LED1 =0;
	PIN_LED2 = 1;



	
	while (LCDBusy())
	
	
	PIN_LED1 =0;
	PIN_LED2 = 0;
	


	
}

void SendCmdNibble(byte command)
{
	LCD_RS = 0;
	LCDPORT &= 0x0F; //Discard high nibble (data)
	LCDPORT |= Swap(command) & 0xF0;	//Set high nibble to port (
	PulseE();
	Delay15mS();
}

int LCDBusy(void)
{
	int result=0;
	LCD_BUSY = 0;//reset busy pin
	LCD_TRIS_BUSY = 1; //set pin to input

	LCD_RS = 0;
	LCD_RW = 1;

	result = (LCDPORT & 0x80) ? 1: 0;
	
	LCD_TRIS_BUSY = 0; //Set pin to output
	
	return result;
		
	
}

void SendCommand(byte command)
{
	//setup to send command
	LCD_RS = 0;
	//send command
	SendLCD(command);
}

//Sends a character to the LCD
void SendCharacter(char chr)
{
	LCD_RS = 1;//Setup to send character
	//Send character
	SendLCD((byte) chr );
}

//Sends message/command to lcd. Requires the RS line to be set appropriately
void SendLCD(byte message)
{
		
	//Send high nibble first
	LCDPORT |= message & 0xF0;
	
	PulseE();
	
	LCDPORT &= 0x0F;//clear data pins, but leave control pins alone
	LCDPORT |= (Swap(message & 0x0F)); //swap nibbles and discard old high nibble
	
	PulseE();
	Delay15mS();
	
}








void PulseE(void)
{
	LCD_E = 1;
	LCD_E = 0;
	Delay1mS();
}

	SendCmdNibble(0x03);
	SendCmdNibble(0x03);
	SendCmdNibble(0x03);
	
	SendCmdNibble(0x02);

LCD_RS = 0
SendLCD(0x30);
Delay15mS();
SendLCD(0x30);
Delay15mS();
SendLCD(0x30);
Delay15mS();
SendLCD(0x20);
Delay15mS();