//********************************************************************** 
/*
	＜７セグＬＥＤ（Ｉ２Ｃ対応）＞
*/
//********************************************************************** 

#define		SW_ADDR1	PORTA.F3
#define		SW_ADDR2	PORTA.F4
#define		SW_ADDR3	PORTA.F5

#define		ADDR_BASE	0xD0

#define		SEG1		PORTB.F0
#define		SEG2		PORTB.F2
#define		SEG3		PORTB.F3

#define		ON			1
#define		OFF			0

#define		DATA_SIZE	3

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

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;
	}
}

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

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

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

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	segDataSet(unsigned short dat)
{
	PORTA.F2 = (dat.F0 == 1) ? 1 : 0;	// A
	PORTA.F1 = (dat.F1 == 1) ? 1 : 0;	// B
	PORTA.F0 = (dat.F2 == 1) ? 1 : 0;	// C
	PORTA.F7 = (dat.F3 == 1) ? 1 : 0;	// D
	PORTA.F6 = (dat.F4 == 1) ? 1 : 0;	// E
	PORTB.F7 = (dat.F5 == 1) ? 1 : 0;	// F
	PORTB.F6 = (dat.F6 == 1) ? 1 : 0;	// G
	PORTB.F5 = (dat.F7 == 1) ? 1 : 0;	// DP
}

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

void	segDataDisplay()
{
	segDataSet(data[0]);
	SEG1 = ON;
	Delay_ms(1);
	SEG1 = OFF;
	//
	segDataSet(data[1]);
	SEG2 = ON;
	Delay_ms(1);
	SEG2 = OFF;
	//
	segDataSet(data[2]);
	SEG3 = ON;
	Delay_ms(1);
	SEG3 = OFF;
}

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

void	main()
{
	unsigned	short	cnt, tmp;
	//
	CMCON  = 0b00000111;		//コンパレータは使用しない。 
	ANSEL  = 0b00000000;		//A/Dコンバータは使用しない。 
	OSCCON = 0b01110000;		//クロックは内臓8MHzを使用する。 
	TRISA  = 0b00111000;		//PORTAを設定する。 
	TRISB  = 0b00010010;		//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_ADDR3 == 1) ? 8 : 0) + ((SW_ADDR2 == 1) ? 4 : 0) + ((SW_ADDR1 == 1) ? 2 : 0);
	PIE1.SSPIE = 1;
	PIR1.SSPIF = 0;
	//
	pnt = 0;
	flg = 0;
	data[0] = 0b11111111;
	data[1] = 0b11111111;
	data[2] = 0b11111111;
	SEG1 = OFF;
	SEG2 = OFF;
	SEG3 = OFF;
	//
	tmp = 0b00000001;
	for (cnt = 0; cnt < 8; cnt++) {
		SEG1 = ON;
		segDataSet(tmp);
		Delay_ms(100);
		SEG1 = OFF;
		tmp = tmp << 1;
	}
	tmp = 0b00000001;
	for (cnt = 0; cnt < 8; cnt++) {
		SEG2 = ON;
		segDataSet(tmp);
		Delay_ms(100);
		SEG2 = OFF;
		tmp = tmp << 1;
	}
	tmp = 0b00000001;
	for (cnt = 0; cnt < 8; cnt++) {
		SEG3 = ON;
		segDataSet(tmp);
		Delay_ms(100);
		SEG3 = OFF;
		tmp = tmp << 1;
	}
	// 割り込み(全体)の設定
	INTCON.PEIE = 1;
	INTCON.GIE = 1;
	//
	while (1) {
		segDataDisplay();
	}
}

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