//********************************************************************** 
/*
	＜輝度可変型ＬＥＤ（１０灯）ユニット（Ｉ２Ｃ対応）＞
*/
//********************************************************************** 

#define		LED			PORTA.F2

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

#define		ADDR_BASE	0xE0

#define		ON			0
#define		OFF			1

#define		DATA_SIZE	10

#define		LED1	PORTB.F0
#define		LED2	PORTB.F2
#define		LED3	PORTB.F3
#define		LED4	PORTB.F5
#define		LED5	PORTB.F6
#define		LED6	PORTB.F7
#define		LED7	PORTA.F6
#define		LED8	PORTA.F7
#define		LED9	PORTA.F0
#define		LED10	PORTA.F1

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

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

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

static	unsigned	short	i2c_memory[DATA_SIZE], i2c_pnt, i2c_flg, i2c_tmp;

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

void	i2c_Handler()
{
	if (SSPSTAT.P == 1)		//ストップビットを検出するとTIMER0を再開する。 
		INTCON.T0IE = 1;
	if (SSPSTAT.S == 1)		//スタートビットを検出するとTIMER0を一時停止する。
		INTCON.T0IE = 0;
	//
	i2c_tmp = SSPSTAT & 0b00101101;
	//
	if (i2c_tmp == 0b00001001) {	//書き込みモード、デバイスアドレス
		i2c_tmp = SSPBUF; 
		i2c_flg = 0;
		i2c_pnt = 0;
		return;
	}
	if (i2c_tmp == 0b00101001) {	//書き込みモード、データ
		if (i2c_flg == 0) {
			i2c_pnt = SSPBUF;
			i2c_flg = 1;
			return;
		}
		if (i2c_flg == 1) {
			i2c_memory[i2c_pnt] = SSPBUF;
			i2c_pnt++;
			return;
		}
	}
	if (i2c_tmp == 0b00001100) {	//読み込みモード、デバイスアドレス 
		i2c_Write(i2c_memory[i2c_pnt]);
		i2c_pnt++;
		return;
	}
	if (i2c_tmp == 0b00101100) {	//読み込みモード、データ（ＡＣＫ） 
		i2c_Write(i2c_memory[i2c_pnt]);
		i2c_pnt++;
		return;
	}
	if (i2c_tmp == 0b00101000) {	//読み込みモード、データ（ＮＯ＿ＡＣＫ） 
		i2c_tmp = SSPBUF;
		SSPCON = 0b00111110;
		return;
	}
}

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

static	unsigned	short	pwm_cnt;

void	interrupt()
{
	if (PIR1.SSPIF == 1) {
		PIR1.SSPIF = 0;
		//
		LED = ON;
		i2c_Handler();
		LED = OFF;
	}
	//
	if (INTCON.T0IF == 1) {		// 約0.128msec周期 
		INTCON.T0IF = 0;
		//
		LED1  = (pwm_cnt <= i2c_memory[0]) ? ON : OFF;
		LED2  = (pwm_cnt <= i2c_memory[1]) ? ON : OFF;
		LED3  = (pwm_cnt <= i2c_memory[2]) ? ON : OFF;
		LED4  = (pwm_cnt <= i2c_memory[3]) ? ON : OFF;
		LED5  = (pwm_cnt <= i2c_memory[4]) ? ON : OFF;
		LED6  = (pwm_cnt <= i2c_memory[5]) ? ON : OFF;
		LED7  = (pwm_cnt <= i2c_memory[6]) ? ON : OFF;
		LED8  = (pwm_cnt <= i2c_memory[7]) ? ON : OFF;
		LED9  = (pwm_cnt <= i2c_memory[8]) ? ON : OFF;
		LED10 = (pwm_cnt <= i2c_memory[9]) ? ON : OFF;
		//
		if (pwm_cnt < 255)
			pwm_cnt++;
		else
			pwm_cnt = 1;
	}
}

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

static	unsigned	short	Luminance[10] = {255, 128, 64, 32, 16, 8, 4, 2, 1, 0};

void	main()
{
	unsigned	short	cnt;
	//
	CMCON  = 0b00000111;		//コンパレータは使用しない。 
	ANSEL  = 0b00000000;		//A/Dコンバータは使用しない。 
	OSCCON = 0b01110000;		//クロックは内臓8MHzを使用する。 
	TRISA  = 0b00111000;		//PORTAを設定する。 
	TRISB  = 0b00010010;		//PORTBを設定する。 
	OPTION_REG.NOT_RBPU = 0;	//PORTBをプルアップする。
	// TIMER0を設定する。 
	INTCON.T0IE = 1;
	INTCON.T0IF = 0;
	OPTION_REG.T0CS = 0;
	OPTION_REG.PSA = 1;
	OPTION_REG.PS0 = 0;
	OPTION_REG.PS1 = 0;
	OPTION_REG.PS2 = 0;
	TMR0 = 0;
	//Ｉ２Ｃを設定する。 
	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 = 1;
	SSPADD = ADDR_BASE + ((SW_ADDR3 == 1) ? 8 : 0) + ((SW_ADDR2 == 1) ? 4 : 0) + ((SW_ADDR1 == 1) ? 2 : 0);
	PIE1.SSPIE = 1;
	PIR1.SSPIF = 0;
	//
	LED = OFF;
	i2c_pnt = 0;
	i2c_flg = 0;
	pwm_cnt = 1;
	// 割り込み(全体)の設定
	INTCON.PEIE = 1;
	INTCON.GIE = 1;
	//
	for (cnt = 0; cnt < DATA_SIZE; cnt++) {
		i2c_memory[cnt] = Luminance[cnt];
	}
	Delay_ms(500);
	for (cnt = 0; cnt < DATA_SIZE; cnt++) {
		i2c_memory[cnt] = Luminance[9 - cnt];
	}
	Delay_ms(500);
	for (cnt = 0; cnt < DATA_SIZE; cnt++) {
		i2c_memory[cnt] = 0x00;
	}
	//
	while (1) {
	}
}

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