/*
 *
 * プログラムテンプレート
 * 2008 nazo-fjt.com
 * by Hiroshi FJT
 * 
 * Device   = PIC16F877/877A
 * Compiler = HI-TECH PICC-Lite Compiler
 *
 */

#include<pic.h>


/* define設定 */
#define TimIntLoop	100	/* 0.5秒を生成する為のタイマー割り込み回数 */
#define IdleLoopCount	170	/* 時間稼ぎループ回数(0-255) */

#define SwPushCount	5	/* SWが押されたと認識するカウント数 */
#define SwLongCount	500	/* SWが長押しされたと認識するカウント数 */
#define SwContenuCount	90	/* SWが長押しが継続されたと認識するカウント数 */

/* コンフィグビット設定 */
__CONFIG(UNPROTECT & PWRTEN & WDTDIS & XT & LVPDIS);


/********************************************************************/
/* プロトタイプ宣言                                                 */
/********************************************************************/

/* I/O処理レイヤー */
void DispOut(void);
void SWscan(void);
void IntTimer(void);

/* イベント通知レイヤー */
void InitDone(void);	/* 初期化終了通知 */
void SW1Push(void);	/* SW1(mode) */
void SW1Long(void);
void SW1Contenu(void);
void SW1Rel(void);
void SW1LgRel(void);
void SW2Push(void);	/* SW2(hh) */
void SW2Long(void);
void SW2Contenu(void);
void SW2Rel(void);
void SW2LgRel(void);
void SW3Push(void);	/* SW3(mm) */
void SW3Long(void);
void SW3Contenu(void);
void SW3Rel(void);
void SW3LgRel(void);
void SW4Push(void);	/* SW4(m) */
void SW4Long(void);
void SW4Contenu(void);
void SW4Rel(void);
void SW4LgRel(void);
void SW5Push(void);	/* SW5(SecReset) */
void SW5Long(void);
void SW5Contenu(void);
void SW5Rel(void);
void SW5LgRel(void);
void SW6Push(void);	/* SW6(Alm1 Snooze/Stop) */
void SW6Long(void);
void SW6Contenu(void);
void SW6Rel(void);
void SW6LgRel(void);
void SW7Push(void);	/* SW7(Alm2 Snooze/Stop) */
void SW7Long(void);
void SW7Contenu(void);
void SW7Rel(void);
void SW7LgRel(void);
void HalfSec(void);	/* 0.5sec通知 */
void LoopEvnt(void);	/* loopイベント通知 */


/* アプリ処理レイヤー */
/* この下にアプリで利用する関数のプロトタイプを宣言 */

/********************************************************************/
/* グローバル変数定義                                               */
/********************************************************************/

/* システム利用変数 */
/* 表示 */
unsigned char D1;
unsigned char D2;
unsigned char D3;
unsigned char D4;
unsigned char D5;
unsigned char D6;
bit DP1;
bit DP2;
bit DP3;
bit DP4;
bit DP5;
bit DP6;
bit DAM;
bit DPM;

/* SW status */
/* 0 - open
 * 1 - push
 * 2 - long push
 * 3 - long push contenues
 */
unsigned char SW1status;
unsigned char SW2status;
unsigned char SW3status;
unsigned char SW4status;
unsigned char SW5status;
unsigned char SW6status;
unsigned char SW7status;

/* アプリ利用変数 */
/* この下にアプリで利用するグローバル変数を宣言する */



