#include <REGX51.H>
#include "ds1302.h"			//包含DS1302頭文件
#define leddata P0			//定義LED數據口
#define sec 0x80			//1302秒寄存器地址
#define min 0x82			//1302分寄存器地址
#define hou 0x84			//1302時寄存器地址
#define read 0x01			//讀操作，因為讀的時候地址要加1，使最低位為1
sbit MODE=P3^4;				//按鍵定義，下同
sbit SET=P3^5;
sbit UP=P3^6;
sbit DOWN=P3^7;
sbit led0=P2^0;				//LED位選，因為布線不是按順序布的，程序定義一下就可以了，下同
sbit led1=P2^3;
sbit led2=P2^7;
sbit led3=P2^4;
sbit led4=P2^6;
sbit led5=P2^5;
//**************函數聲明*****************
void delays(unsigned char);
void display(void);
void Scan_Key(void);
void id_case1_key();
void Set_id(unsigned char ,unsigned char);
//*************變量定義******************
unsigned char id=0,timecount,re_disp=0;		//定義用到的變量，id為調整模式用，不為0時表示調整模式，調整哪個量由id值確定
											//timecount用于500ms定時記數，時間到取反flag標志位，re_disp記數200次共10s，調整狀態下按鍵無操作10s自動返回正常顯示狀態
bit hour,minute,second,flag;				//定義位變量，hour,minute,second分別為調整時閃爍標志位，flag 500ms取反一次，調整位閃爍及冒號閃爍用
unsigned char code tab[]={0x48,0xEE,0x54,0xC4,0xE2,0xC1,0x41,0xEC,0x40,0xC0,0x60};	//LED碼表，根據硬件修改
unsigned char inittime[7]={0x00,0x00,0x12,0x16,0x11,0x06,0x04};						//初始化1302時用到的初始化數據
//                          秒  分鐘 小時  日   月   年  星期
void t0(void) interrupt 1 using 0			//中斷處理程序，主要用于取反標志位，返回正常顯示狀態
{
  	TH0=(65535-50000)/256; //50ms定時
  	TL0=(65535-50000)%256;  
  	timecount++;re_disp++;
  	if(timecount>9)
   		{
			timecount=0;
    		flag=~flag;
   		}
	if(re_disp>200){re_disp=0;if(id)id=0;}
}
void delays(unsigned char k)				//延時函數
{
	unsigned char i,j;
	for(i=0;i<k;i++)
		for(j=0;j<50;j++);
}
void display(void)							//顯示函數
{
	if(flag&hour)							//如hour為1表示調整時，flag為1時不顯示
		{
			led0=0;leddata=0xff;delays(10);led0=1;
			led1=0;leddata=0xff&~((unsigned char)~flag<<6);delays(10);led1=1;	//&~((unsigned char)~flag<<6)該句根據flag的值決定來顯示小數點，為1時顯示，4個小數點組成兩對冒號，下同
		}
	else									//flag為0時顯示，產生閃爍效果，下同
		{
			leddata=tab[Read1302(hou|read)/16];led0=0;delays(10);led0=1;
			leddata=tab[Read1302(hou|read)%16]&~((unsigned char)~flag<<6);led1=0;delays(10);led1=1;
		}
	if(flag&minute)
		{
			led2=0;leddata=0xff&~((unsigned char)~flag<<6);delays(10);led2=1;
			led3=0;leddata=0xff&~((unsigned char)~flag<<6);delays(10);led3=1;
		}
	else
		{
			leddata=tab[Read1302(min|read)/16]&~((unsigned char)~flag<<6);led2=0;delays(10);led2=1;
			leddata=tab[Read1302(min|read)%16]&~((unsigned char)~flag<<6);led3=0;delays(10);led3=1;
		}
	if(flag&second)
		{
			led4=0;leddata=0xff&~((unsigned char)~flag<<6);delays(10);led4=1;
			led5=0;leddata=0xff;delays(10);led5=1;
		}
	else
		{
			leddata=tab[Read1302(sec|read)/16]&~((unsigned char)~flag<<6);led4=0;delays(10);led4=1;
			leddata=tab[Read1302(sec|read)%16];led5=0;delays(10);led5=1;
		}
}
void Scan_Key(void)				//鍵盤檢測函數
{
	display();					//程序開頭調用顯示函數
	if(!SET)					
		{
			while(!SET)display();	//等待按鍵釋放，如一直按下一直調用顯示函數，防止顯示中斷
			re_disp=0;				//清除記數，重新開始10s定時
			id++;if(id>3)id=0;		//id加1，后面根據id值對應調整項目
		}
	if(id==0){hour=0;minute=0;second=0;}	//根據id值跳到相應處理函數
	if(id==1){hour=1;id_case1_key();}		//id為1，選擇調整小時位，閃爍標志位置1，然后跳到鍵盤處理函數，下同
	if(id==2){hour=0;minute=1;id_case1_key();}
	if(id==3){minute=0;second=1;id_case1_key();}
}
void id_case1_key(void)						//鍵盤處理函數，只有按下set鍵時才會進入，
{
	display();								
  	if (!DOWN) //減少
      	{
       		while(!DOWN)display();			//等待按鍵釋放，如一直按下一直調用顯示函數，防止顯示中斷
			re_disp=0;						//清除記數，重新開始10s定時
	   		Set_id(id,0);					//跳到加減判斷函數，下同，
      	}
   	if (!UP)  //增加
      	{
       		while(!UP)display();
			re_disp=0;
	   		Set_id(id,1);    
      	}
}

//根據選擇調整相應項目并寫入DS1302
void Set_id(unsigned char sel,unsigned char sel_1)		//執行調整項目的函數
{
  	signed char max,mini,address,item;					
	if(sel==1)  {address=hou; max=23;mini=0;}    //小時	//根據id值確定要調整的項，并確定調整上下限，下同
	if(sel==2)  {address=min; max=59;mini=0;}    //分鐘
  	if(sel==3)  {address=sec; max=0;mini=0;}     //秒
  	item=Read1302(address|read)/16*10+Read1302(address|read)%16;	//從相應的地址讀取當前數據并轉換為十進制
  	if (sel_1==0) item--;  else item++;								//確定是對項目加還是減，并對越限處理
 	if(item>max) item=mini;   
  	if(item<mini) item=max;
	Write1302(0x8e,0x00);//允許寫操作	
  	Write1302(address,item/10*16+item%10);							//將調整結果轉換成壓縮BCD碼重新寫入1302
  	Write1302(0x8e,0x80);//寫保護，禁止寫操作  
}
void main()							//主函數
	{  
		TMOD=0x01;					//初始化定時器
  		TH0=(65535-50000)/256;
  		TL0=(65535-50000)%256;
  		EA=1;
  		ET0=1;
		TR0=1; 
		Write1302(0x90,0xa0);//關閉充電二級管，不能對后備電池進行充電，防止發脹，原來的程序是打開的請關閉 
 		Write1302(0x8e,0x80);//寫保護，禁止寫操作 
		if(!UP&!DOWN)Set1302(inittime);			//如果同時按下UP和DOWN鍵則初始化1302，該語句在while(1)前，只執行一次，需要復位，防止誤操作
		while(1)
			{  
				Scan_Key();						//主程序一直調用鍵盤檢測函數即可
			}
}