#include "PWLock.h"

/* 鍵消抖延時函數 */
void delay(void)
{
	uchar i;
	for (i=300;i>0;i--);
}

/* 鍵掃描函數 */
uchar keyscan(void)
{
	uchar scancode,tmpcode;
	P1 = 0xf0;			 					// 發全0行掃描碼
	if ((P1&0xf0)!=0xf0)					// 若有鍵按下
	{
		delay();							// 延時去抖動
		if ((P1&0xf0)!=0xf0)				// 延時后再判斷一次，去除抖動影響
		{
			scancode = 0xfe;
			while((scancode&0x10)!=0)		// 逐行掃描
			{
				P1 = scancode;				// 輸出行掃描碼
				if ((P1&0xf0)!=0xf0)		// 本行有鍵按下
				{
					tmpcode = (P1&0xf0)|0x0f;

					/* 返回特征字節碼，為1的位即對應于行和列 */
					return((~scancode)+(~tmpcode));
				}
				else scancode = (scancode<<1)|0x01;		// 行掃描碼左移一位
			}
		}
	}
	return(0);								// 無鍵按下，返回值為0 	
}

/* 定時器0中斷服務子程序，2ms定時動態掃描顯示 */
void time0_int(void) interrupt 1 
{
	/* 重置2ms定時 */
	TH0 = -2000/256;
	TL0 = -2000%256;

	if (showflag==1)
		display();				// 調用顯示函數
}

/* 定時器1中斷服務子程序，50ms*/
void time1_int(void) interrupt 3 
{
	uchar k;
	/* 重置50ms定時 */
	TH1 = -50000/256;
	TL1 = -50000%256;

	if (t1count<10)				
	{
		t1count++;
	}
	else						// 計時到1s
	{
		TR1 = 0;				// 關閉計數器1
		t1count = 0;	
		green = 1;				// 綠燈不亮
		red = 1;				// 紅燈不亮
		showflag = 1;			// 打開數碼管顯示
		digbit = 0x01;			// 從數碼管第1位開始動態顯示
		for (k=0;k<6;k++)		// 顯示888888
			wordbuf[k] = 8;
	}
}

/* 根據共陰極字型編碼表獲取0~9，A~B字型代碼 */
uchar getcode(uchar i)
{
	uchar p;
	switch (i)
	{
		case 0:	 p=0x3f;	break;			/* 0 */
		case 1:	 p=0x06;	break;			/* 1 */
		case 2:	 p=0x5B;	break;			/* 2 */
		case 3:	 p=0x4F;	break;			/* 3 */
		case 4:	 p=0x66;	break;			/* 4 */
		case 5:	 p=0x6D;	break;			/* 5 */
		case 6:	 p=0x7D;	break;			/* 6 */
		case 7:	 p=0x07;	break;			/* 7 */
		case 8:	 p=0x7F;	break;			/* 8 */
		case 9:	 p=0x67;	break;			/* 9 */
		case 10: p=0x77;	break;			/* A */
		case 11: p=0x7C;	break;			/* B */
		case 12: p=0x39;	break;			/* C */
		case 13: p=0x5E;	break;			/* D */
		case 14: p=0x79;	break;			/* E */
		case 15: p=0x71;	break;			/* F */
		default: 			break;
	}
	return(p);
}

/* 顯示函數 */
void display(void)
{
	uchar i;
	switch (digbit)
	{
		case 1:		i=0;	break;
		case 2:		i=1;	break;
		case 4:		i=2;	break;
		case 8:		i=3;	break;
		case 16:	i=4;	break;
		case 32:	i=5;	break;
		default: 	break;
	}  

	P2 = 0x0;						// 關閉顯示
	P0 = getcode(wordbuf[i]);		// 送字型碼
	P2 = digbit;					// 送字位碼
	
	if (digbit<0x20)				// 共6位
		digbit = 2*digbit;			// 左移一位
	else
	    digbit = 0x01;
}

/* 密碼比較函數 */
bit pwcmp(void)
{
	bit flag;
	uchar i;
	for (i=0;i<6;i++)
	{
		if (pw[i]==pwbuf[i])
			flag = 1;
		else
		{
			flag = 0;
			i = 6;
		}
	}
	return(flag);
} 