/********************************************************************/
/* システムレイヤー                                                 */
/********************************************************************/
/* メイン */
void main()
{
	unsigned char i;

	/* PIC初期化 */
	/* デフォルト値のままでいいところはコメントアウトしておく */

	/* 割り込み設定フラグ設定 */
	/* PIE1
	 *           +----TMR2IE
	 *           |  */
	PIE1=0b00000010;

	/* PIE2 */
	PIE2=0b00000000;

	/* INTCON
	 *       +---- GIE
	 *       |+--- PEIE
	 *       ||       */
	INTCON=0b11000000;

	/* I/O設定 */

	/* ADコンバータの機能を殺す */
	/* PORTAとPORTEを汎用I/Oとして使うため */
	/* デフォルトではA/DコンバータはDisableなのにポート設定はアナログ入力になっている */
	ADCON0=0b00000000;
	ADCON1=0b00000110;

	/*
	 *	7	6	5	4	3	2	1	0
	 * RA	-	-	O/NC	I/SW5	I/SW4	I/SW3	I/SW2	I/SW1
	 * RB	O/colC	O/colB	O/colA	O/D.P.	O/numD	O/numC	O/numB	O/numA
	 * RC	O/T2	O/T1	O/A2	O/A1	O/1Hz	O/Test	O/Test	O/NC
	 * RD	I/SW12	ISW11	I/SW10	I/SW9	O/NC	I/SW8	I/SW7	I/SW6
	 * RE	-	-	-	-	-	O/PM	O/AM	O/DispEna
	 *
	 * TRISx 0 output
	 *       1 input
	 *   bit76543210 */
	TRISA=0b00011111;
	TRISB=0b00000000;
	TRISC=0b00000000;
	TRISD=0b11110111;
	TRISE=0b00000000;

	/* システム変数初期化 */
	/* 080513追加 */
	SW1status=0;
	SW2status=0;
	SW3status=0;
	SW4status=0;
	SW5status=0;
	SW6status=0;
	SW7status=0;

	/* タイマ設定 */
	/*
	 *   Clock
	 *  3.2768MHz 
	 *     |
	 * 1/4 (819.200KHz)
	 *     |
	 * Prescaler
	 * 1/16 (51.200KHz)
	 *     |
	 * TMR2 Reg ---Comparator--- PR2 Reg
	 *   0-255     1/(PR2+1)       127
	 *              (400Hz)
	 *                 |
	 *            Postscaler
	 *                1/2
	 *                 |
	 *               200Hz
	 *                          Postscaler
	 *       +-------- TOUTPS3  0000: 1/1
	 *       |+------- TOUTPS2  0001: 1/2
	 *       ||+------ TOUTPS1    :
	 *       |||+----- TOUTPS0  1111: 1/16
	 *       ||||
	 *       ||||+---- TMR2ON   0:Stop 1:Start
	 *       |||||
	 *       |||||              Prescaler
	 *       |||||+--- T2CKPS1  00: 1/1
	 *       ||||||+-- T2CKPS0  01: 1/4
	 *       |--||||            1x: 1/16      */
	T2CON=0b00001111;
	PR2=127;


	/* 初期化終了通知呼び出し */
	InitDone();

	/* Idol Loop */
	while(1)
	{
		/* TestOutをHにする */
		RC2=1;

		/* 表示実行 */
		DispOut();

		/* SW Sclan呼び出し */
		SWscan();

		/* loopイベント通知 */
		LoopEvnt();

		/* TestOutをLにする */
		RC2=0;

		/* 時間稼ぎループ */
		i=0;
		do{
			i++;
		}while(i<IdleLoopCount);
	}
}

/********************************************************************/
/* 割り込み処理 */
static void interrupt isr(void)
{
	/* タイマ割り込みしか使ってないから直接処理関数コール */
	/* 複数の割り込み使う場合は、ここでフラグを確認して処理関数をコール */
	IntTimer();
	TMR2IF=0;
}


/********************************************************************/
/* I/O処理レイヤー                                                  */
/********************************************************************/

