#include <reg52.h>
#include <intrins.h>

sbit SCK=P3^5;		
sbit SDA=P3^6;		
sbit RST = P3^7;   // DS1302復位

bit ReadRTC_Flag;

unsigned int l_tmpdate[7]={0,0,12,15,5,3,8};//秒分時日月周年08-05-15 12:00:00
unsigned char l_tmpdisplay[8];
code unsigned char write_rtc_address[7]={0x80,0x82,0x84,0x86,0x88,0x8a,0x8c}; //秒分時日月周年 最低位讀寫位
code unsigned char read_rtc_address[7]={0x81,0x83,0x85,0x87,0x89,0x8b,0x8d};  

												
void Write_Ds1302_byte(unsigned char temp); 
void Write_Ds1302( unsigned char address,unsigned char dat );
unsigned char Read_Ds1302 ( unsigned char address );
void DelayMs(unsigned char ms);//delay Ms
void InitLcd();
void disp(void);

void Read_RTC(void);//read RTC 
void Set_RTC(void); //set RTC 

void InitTIMER0(void);//inital timer0

void main(void)    
{
    InitTIMER0();
 	Set_RTC();//設置時間初值
	InitLcd();//初始化LCD
    DelayMs(15);//延時用于穩定功能
	while(1){
	 if(ReadRTC_Flag)
	 {
	    ReadRTC_Flag=0;//標志位清零
		Read_RTC();//讀取時鐘
		disp();//調用顯示功能
	 }
   }
}

void InitTIMER0(void)
{
 TMOD|=0x01;//定時器設置 16位
 TH0=0xef;//初始化值
 TL0=0xf0;
 ET0=1;
 TR0=1;
 EA=1;
}



void Write_Ds1302_Byte(unsigned  char temp) 
{
 unsigned char i;
 for (i=0;i<8;i++)     	//循環8次 寫入數據
  { 
   SCK=0;
     SDA=temp&0x01;     	//每次傳輸低字節 
     temp>>=1;  		//右移一位
     SCK=1;
   }
}   

/****************************************************************************/
void Write_Ds1302( unsigned char address,unsigned char dat )     
{
 	RST=0;
	_nop_();
 	SCK=0;
	_nop_();
 	RST=1;	
   	_nop_();   //啟動
 	Write_Ds1302_Byte(address);	//發送地址
 	Write_Ds1302_Byte(dat);		//發送數據
 	RST=0;  		//恢復
}
/****************************************************************************/
unsigned char Read_Ds1302 ( unsigned char address )
{
 	unsigned char i,temp=0x00;
 	RST=0;
	_nop_();
 	SCK=0;
	_nop_();
 	RST=1;
	_nop_();
 	Write_Ds1302_Byte(address);
 	for (i=0;i<8;i++) 		//循環8次 讀取數據
 	{		
 		if(SDA)
 		temp|=0x80;			//每次傳輸低字節
		SCK=0;
		temp>>=1;			//右移一位
 		SCK=1;
	} 
 	RST=0;
	_nop_();		//以下為DS1302復位的穩定時間
 	RST=0;
	SCK=0;
	_nop_();
	SCK=1;
	_nop_();
	SDA=0;
	_nop_();
	SDA=1;
	_nop_();
	return (temp);			//返回
}
/****************************************************************************/
void Read_RTC(void)		//讀取 日歷
{
 unsigned char i,*p;
 p=read_rtc_address; 	//地址傳遞
 for(i=0;i<7;i++)		//分7次讀取 秒分時日月周年
 {
  l_tmpdate[i]=Read_Ds1302(*p);
  p++;
 }
}
/***********************************************************************/
void Set_RTC(void)		//設定 日歷
{
	unsigned char i,*p,tmp;
	for(i=0;i<7;i++){           //BCD處理
		tmp=l_tmpdate[i]/10;
		l_tmpdate[i]=l_tmpdate[i]%10;
		l_tmpdate[i]=l_tmpdate[i]+tmp*16;
	}
 	Write_Ds1302(0x8E,0X00);
	
 	p=write_rtc_address;	//傳地址	
 	for(i=0;i<7;i++)		//7次寫入 秒分時日月周年
 	{
		  Write_Ds1302(*p,l_tmpdate[i]);
 		 p++;  
	 }
	 Write_Ds1302(0x8E,0x80);
}

void tim(void) interrupt 1 using 1//中斷
{

    static unsigned char i,num;
    TH0=0xf5;
    TL0=0xe0;
	i++;
	if(i==8)
	  {
	   i=0;
	   num++;
	   if(10==num)       //隔段時間讀取1302的數據。時間間隔可以調整
	     {
		 ReadRTC_Flag=1; //使用標志位判斷
		 num=0;
		 }
	   
	   }
 }