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

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

bit ReadRTC_Flag;

unsigned char 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};  

code unsigned char table[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0xbf,0xff}; 
			         //共陰數碼管 0-9  '-' '熄滅‘表
code unsigned char table1[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
                     //顯示位碼表

												
void Write_Ds1302_byte(unsigned char temp); 
void Write_Ds1302( unsigned char address,unsigned char dat );
unsigned char Read_Ds1302 ( unsigned char address );

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

void InitTIMER0(void);//inital timer0

void main(void)    
{
    InitTIMER0();
 	Set_RTC();
	while(1){
	 if(ReadRTC_Flag)
	 {
	    ReadRTC_Flag=0;
		Read_RTC();
		switch (l_tmpdate[0]/5)   //設計每個5秒 交替顯示 年月日 時分秒
		{
		case 0:
		case 2:
		case 4:
		case 6:
		case 8:
		case 10:
			l_tmpdisplay[0]=l_tmpdate[2]/16;			//數據的轉換，因我們采用數碼管0~9的顯示,將數據分開
			l_tmpdisplay[1]=l_tmpdate[2]&0x0f;
			l_tmpdisplay[2]=10;					    	//加入"-"
			l_tmpdisplay[3]=l_tmpdate[1]/16;
			l_tmpdisplay[4]=l_tmpdate[1]&0x0f;
			l_tmpdisplay[5]=10;
			l_tmpdisplay[6]=l_tmpdate[0]/16;
			l_tmpdisplay[7]=l_tmpdate[0]&0x0f;	
			break;
		case 1:
		case 3:
		case 5:
		case 7:
		case 9:
		case 11:
			l_tmpdisplay[0]=l_tmpdate[6]/16;
			l_tmpdisplay[1]=l_tmpdate[6]&0x0f;
			l_tmpdisplay[2]=10;
			l_tmpdisplay[3]=l_tmpdate[4]/16;
			l_tmpdisplay[4]=l_tmpdate[4]&0x0f;
			l_tmpdisplay[5]=10;
			l_tmpdisplay[6]=l_tmpdate[3]/16;
			l_tmpdisplay[7]=l_tmpdate[3]&0x0f;
			break;
		default:
			break;
		}
	
	 }
	}
}

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;

 	P0=table[l_tmpdisplay[i]];		//查表法得到要顯示數字的數碼段
	P2=table1[i];
	i++;
	if(i==8)
	  {
	   i=0;
	   num++;
	   if(10==num)       //隔段時間讀取1302的數據。時間間隔可以調整
	     {
		 ReadRTC_Flag=1; //使用標志位判斷
		 num=0;
		 }
	   
	   }
 }