/* 表示実行               */
/* 表示用メモリを元に出力 */
void DispOut(void)
{
	/* 出力
	 * RB0 : num-A
	 * RB1 : num-B
	 * RB2 : num-C
	 * RB3 : num-D
	 * RB4 : D.P.
	 * RB5 : col-A
	 * RB6 : col-B
	 * RB7 : col-c
	 * RE0 : enable
	 * RE1 : AM
	 * RE2 : PM
	 */

	static char i;

	/* enableをLにして表示を消す */
	RE0=0;

#asm
	nop
#endasm

	switch (i) {
		case 0:
			PORTB=0b00000000+16*DP1+D1;
			break;
		case 1:
			PORTB=0b00100000+16*DP2+D2;
			break;
		case 2:
			PORTB=0b01000000+16*DP3+D3;
			break;
		case 3:
			PORTB=0b01100000+16*DP4+D4;
			break;
		case 4:
			PORTB=0b10000000+16*DP5+D5;
			break;
		case 5:
			PORTB=0b10100000+16*DP6+D6;
			break;
	}

#asm
	nop
#endasm

	/* 先頭桁で０以外の時、enableをHにして表示する */
	if((i==0) && (D1==0)){
		RE0=0;
	}else{
		RE0=1;
	}

	i++;
	if(i==6){i=0;}

	/* AM/PMの表示 */
	RE1=DAM;
	RE2=DPM;

}

