/*時鐘程序,大家是否想到用定時器，對，也可用定時器的中斷來處理，這樣的程序我想不用我說了吧！
你們可自己發輝下，本程序采用外元件DS1302時鐘IC，使用此IC不增加系統資源，要時鐘時直接去讀取就可以了
本IC跟ADC0831一樣以串口方式傳送數據，不同的是協議，只要你讀懂它的串口協議，就可以用P口來模擬協議進行
，這樣更能使你對傳送數據協議的了解，在看本程序之前，先看看芯片的串口協議*/

#include <reg51.h>
#include <intrins.h>

sbit SCL2=P1^3;		//SCL2定義為P1口的第3位腳，連接DS1302SCL和ADC0831SCL腳
sbit SDA2=P1^4;		//SDA2定義為P1口的第4位腳，連接DS1302SCL和ADC0831SDA腳
//sbit CS2=P1^6;		//CS2定義為P1口的第4位腳，連接ADC0831CS腳
sbit RST = P1^5;   // DS1302片選腳

unsigned char l_tmpdate[8]={0x00,0x06,0x03,0x18,0x0c,0x07,0x06,0};
unsigned char l_tmpdisplay[8]={0x40,0x40,0x40,0x40,0x40,0x40,0x40,0};
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[]=
			{0x3f,0x06,0x5b,0x4f,0x66,
			0x6d,0x7d,0x07,0x7f,0x6f,
			0x40,0x00}; 
			//共陰數碼管 0-9  '-' '熄滅‘表

void delay();//延時子函數，5個空指令
void display(unsigned char *lp,unsigned char lc);//數字的顯示函數；lp為指向數組的地址，lc為顯示的個數
													//這個函數在第二節用過不用再說了吧！
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 main(void)     //入口函數
{
	Set_RTC();
	while(1){
		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;
		}
		display(l_tmpdisplay,8);
	}
}

void display(unsigned char *lp,unsigned char lc)//顯示
{
	unsigned char i;		//定義變量
	P2=0;					//端口2為輸出
	P1=P1&0xF8;				//將P1口的前3位輸出0，對應138譯門輸入腳，全0為第一位數碼管
	for(i=0;i<lc;i++){		//循環顯示
	P2=table[lp[i]];		//查表法得到要顯示數字的數碼段
	delay();				//延時
	P2=0;					//清0端口，準備顯示下位
	if(i==7)				//檢測顯示完8位否，完成直接退出，不讓P1口再加1，否則進位影響到第四位數據
		break;	
	P1++;					//下一位數碼管
	}
}
void delay(void)								//空5個指令
{
	unsigned char i=10;
	while(i)
		i--;
}
void Write_Ds1302_Byte(unsigned  char temp) 
{
 unsigned char i;
 for (i=0;i<8;i++)     	//循環8次 寫入數據
  { 
   SCL2=0;
     SDA2=temp&0x01;     	//每次傳輸低字節 
     temp>>=1;  		//右移一位
     SCL2=1;
   }
}   

/****************************************************************************/
void Write_Ds1302( unsigned char address,unsigned char dat )     
{
 	RST=0;
	_nop_();
 	SCL2=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_();
 	SCL2=0;
	_nop_();
 	RST=1;
	_nop_();
 	Write_Ds1302_Byte(address);
 	for (i=0;i<8;i++) 		//循環8次 讀取數據
 	{
		SCL2=1;	
		_nop_();	
 		if(SDA2)
 		temp|=0x80;			//每次傳輸低字節
		SCL2=0;
		temp>>=1;			//右移一位
	} 
 	RST=0;
	_nop_();		
	SCL2=1;
	SDA2=0;
	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++){
		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);
}