#include "P24FJ64GA004.h" 

// Prototyping
unsigned int I2c_Read(void);
void Bk1088_Write(unsigned int,unsigned int);
unsigned int Bk1088_Read(unsigned int);

//config
_CONFIG2(0xF9FC);
_CONFIG1(0x3F7F);

unsigned int coldata[3];
unsigned int lcdstate;

unsigned int HW_Reg[]=
{
0x8000,//0 　　デバイスID
0x1080,     //Chip ID
0x0281,		//Power Configration ※bit0 = Power ON
//0x0000,		//Channel   
30,				// For 76.3MHz
0x60C0,		//Systen Configuration1 
//0x37DA,//5 　　System Configuration2 ※バンドとチャンネル間隔
0x361A,//5 　　System Configuration2 ※バンドとチャンネル間隔 76MHz+Ch*10
0x086E,		//Systen Configuration3 
0x0901,		//Test1 ※AM/FMの切り替えはここらしい
0x9C90,		//Test2 ※AFC関係？
0x17A0,		//Status1　※AFC/SNRリード
0x402B,//10 　Status2　※Seek状態、RSSIリード 
0x0040, 	//Read Channel ※現在のチャネル  
0x0000,		//RDS1
0x0000,		//RDS2
0x0000,		//RDS3
0x0000,//15 　RDS4
0x7B11,		//Boot Confirutation1　※リザーブ機能？
0x0800,		//Boot Confirutation2　※リザーブ機能？
0x4000,		//Boot Confirutation3　※リザーブ機能？
0x4144,		//Boot Confirutation4　※リザーブ機能(リセット値と違う)
0x829A,//20 　Boot Confirutation5　※ミュート設定らしい
0x7812,		//Boot Confirutation6　※リザーブ機能(リセット値と違う)
0x43BB,		//Boot Confirutation7　※リザーブ機能(リセット値と違う)
0x0B41,		//Boot Confirutation8　※リザーブ機能(リセット値と違う)
0x143C,		//Boot Confirutation9　※リザーブ機能(リセット値と違う)
0x000E,//25 　Boot Confirutation10　※リザーブ機能(リセット値と違う)
0x0000,		//Boot Confirutation11　※リザーブ機能？
0x48D4,		//Analog Configuration1 ※リザーブ機能？
0x0000,		//Analog Configuration2 ※Clock Divider
0x0200,		//Analog Configuration3 ※Clock Divider control
0x80AA,//30 　※以下（0x1E〜0x28）はテスト用レジスタで設定不要らしい
0x0000,
0x0EF7,
0x0600,
0x0000,
0x7000,//35
0x0880,
0x8D83,
0x8000,
0x0000,
0x4400//40
};



//main loop
int main(void)
{

   unsigned int i,j;

   lcdstate =0;

   //Setup clock
   OSCCON	=	0x11C0;	 // FRCPLL
   CLKDIV	= 	0x0030;	 // 1MIPS SETTING

   //IO PORT SETTING
	AD1PCFG =	0xffff;	// Analog input disable
	TRISA	=	0x000f;	// All output (Will be changed)
	TRISB	=	0x0000;	// All output
	TRISC	=	0x0000;	// All output

	PORTC = 0xffff;

	// INITIALIZE
	coldata[0] = 0;coldata[1] = 0;coldata[2] = 0;	
	Set_Num(0000);   	// ４桁で周波数を指定
	Set_Band(1);		// バンド指定 0=AM / 1=SW / 2=FM

    // タイマ１の設定　
    PR1 = 300;  		
    T1CON = 0b1000000000110000;
    IEC0bits.T1IE = 1; // タイマ１割り込み許可

	Wait_Time(100);

 //	Bk1088_Write(2,0x01);


   //BK1088　リードテスト

   while(1){
	Set_Num(Bk1088_Read(0x0000)&0xff);
	Wait_Time(10000);
	Set_Num(Bk1088_Read(0x0001)&0xff);
	Wait_Time(10000);

   }
}

// BK1088 Register access
// Reg write
void Bk1088_Write(unsigned int ad,unsigned int dt) {
	I2c_Start();			// start bit
	I2c_Write(0x0080);		// Device ID
	I2c_Write(ad << 1);		// Register address
	I2c_Write(dt>>8);			// Register data H
	I2c_Write(dt & 0xff);		// Register data L
	I2c_Stop();				// Stop bit	
}

// Reg Read
unsigned int Bk1088_Read(unsigned int ad) {
	unsigned int dtH,dtL;
	I2c_Start();			// start bit
	I2c_Write(0x0080);		// Device ID
	I2c_Write((ad << 1) | 0x01);		// Register address + Read flag
	dtH = I2c_Read();		// Register data read H
	I2c_Ack();				// ACK output
	dtL = I2c_Read();		// Register data read L
	I2c_Nack();				// NACK output
	I2c_Stop();				// Stop bit	
	return ((dtH <<8) + dtL);
}

// software I2C RC8=DATA, RC9=CLK
// I2C Start
void I2c_Start(void){
	TRISC	=	0x0000;	// All output
	PORTCbits.RC8  = 0;		// DATA =L
	Wait_Time(1);
	PORTCbits.RC9  = 0;		// DATA& CLK = L
	Wait_Time(1);
}
// I2C Stop
void I2c_Stop(void){
	TRISC	=	0x0000;	// All output
	PORTCbits.RC9  = 1;		// CLK = H
	Wait_Time(1000);
}
// I2C 8bit write and ACK
void I2c_Write(unsigned int dt){
	unsigned int i,wk;
	wk =dt;
	TRISC	=	0x0000;	// All output
	for (i=0;i<8;i++) {
		PORTCbits.RC9  = 0;		// CLK = L
		if((wk & 0x80)==0){PORTCbits.RC8 = 0;}else{PORTCbits.RC8 =1;} // data bit output
		wk <<=1;
		PORTCbits.RC9  = 1;		// CLK = H
		Wait_Time(1);
		PORTCbits.RC9  = 0;		// CLK = L	
		Wait_Time(1);	
	}
	TRISC	=	0x0100;	// RC8 = input
	Wait_Time(1);
	PORTCbits.RC9  = 1;		// CLK = H	
	Wait_Time(1);
	PORTCbits.RC9  = 0;		// CLK = L	
	Wait_Time(1);
	TRISC	=	0x0000;	// RC8 = output
}