/********************************************************************/
/* SW Scan */
/* SW Scan */
void SWscan(void)
{
	/* 入力
	 * RA0 : SW1
	 * RA1 : SW2
	 * RA2 : SW3
	 * RA3 : SW4
	 * RA4 : SW5
	 * RA5 :    
	 * RD0 : SW6
	 * RD1 : SW7
	 * RD2 : SW8
	 * RD3 :    
	 * RD4 : SW9
	 * RD5 : SW10
	 * RD6 : SW11
	 * RD7 : SW12
	 */

	static bit NSW1;
	static bit NSW2;
	static bit NSW3;
	static bit NSW4;
	static bit NSW5;
	static bit NSW6;
	static bit NSW7;

	static unsigned int SW1count;
	static unsigned int SW2count;
	static unsigned int SW3count;
	static unsigned int SW4count;
	static unsigned int SW5count;
	static unsigned int SW6count;
	static unsigned int SW7count;

	/*===============================================================*/
	NSW1=RA0;
	NSW2=RA1;
	NSW3=RA2;
	NSW4=RA3;
	NSW5=RA4;
	NSW6=RD0;
	NSW7=RD1;
	/*===============================================================*/
	/* SW1チェック(mode) */
	if(NSW1==0){
		SW1count++;
		if(SW1status==0 && SW1count==SwPushCount){
			SW1status=1;
			SW1count=0;
			SW1Push();
		}
		if(SW1status==1 && SW1count==SwLongCount){
			SW1status=2;
			SW1count=0;
			SW1Long();
		}
		if((SW1status==2 || SW1status==3) && SW1count==SwContenuCount){
			SW1status=3;
			SW1count=0;
			SW1Contenu();
		}
	}else{
		SW1count=0;
		switch(SW1status) {
			case 1:
				SW1status=0;
				SW1Rel();
				break;
			case 2:
			case 3:
				SW1status=0;
				SW1LgRel();
		}
	}
	/*===============================================================*/
	/* SW2チェック(HH) */
	if(NSW2==0){
		SW2count++;
		if(SW2status==0 && SW2count==SwPushCount){
			SW2status=1;
			SW2count=0;
			SW2Push();
		}
		if(SW2status==1 && SW2count==SwLongCount){
			SW2status=2;
			SW2count=0;
			SW2Long();
			SW2Push();
		}
		if((SW2status==2 || SW2status==3) && SW2count==SwContenuCount){
			SW2status=3;
			SW2count=0;
			SW2Contenu();
		}
	}else{
		SW2count=0;
		switch(SW2status) {
			case 1:
				SW2status=0;
				SW2Rel();
				break;
			case 2:
			case 3:
				SW2status=0;
				SW2LgRel();
		}
	}
	/*===============================================================*/
	/* SW3チェック(MM) */
	if(NSW3==0){
		SW3count++;
		if(SW3status==0 && SW3count==SwPushCount){
			SW3status=1;
			SW3count=0;
			SW3Push();
		}
		if(SW3status==1 && SW3count==SwLongCount){
			SW3status=2;
			SW3count=0;
			SW3Long();
		}
		if((SW3status==2 || SW3status==3) && SW3count==SwContenuCount){
			SW3status=3;
			SW3count=0;
			SW3Contenu();
		}
	}else{
		SW3count=0;
		switch(SW3status) {
			case 1:
				SW3status=0;
				SW3Rel();
				break;
			case 2:
			case 3:
				SW3status=0;
				SW3LgRel();
		}
	}
	/*===============================================================*/
	/* SW4チェック(M) */
	if(NSW4==0){
		SW4count++;
		if(SW4status==0 && SW4count==SwPushCount){
			SW4status=1;
			SW4count=0;
			SW4Push();
		}
		if(SW4status==1 && SW4count==SwLongCount){
			SW4status=2;
			SW4count=0;
			SW4Long();
		}
		if((SW4status==2 || SW4status==3) && SW4count==SwContenuCount){
			SW4status=3;
			SW4count=0;
			SW4Contenu();
		}
	}else{
		SW4count=0;
		switch(SW4status) {
			case 1:
				SW4status=0;
				SW4Rel();
				break;
			case 2:
			case 3:
				SW4status=0;
				SW4LgRel();
		}
	}
	/*===============================================================*/
	/* SW5チェック(SecReset) */
	if(NSW5==0){
		SW5count++;
		if(SW5status==0 && SW5count==SwPushCount){
			SW5status=1;
			SW5count=0;
			SW5Push();
		}
		if(SW5status==1 && SW5count==SwLongCount){
			SW5status=2;
			SW5count=0;
			SW5Long();
		}
		if((SW5status==2 || SW5status==2) && SW5count==SwContenuCount){
			SW5status=3;
			SW5count=0;
			SW5Contenu();
		}
	}else{
		SW5count=0;
		switch(SW5status) {
			case 1:
				SW5status=0;
				SW5Rel();
				break;
			case 2:
			case 3:
				SW5status=0;
				SW5LgRel();
		}
	}
	/*===============================================================*/
	/* SW6チェック(Alm1) */
	if(NSW6==0){
		SW6count++;
		if(SW6status==0 && SW6count==SwPushCount){
			SW6status=1;
			SW6count=0;
			SW6Push();
		}
		if(SW6status==1 && SW6count==SwLongCount){
			SW6status=2;
			SW6count=0;
			SW6Long();
		}
		if((SW6status==2 || SW6status==3) && SW6count==SwContenuCount){
			SW6status=3;
			SW6count=0;
			SW6Contenu();
		}
	}else{
		SW6count=0;
		switch(SW6status) {
			case 1:
				SW6status=0;
				SW6Rel();
				break;
			case 2:
			case 3:
				SW6status=0;
				SW6LgRel();
		}
	}
	/*===============================================================*/
	/* SW7チェック(Alm2) */
	if(NSW7==0){
		SW7count++;
		if(SW7status==0 && SW7count==SwPushCount){
			SW7status=1;
			SW7count=0;
			SW7Push();
		}
		if(SW7status==1 && SW7count==SwLongCount){
			SW7status=2;
			SW7count=0;
			SW7Long();
		}
		if((SW7status==2 || SW7status==3) && SW7count==SwContenuCount){
			SW7status=3;
			SW7count=0;
			SW7Contenu();
		}
	}else{
		SW7count=0;
		switch(SW7status) {
			case 1:
				SW7status=0;
				SW7Rel();
				break;
			case 2:
			case 3:
				SW7status=0;
				SW7LgRel();
		}
	}
	/*===============================================================*/

}

/********************************************************************/
/* タイマ割り込み処理 */
void IntTimer(void)
{
	static unsigned char i;

	/* タイマ変数加算 */
	i++;

	/* 0.5秒の通知 */
	if(i==TimIntLoop){
		i=0;
		HalfSec();
	}
}



/********************************************************************/
/* イベント通知レイヤー                                             */
/********************************************************************/
/* 初期化終了通知 */
void InitDone(void)
{

}

/********************************************************************/
/* SW1(mode) 押下 */
void SW1Push(void)
{

}