/* 主程序 */
void main()
{
	uchar j,key;

	P2 = 0x00;							// 關閉數碼管顯示
	
	TMOD = 0x11;						// T0，T1工作方式1

	/* 2ms 定時設置 */
	TH0 = -2000/256;		  // (65536-2000)+1=補碼形式的-2000
	TL0 = -2000%256;

	/* 50ms 定時設置 */
	TH1 = -50000/256;
	TL1 = -50000%256;
	
	/* 啟動計數器0，關閉計數器1 */
	TR0 = 1;
	ET0 = 1;
	TR1 = 0;
	ET1 = 1;
	EA = 1;

	count = 0;						// 初始沒有輸入密碼，計數器設為0
	enterflag = 0;					// 沒有按下確認鍵
	pwflag = 0;						// 密碼標志先置為0
    green = 1;						// 綠燈不亮
	red = 1;						// 紅燈不亮
	
	/* 假設內定密碼為888888 */
	pw[0] = 8;
	pw[1] = 8;
	pw[2] = 8;
	pw[3] = 8;
	pw[4] = 8;
	pw[5] = 8;
	
	digbit = 0x01;					// 從第一位數碼管開始動態掃描

	/* 剛加電時，顯示888888 */
	for (j=0;j<6;j++)
		wordbuf[j] = 8;

	showflag = 1;					// 打開數碼管顯示

  	while(1)
  {	  P1 = 0xf0;
      if ((P1&0xf0)!=0xf0)	//	 有健按下
		{
			key = keyscan();					// 調用鍵盤掃描函數
			switch(key)
	   		{
	      		case 0x11:						// 1行1列，數字0
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F”
						pwbuf[count] = 0;
						count++;
					}
					break;
				case 0x21:						// 1行2列，數字1
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F"
						pwbuf[count] = 1;
						count++;
					}
					break;			
				case 0x41:						// 1行3列，數字2
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F"
						pwbuf[count] = 2;
						count++;
					}
					break;
	     		case 0x81:						// 1行4列，數字3
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F"
						pwbuf[count] = 3;
						count++;
					}
					break;
				case 0x12:						// 2行1列，數字4
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F"
						pwbuf[count] = 4;
						count++;
					}
					break;
				case 0x22:						// 2行2列，數字5
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F"
						pwbuf[count] = 5;
						count++;
					}
					break;
				case 0x42:						// 2行3列，數字6
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F"
						pwbuf[count] = 6;
						count++;
					}
					break;
				case 0x82:						// 2行4列，數字7
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F"
						pwbuf[count] = 7;
						count++;
					}
					break;
				case 0x14:						// 3行1列，數字8
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F"
						pwbuf[count] = 8;
						count++;
					}
					break;
				case 0x24:						// 3行2列，數字9
					if (count<6)
					{
						wordbuf[count] = 0x0f;	// 對應密碼位上顯示“F"
						pwbuf[count] = 9;
						count++;
					}
					break;
				case 0x44:						// 3行3列，確認鍵
					enterflag = 1;				// 確認鍵按下
					if (count==6) 				// 只有輸入6個密碼后按確認鍵才作密碼比較
						pwflag = pwcmp();
					else						
						pwflag = 0;				// 否則直接pmflag賦0
					break;
				case 0x84:						// 3行4列，取消鍵
					count = 0;					// 密碼計數清零
					for (j=0;j<6;j++)
					{
						wordbuf[j] = 8;			// 數碼管顯示888888
						pwbuf[j] = 0x0f;		// 用FFFFFF清除已經輸入的密碼
					}
					break;
				default:break;
			}
		    while((P1&0xf0)!=0xf0);  //松手檢測
			   
			}
			
			
			if (enterflag==1)					// 如果按下確認鍵
			{
				enterflag = 0; 					// 標志位置回0
				count = 0;						// 密碼位計數器清零
				for (j=0;j<6;j++)
					pwbuf[j] = 0x0f;			// 用FFFFFF清除已經輸入的密碼			
				showflag = 0;					// 關閉數碼管顯示
				TR1 = 1;						// 計數器1開始計數
				t1count = 0;					// 定時器1由50ms累積到1s所用的計數器
				if (pwflag==1)			
					green = 0; 					// 綠燈亮
				else							
					red = 0; 					// 紅燈亮		
			}
		   
	    		 
	}   
}