// I2C 8bit read
unsigned int I2c_Read(void){
	unsigned int i,wk;
	wk =0;
	TRISC	=	0x0100;	// DATA input
	for (i=0;i<8;i++) {
		wk <<=1;
		PORTCbits.RC9  = 0;		// CLK = L
		PORTCbits.RC9  = 1;		// CLK = H	
		if(PORTCbits.RC8 == 1){wk |= 1;}  // data bit input
		Wait_Time(1);
		PORTCbits.RC9  = 0;		// CLK = L
	}	
	return(wk);
}
void I2c_Ack(void) {
	TRISC	=	0x0000;	// DATA output
	PORTCbits.RC8  = 0;		// ACK output
	Wait_Time(1);
	PORTCbits.RC9  = 1;		// CLK = H
	Wait_Time(1);
	PORTCbits.RC9  = 0;		// CLK = L
	Wait_Time(1);
}

void I2c_Nack(void) {
	TRISC	=	0x0000;	// DATA output
	PORTCbits.RC8  = 1;		// NACK output
	Wait_Time(1);
	PORTCbits.RC9  = 1;		// CLK = H
	Wait_Time(1);
	PORTCbits.RC9  = 0;		// CLK = L
	Wait_Time(1);
}



// NUMERIC SET ４桁の数字を一気にバッファにセットする

void Set_Num(unsigned int num){
	coldata[0] &= 0x0000;coldata[1] &= 0x0001;coldata[2] = 0xe000;
	Set_1digit(3,num/1000);
	Set_1digit(2,(num%1000)/100);
	Set_1digit(1,(num%100)/10);
	Set_1digit(0,num%10);

}

// BAND SET SW/AM/FM　MHz/KHz/少数点　インジケータをセットする

void Set_Band(unsigned int band){
	if (band ==0) { coldata[2] &= 0x1ffe;
					coldata[0] &= 0x0924;
					coldata[0] |= 0x2001;					//	AM KHz 小数点以下なし
					coldata[1] &= 0x1ffe;					
	} 														
	if (band ==1) { coldata[2] &= 0x1ffe;
					coldata[0] &= 0x0924;;
					coldata[0] |= 0x8010;					// SW MHz　小数点以下２桁
					coldata[1] |= 0x0001;					
	} 													
	if (band ==2) { coldata[2] &= 0x1ffe;
					coldata[0] &= 0x0924;
					coldata[0] |= 0x0408;					// FM MHz 小数点以下１桁
					coldata[1] |= 0x0001;					
	} 														
}

// NUMERIC SET １桁の数字をセットするルーチン

void Set_1digit(unsigned int col,unsigned int num){
	unsigned int wk1,wk2,wk3;
	wk1 = 0;wk2=0;wk3=0;
	switch (num) {											// 0-9す数字に合わせてセグメントデータを設定
		case 0:	wk3 =0x07;wk2=0x05;wk1=2;break;
		case 1:	wk3 =0x01;wk2=0x01;wk1=0;break;
		case 2:	wk3 =0x03;wk2=0x06;wk1=2;break;
		case 3:	wk3 =0x03;wk2=0x03;wk1=2;break;
		case 4:	wk3 =0x05;wk2=0x03;wk1=0;break;
		case 5:	wk3 =0x06;wk2=0x03;wk1=2;break;
		case 6:	wk3 =0x06;wk2=0x07;wk1=2;break;
		case 7:	wk3 =0x03;wk2=0x01;wk1=0;break;
		case 8:	wk3 =0x07;wk2=0x07;wk1=2;break;
		case 9:	wk3 =0x07;wk2=0x03;wk1=2;break;
		deafult: break;
	}
	coldata[0]=coldata[0] | (wk1 << (col*3+1));
	coldata[1]=coldata[1] | (wk2 << (col*3+1));
	coldata[2]=coldata[2] | (wk3 << (col*3+1));
}	

// SEGMENT CONTROL　ここでLCDを制御

void __attribute__((interrupt, auto_psv)) 
   _T1Interrupt(void)
{
	unsigned int wk;

	wk = coldata[lcdstate/2];

	if ((lcdstate%2)==0) {
		PORTB = wk ^ 0xffff;						// オンするセグメントを０Vにする
		PORTA = 0xffff;
		switch (lcdstate/2) {								// Col選択　選択したColだけ１をドライブ（３V）
			case 0 :								// それ以外はフロート（１．５V）
					TRISA = 0xfffe;break;
			case 1 :	
					TRISA = 0xfffd;break;
			case 2 :	
					TRISA = 0xfeff;break;
			default :break;
		}
	}else{
		PORTB = wk;									// オンするセグメントを３Vにする
		PORTA = 0x0000;								// 選択したColを０Vに。それ以外は１．５Vのまま
	}
	lcdstate++;
	if (lcdstate>5) {
		lcdstate =0;
	}
   IFS0bits.T1IF = 0;// 割り込みフラグクリア
}

// WAIT LOOP　適当なウェイトルーチン

void Wait_Time(unsigned int t) {
	int t0,t1;
	for (t0=0;t0