//********************************************************************** 
/*
　　＜ミニ周波数カウンタ（ｋHz表示）＞ 
*/
//********************************************************************** 

#define		DATA0		0b00100001
#define		DATA1		0b11100111
#define		DATA2		0b00110100
#define		DATA3		0b10100100
#define		DATA4		0b11100010
#define		DATA5		0b10101000
#define		DATA6		0b00101000
#define		DATA7		0b11100001
#define		DATA8		0b00100000
#define		DATA9		0b10100000
#define		DATA_SPACE	0b11111111

#define		SPACE		10

#define		NON_SEG		0b00000000
#define		SEG1		PORTA.F6
#define		SEG2		PORTA.F0
#define		SEG3		PORTA.F1
#define		SEG4		PORTA.F2

#define		ON			1
#define		OFF			0

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

short	seg_flg, data1, data2, data3, data4, dot;
short	tbl[11] = {DATA0, DATA1, DATA2, DATA3, DATA4, DATA5, DATA6, DATA7, DATA8, DATA9, DATA_SPACE};

short	fc_flg;

void	interrupt()
{
	if (PIR1.CCP1IF == 1) {
		PIR1.CCP1IF = 0;
		//周波数カウンタ処理 
		switch (fc_flg) {
		case -1:
			break;
		case 0:
			TRISA.F4 = 1;		//ゲートを開ける。
			fc_flg++;
			break;
		case 20:
			TRISA.F4 = 0;		// ゲートを閉める。 
			PORTA.F4 = 0;
			fc_flg = -1;
			break;
		default:
			fc_flg++;
			break;
		}
		//７ＳＥＧ（４桁）点灯処理 
		switch (seg_flg) {
		case 0:
			seg_flg = 1;
			SEG4 = OFF;
			PORTB = (dot == 1) ? tbl[data1] & 0b11011111 : tbl[data1];
			SEG1 = ON;
			break;
		case 1:
			seg_flg = 2;
			SEG1 = OFF;
			PORTB = (dot == 2) ? tbl[data2] & 0b11011111 :  tbl[data2];
			SEG2 = ON;
			break;
		case 2:
			seg_flg = 3;
			SEG2 = OFF;
			PORTB = (dot == 3) ? tbl[data3] & 0b11011111 :  tbl[data3];
			SEG3 = ON;
			break;
		case 3:
			seg_flg = 0;
			SEG3 = OFF;
			PORTB = (dot == 4) ? tbl[data4] & 0b11011111 :  tbl[data4];
			SEG4 = ON;
			break;
		}
	}
}

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

unsigned	long	FreqMeasurement()
{
	unsigned	long	freq;
	//
	TRISA.F4 = 0;		//ゲートを閉める。
	PORTA.F4 = 0;
	INTCON.T0IF = 0;
	TMR0 = 0;
	freq = 0;
	//
	fc_flg = 0;			//測定開始 
	// 測定 
	while (fc_flg != -1) {
		if (INTCON.T0IF == 1) {
			INTCON.T0IF = 0;
			freq++;
		}
	}
	if (INTCON.T0IF == 1) {
		INTCON.T0IF = 0;
		freq++;
	}
	freq = ((freq * 256) + TMR0) * 8 * 10;
	return (freq);
}

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

void main()
{
	static	char	buf[16];
	static	long	freq, tmp;
	//
	TRISA = 0b00100000;
	TRISB = 0b00000000;
//	OSCCON = 0b01110000;	// クロックを8Mhzに設定する。 
	ANSEL = 0b00000000;		// Ａ／Ｄ変換は使用しない。
	// TIMER0の設定
	OPTION_REG.T0CS = 1;
	OPTION_REG.PSA  = 0;
	OPTION_REG.PS2  = 0;
	OPTION_REG.PS1  = 1;
	OPTION_REG.PS0  = 0;
	// TIMER1の設定
	PIE1.TMR1IE = 0;
	PIR1.TMR1IF = 0;
	T1CON.T1CKPS0 = 1;
	T1CON.T1CKPS1 = 1;
	T1CON.TMR1ON = 0;
	TMR1L = 0;
	TMR1H = 0;
	// CCPの設定
	PIE1.CCP1IE = 1;
	PIR1.CCP1IF = 0;
	CCP1CON.CCP1M3 = 1;
	CCP1CON.CCP1M2 = 0;
	CCP1CON.CCP1M1 = 1;
	CCP1CON.CCP1M0 = 1;
	CCPR1L = 0xE2;	// 5msec...(1÷8000000)*4*8*1250
	CCPR1H = 0x04;	// 
	//
	SEG1 = OFF;
	SEG2 = OFF;
	SEG3 = OFF;
	SEG4 = OFF;
	seg_flg = 0;
	data1 = SPACE;
	data2 = SPACE;
	data3 = SPACE;
	data4 = SPACE;
	dot = 0;
	fc_flg = -1;
	// 割り込みを許可する。 
	INTCON.PEIE = 1;
	INTCON.GIE = 1;
	//
	T1CON.TMR1ON = 1;
	//
	while (1) {
		//測定 
		freq = FreqMeasurement();
		tmp = freq / 1000;
		//kHz未満四捨五入 
		if ((freq - (tmp * 1000)) >= 500)
			tmp++;
		//-455kHz有無 
		if (PORTA.F5 == 0)
			tmp = tmp - 455;
		//表示 
		LongToStr(tmp, buf);
		if (tmp < 10000) {
			dot = 0;
			data1 = buf[7] == ' ' ? SPACE : buf[7] - '0';
			data2 = buf[8] == ' ' ? SPACE : buf[8] - '0';
			data3 = buf[9] == ' ' ? SPACE : buf[9] - '0';
			data4 = buf[10] == ' ' ? SPACE : buf[10] - '0';
		} else {
			dot = 2;
			data1 = buf[6] == ' ' ? SPACE : buf[6] - '0';
			data2 = buf[7] == ' ' ? SPACE : buf[7] - '0';
			data3 = buf[8] == ' ' ? SPACE : buf[8] - '0';
			data4 = buf[9] == ' ' ? SPACE : buf[9] - '0';
		}
		Delay_ms(500);
	}
}

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