/*
 * clcd.c
 *
 * Created: 2019-07-06 오후 3:07:03
 *  Author: user
 */

#include "clcd.h"
#include "uart.h"

#define F_SCL 100000UL // SCL frequency

#define RS1_EN1   0x05
#define RS1_EN0   0x01
#define RS0_EN1   0x04
#define RS0_EN0   0x00
#define BackLight 0x08

uint8_t I2C_addr_PCF8574 = (0x20 << 1);

/*
RS	0
RW	1
E	2
BT	3
*/

void twi_transmit(uint8_t data)
{
	while(i2c_transmit(I2C_addr_PCF8574, &data, 1));
}

void i2c_lcd_init(void)
{
	i2c_init();
	_delay_ms(2000);

	i2c_lcd_command_8(0x30); _delay_ms(10);
	i2c_lcd_command_8(0x30); _delay_ms(5);
	i2c_lcd_command_8(0x30); _delay_us(100);
	i2c_lcd_command_8(0x20); _delay_us(100);

	printf("Before Initialize... \r\n");
	i2c_lcd_command(0x28); _delay_us(50);	// function set(4-bit, 2 line, 5x7 dot)		i2c_lcd_command(0x0C); _delay_us(50);	// display control(display ON, cursor OFF)
	i2c_lcd_command(0x08); _delay_us(50);	// display control(display ON, cursor OFF)
	i2c_lcd_command(0x01); _delay_ms(3);	// clear display
	i2c_lcd_command(0x06); _delay_us(50);	// entry mode set(increment, not shift)
	i2c_lcd_command(0x0C); _delay_us(50);	// entry mode set(increment, not shift)

	printf("Connect Ok\r\n");
}

void i2c_lcd_command_8(uint8_t command)
{
	uint8_t c_buf[2];

	c_buf[0] = (command&0xF0) | RS0_EN1 | BackLight;
	c_buf[1] = (command&0xF0) | RS0_EN0 | BackLight;

	twi_transmit(c_buf[0]); _delay_ms(1);
	twi_transmit(c_buf[1]); _delay_ms(1);
}

void i2c_lcd_command(uint8_t command)
{
	uint8_t c_buf[4];

	c_buf[0] = (command &0xF0) | RS0_EN1 | BackLight;
	c_buf[1] = (command &0xF0) | RS0_EN0 | BackLight;

	c_buf[2] = ((command <<4)&0xF0) | RS0_EN1 | BackLight;
	c_buf[3] = ((command <<4)&0xF0) | RS0_EN0 | BackLight;

	twi_transmit(c_buf[0]); _delay_ms(1);
	twi_transmit(c_buf[1]); _delay_ms(1);
	twi_transmit(c_buf[2]); _delay_ms(1);
	twi_transmit(c_buf[3]); _delay_ms(1);
}

void i2c_lcd_data(uint8_t data)
{
	uint8_t d_buf[4];

	d_buf[0] = (data &0xF0) | RS0_EN1 | BackLight;
	d_buf[1] = (data &0xF0) | RS0_EN0 | BackLight;

	d_buf[2] = ((data <<4)&0xF0) | RS0_EN1 | BackLight;
	d_buf[3] = ((data <<4)&0xF0) | RS0_EN0 | BackLight;

	twi_transmit(d_buf[0]); _delay_ms(1);
	twi_transmit(d_buf[1]); _delay_ms(1);
	twi_transmit(d_buf[2]); _delay_ms(1);
	twi_transmit(d_buf[3]); _delay_ms(1);
}

void i2c_lcd_goto_XY(uint8_t row, uint8_t col)
{
	uint8_t address = (0x40 * row) + col;
	uint8_t command = 0x80 | address;

	i2c_lcd_command(command);
}

void i2c_lcd_string(uint8_t row, uint8_t col, char *string)
{
	i2c_lcd_goto_XY(row, col);
	while(*string) {
		i2c_lcd_data(*string++);
	}
}