/********************************************************************/
/* SW1(mode) 長押し */
void SW1Long(void)
{

}

/********************************************************************/
/* SW1(mode) 長押し継続 */
void SW1Contenu(void)
{

}

/********************************************************************/
/* SW1(mode) 開放 */
void SW1Rel(void)
{

}

/********************************************************************/
/* SW1(mode) 長押し開放 */
void SW1LgRel(void)
{

}

/********************************************************************/
/* SW2(hh) 押下 */
void SW2Push(void)
{

}

/********************************************************************/
/* SW2(hh) 長押し */
void SW2Long(void)
{

}

/********************************************************************/
/* SW2(hh) 長押し継続 */
void SW2Contenu(void)
{

}

/********************************************************************/
/* SW2(hh) 開放 */
void SW2Rel(void)
{

}

/********************************************************************/
/* SW2(hh) 長押し開放 */
void SW2LgRel(void)
{

}

/********************************************************************/
/* SW3(mm) 押下 */
void SW3Push(void)
{

}

/********************************************************************/
/* SW3(mm) 長押し */
void SW3Long(void)
{

}

/********************************************************************/
/* SW3(mm) 長押し継続 */
void SW3Contenu(void)
{

}

/********************************************************************/
/* SW3(mm) 開放 */
void SW3Rel(void)
{

}

/********************************************************************/
/* SW3(mm) 長押し開放 */
void SW3LgRel(void)
{

}

/********************************************************************/
/* SW4(m) 押下 */
void SW4Push(void)
{

}

/********************************************************************/
/* SW4(m) 長押し */
void SW4Long(void)
{

}

/********************************************************************/
/* SW4(m) 長押し継続 */
void SW4Contenu(void)
{

}

/********************************************************************/
/* SW4(m) 開放 */
void SW4Rel(void)
{

}

/********************************************************************/
/* SW4(m) 長押し開放 */
void SW4LgRel(void)
{

}

/********************************************************************/
/* SW5(SecReset) 押下 */
void SW5Push(void)
{

}

/********************************************************************/
/* SW5(SecReset) 長押し */
void SW5Long(void)
{

}

/********************************************************************/
/* SW5(SecReset) 長押し継続 */
void SW5Contenu(void)
{

}

/********************************************************************/
/* SW5(SecReset) 開放 */
void SW5Rel(void)
{

}

/********************************************************************/
/* SW5(SecReset) 長押し開放 */
void SW5LgRel(void)
{

}

/********************************************************************/
/* SW6(Alm1 Snooze/Stop) 押下 */
void SW6Push(void)
{

}

/********************************************************************/
/* SW6(Alm1 Snooze/Stop) 長押し */
void SW6Long(void)
{

}

/********************************************************************/
/* SW6(Alm1 Snooze/Stop) 長押し継続 */
void SW6Contenu(void)
{

}

/********************************************************************/
/* SW6(Alm1 Snooze/Stop) 開放 */
void SW6Rel(void)
{

}

/********************************************************************/
/* SW6(Alm1 Snooze/Stop) 長押し開放 */
void SW6LgRel(void)
{

}

/********************************************************************/
/* SW7(Alm2 Snooze/Stop) 押下 */
void SW7Push(void)
{

}

/********************************************************************/
/* SW7(Alm2 Snooze/Stop) 長押し */
void SW7Long(void)
{

}

/********************************************************************/
/* SW7(Alm2 Snooze/Stop) 長押し継続 */
void SW7Contenu(void)
{

}

/********************************************************************/
/* SW7(Alm2 Snooze/Stop) 開放 */
void SW7Rel(void)
{

}

/********************************************************************/
/* SW7(Alm2 Snooze/Stop) 長押し開放 */
void SW7LgRel(void)
{

}

/********************************************************************/
/* 0.5秒通知 */
void HalfSec(void)
{

}

/********************************************************************/
/* loopイベント通知 */
void LoopEvnt(void)
{

}


/********************************************************************/
/* アプリ処理レイヤー                                               */
/********************************************************************/
/* アプリケーションはこの下に記述 */