//********************************************************************** 
/*
	＜ＬＣＤモニター（Ｉ２Ｃ対応）＞
*/
//********************************************************************** 

#define		LED			PORTA.F4
#define		SW_ADDR1	PORTB.F2
#define		SW_ADDR2	PORTB.F3
#define		ADDR_BASE	0xB0

#define		ON			1
#define		OFF			0

#define		DATA_SIZE	32

//********************************************************************** 

static	unsigned	short	data[DATA_SIZE], pnt, flg, tmp, stat;

//********************************************************************** 

void	i2c_Write(unsigned short dat)
{
	while (SSPSTAT.BF == 1)
		;
	while (1) {
		SSPCON.WCOL = 0;
		SSPBUF = dat;
		if (SSPCON.WCOL == 1)
			continue;
		//
		SSPCON.CKP = 1;
		return;
	}
}

//********************************************************************** 

void	i2c_Handler()
{
	stat = SSPSTAT;
	tmp = SSPSTAT & 0b00101101;
	//
	if (tmp == 0b00001001) {	//書き込みモード、デバイスアドレス
		tmp = SSPBUF; 
		flg = 0;
		pnt = 0;
		return;
	}
	if (tmp == 0b00101001) {	//書き込みモード、データ
		if (flg == 0) {
			pnt = SSPBUF;
			flg = 1;
			return;
		}
		if (flg == 1) {
			data[pnt] = SSPBUF;
			pnt++;
			return;
		}
	}
	if (tmp == 0b00001100) {	//読み込みモード、デバイスアドレス 
		i2c_Write(data[pnt]);
		pnt++;
		return;
	}
	if (tmp == 0b00101100) {	//読み込みモード、データ（ＡＣＫ） 
		i2c_Write(data[pnt]);
		pnt++;
		return;
	}
	if (tmp == 0b00101000) {	//読み込みモード、データ（ＮＯ＿ＡＣＫ） 
		tmp = SSPBUF;
		SSPCON = 0x36;
		return;
	}
	LED = ON;
	Delay_ms(100);
	LED = OFF;
}

//********************************************************************** 

void	interrupt()
{
	if (PIR1.SSPIF == 1) {
		PIR1.SSPIF = 0;
		//
		LED = ON;
		i2c_Handler();
		LED = OFF;
	}
}

//********************************************************************** 

void	ByteToBit(unsigned short number, char *output)
{
	short	cnt;
	//
	for (cnt = 0; cnt < 8; cnt++) {
		if ((number & 0x80) != 0)
			output[cnt] = '1';
		else
			output[cnt] = '0';
		number <<= 1;
	}
	output[8] = 0x00;
}

//********************************************************************** 

void	main()
{
	unsigned	short	cnt, buf[10], mode;
	//
	CMCON  = 0b00000111;		//コンパレータは使用しない。 
	ANSEL  = 0b00000000;		//A/Dコンバータは使用しない。 
	OSCCON = 0b01110000;		//クロックは内臓8MHzを使用する。 
	TRISA  = 0b00101100;		//PORTAを設定する。 
	TRISB  = 0b00011111;		//PORTBを設定する。 
	OPTION_REG.NOT_RBPU = 0;	//PORTBをプルアップする。
	//Ｉ２Ｃを設定する。 
	SSPSTAT.SMP = 1;
	SSPSTAT.CKE = 1;
	SSPCON.WCOL = 0;
	SSPCON.SSPOV = 0;
	SSPCON.SSPEN = 1;
	SSPCON.CKP = 1;
	SSPCON.SSPM0 = 0;
	SSPCON.SSPM1 = 1;
	SSPCON.SSPM2 = 1;
	SSPCON.SSPM3 = 0;
	SSPADD = ADDR_BASE + ((SW_ADDR2 == 1) ? 4 : 0) + ((SW_ADDR1 == 1) ? 2 : 0);
	PIE1.SSPIE = 1;
	PIR1.SSPIF = 0;
	//
	LED = OFF;
	pnt = 0;
	flg = 0;
	for (cnt = 0; cnt < 32; cnt++) {
		data[cnt] = ' ';
	}
	//LCDを初期化する。 
	Lcd_Custom_Config(&PORTA,1,0,7,6,&PORTB,5,6,7);
	Lcd_Custom_Cmd(LCD_CURSOR_OFF);
	Lcd_Custom_Cmd(LCD_CLEAR);
	//
	for (cnt = 0; cnt < 16; cnt++) {
		Lcd_Custom_Chr(1, cnt + 1, 0xFF);
		Delay_ms(50);
	}
	for (cnt = 0; cnt < 16; cnt++) {
		Lcd_Custom_Chr(2, cnt + 1, 0xFF);
		Delay_ms(50);
	}
	// 割り込み(全体)の設定
	INTCON.PEIE = 1;
	INTCON.GIE = 1;
	//
	while (1) {
		for (cnt = 0; cnt < 16; cnt++) {
			Lcd_Custom_Chr(1, cnt + 1, data[cnt]);
		}
		for (cnt = 0; cnt < 16; cnt++) {
			Lcd_Custom_Chr(2, cnt + 1, data[cnt + 16]);
		}
	}
}

//**********************************************************************