//********************************************************************** 
/*
	＜ＲＴＣ（Ｉ２Ｃ対応）＞
*/
//********************************************************************** 

#define		ADDR_BASE		0x80

#define		ON				1
#define		OFF				0

#define		MEMORY_SIZE		7

#define		LED				PORTB.F5

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

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[MEMORY_SIZE], i2c_pnt, i2c_flg, i2c_tmp, i2c_start_flg, i2c_stop_flg;
/*
i2c_memory[0]    時
i2c_memory[1]    分
i2c_memory[2]    秒
*/
//********************************************************************** 

void	i2c_Handler()
{
	if (PIR1.SSPIF != 1)
		return;
	//
	PIR1.SSPIF = 0;
	//
	LED = ON;
	//
	if (SSPSTAT.S == 1) {	//スタートビットを検出。
		i2c_start_flg = 1;
	}
	if (SSPSTAT.P == 1) {	//ストップビットを検出。 
		i2c_stop_flg = 1;
	}
	//
	i2c_tmp = SSPSTAT & 0b00101101;
	//
	if (i2c_tmp == 0b00001001) {	//書き込みモード、デバイスアドレス
		i2c_tmp = SSPBUF; 
		i2c_flg = 0;
		i2c_pnt = 0;
		LED = OFF;
		return;
	}
	if (i2c_tmp == 0b00101001) {	//書き込みモード、データ
		if (i2c_flg == 0) {
			i2c_pnt = SSPBUF;
			i2c_flg = 1;
			LED = OFF;
			return;
		}
		if (i2c_flg == 1) {
			if (i2c_pnt < MEMORY_SIZE) {
				i2c_memory[i2c_pnt] = SSPBUF;
				i2c_pnt++;
			}
			LED = OFF;
			return;
		}
	}
	if (i2c_tmp == 0b00001100) {	//読み込みモード、デバイスアドレス 
		i2c_Write(i2c_memory[i2c_pnt]);
		i2c_pnt++;
		LED = OFF;
		return;
	}
	if (i2c_tmp == 0b00101100) {	//読み込みモード、データ（ＡＣＫ） 
		i2c_Write(i2c_memory[i2c_pnt]);
		i2c_pnt++;
		LED = OFF;
		return;
	}
	if (i2c_tmp == 0b00101000) {	//読み込みモード、データ（ＮＯ＿ＡＣＫ） 
		i2c_tmp = SSPBUF;
		SSPCON = 0b00111110;
		LED = OFF;
		return;
	}
	LED = OFF;
}

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

static	long	clock;

void	rtc_Handler()
{
	static	short	hh, mm, ss;
	//
	if (PIR1.CCP1IF != 1) 
		return;
	//
	PIR1.CCP1IF = 0;
	//
	clock++;
	if (clock == 864000)
		clock = 0;
	//
	hh = clock / 36000;
	mm = (clock - (36000 * (long)hh)) / 600;
	ss = (clock - (36000 * (long)hh) - (600 * (long)mm)) / 10;
	i2c_memory[0] = hh;
	i2c_memory[1] = mm;
	i2c_memory[2] = ss;
}

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

void	interrupt()
{
	i2c_Handler();
}

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

void	init_rtc()
{
	// TIMER1の設定
	PIE1.TMR1IE = 0;
	PIR1.TMR1IF = 0;
	T1CON.T1CKPS0 = 1;
	T1CON.T1CKPS1 = 1;
	T1CON.TMR1ON = 0;
	TMR1L = 0;
	TMR1H = 0;
	// CCPの設定
	PIE1.CCP1IE = 0;
	PIR1.CCP1IF = 0;
	CCP1CON.CCP1M3 = 1;
	CCP1CON.CCP1M2 = 0;
	CCP1CON.CCP1M1 = 1;
	CCP1CON.CCP1M0 = 1;
	CCPR1L = 0xA8;	// 0.1sec...10hz...クロックが8Mhzの時
	CCPR1H = 0x61;	// 0.1sec...(1÷8000000)*4*8*25000
	//
	clock = 0;
	//
	T1CON.TMR1ON = 1;
}

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

void	main()
{
	unsigned	short	cnt;
	//
	CMCON  = 0b00000111;		//コンパレータは使用しない。 
	ANSEL  = 0b00000000;		//A/Dコンバータは使用しない。 
	OSCCON = 0b01110000;		//クロックは内臓8MHzを使用する。 
	TRISA  = 0b00111100;		//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 = 1;
	SSPADD = ADDR_BASE;
	PIE1.SSPIE = 1;
	PIR1.SSPIF = 0;
	//
	LED = OFF;
	i2c_pnt = 0;
	i2c_flg = 0;
	i2c_start_flg = 0;
	i2c_stop_flg = 0;
	for (cnt = 0; cnt < MEMORY_SIZE; cnt++) {
		i2c_memory[cnt] = 0x00;
	}
	//
	for (cnt = 0; cnt < 10; cnt++) {
		LED = ON;
		Delay_ms(50);
		LED = OFF;
		Delay_ms(50);
	}
	// 割り込み(全体)の設定
	INTCON.PEIE = 1;
	INTCON.GIE = 1;
	//
	init_rtc();
	while (1) {
		rtc_Handler();
		if (i2c_memory[6] == 0x01) {
			i2c_memory[6] = 0x00;
			clock = ((long)i2c_memory[3] * 36000) + ((long)i2c_memory[4] * 600) + ((long)i2c_memory[5] * 10);
		}
	}
}

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