/************DS1302時序****************/
#define uchar unsigned char   	//宏定義
/****端口定義*****/
sbit T_CLK = P3^6;   		//設置實時時鐘時鐘線引腳 //
sbit T_IO = P3^4;     		//設置實時時鐘數據線引腳 //
sbit T_RST = P3^5;    		//設置實時時鐘復位線引腳 //
/*****************/
sbit ACC0=ACC^0;   		//定義ACC的位，利用ACC操作速度最快
sbit ACC7=ACC^7;
uchar time1[8];//數碼管段選高位到低位
uchar  counter[3]; //液晶段選高位到低位
/*********時分秒定義變量定義************/                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                
uchar sec,min,hou,day,mon,yea;//定義變量
/****************************************/
/****************************************/
void Init1302(void);//DS1302初始化
void v_WTInputByte(uchar ucDa);//寫數據
uchar uc_RTOutputByte(void);//讀數據
void v_W1302(uchar ucAddr, uchar ucDa);//先寫地址，后寫數據
uchar uc_R1302(uchar ucAddr);//先讀地址，后讀數據
void get_time(void);//取出時間，在數碼管顯示
void set_time(void);
/****************************************/
/****************************************/
/*********往DS1302寫入1Byte數據**************/ 
void v_WTInputByte(uchar ucDa) 
{ 
	uchar i;	  // 定義yi變量
	ACC= ucDa;
	for(i=8; i>0; i--)
 {
		T_IO = ACC0; //*相當于匯編中的 RRC 
		T_CLK = 1; 	//時鐘線置一
		T_CLK = 0;	//關閉時鐘線
		ACC =ACC>> 1; 
	}
}
/**********從DS1302讀取1Byte數據********************/

uchar uc_RTOutputByte(void) 
{ 
	uchar i;
	for(i=8; i>0; i--)
{
		ACC = ACC>>1; //*相當于匯編中的 RRC
        ACC7 = T_IO;
		T_CLK = 1; 
		T_CLK = 0;
	} 
	return(ACC); 
}
/***往DS1302寫入數據，先寫地址，后寫命令/數據*******/
void v_W1302(uchar ucAddr, uchar ucDa)
{
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	v_WTInputByte(ucAddr); /* 地址，命令 */
	v_WTInputByte(ucDa); /* 寫1Byte數據*/
	T_CLK = 1;
	T_RST =0;
}
/*****讀取DS1302某地址的數據，先寫地址，后讀命令/數據*********/
uchar uc_R1302(uchar ucAddr)
{
	uchar ucDa;
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	v_WTInputByte(ucAddr); /* 地址，命令 */
	ucDa = uc_RTOutputByte(); /* 讀1Byte數據 */
	T_CLK = 1;
	T_RST = 0;
	return(ucDa);
}
/***************初始化DS1302*******************/
void init1302(void)
{
	v_W1302(0x8e,0x00); //控制寫入WP=0
	v_W1302(0x90,0xa5);
	v_W1302(0x80,0x56); //秒
	v_W1302(0x82,0x42); //分
	v_W1302(0x84,0x13); //時
	v_W1302(0x86,0x00); //日
	v_W1302(0x88,0x00); //月
	v_W1302(0x8a,0x00); //星期
	v_W1302(0x8c,0x00); //年 
	v_W1302(0x8e,0x80);
}
/*******取出時間并處理，以便送數碼管顯示*********/ 
void get_time(void)
{
	uchar d;
	d=uc_R1302(0x81);
	counter[0]=d/16*10+d%16;  //十六進制轉換為BCD碼
	time1[7]=d&0x0f;
	time1[6]=(d>>4)&0x0f;
	time1[5]=10;
	d=uc_R1302(0x83);
	counter[1]=d/16*10+d%16;  //十六進制轉換為BCD碼
	time1[4]=d&0x0f;
	time1[3]=(d>>4)&0x0f;
	time1[2]=10;
	d=uc_R1302(0x85);
	counter[2]=d/16*10+d%16;  //十六進制轉換為BCD碼
	time1[1]=d&0x0f;
	time1[0]=(d>>4)&0x0f;//顯示十位
}
void set_time(void)
{
	v_W1302(0x8e,0x00);
	v_W1302(0x80,sec);
	v_W1302(0x82,min);
	v_W1302(0x84,hou);
	v_W1302(0x86,day);
	v_W1302(0x88,mon);
	v_W1302(0x8c,yea);
	v_W1302(0x80,0x00);
	v_W1302(0x8e,0x80);
}