#include "c240x.h"
#include "PRO500.h"    
#include "globals.h"  
/*********************************************************************/
/* 實(shí)時(shí)時(shí)鐘模塊 時(shí)鐘芯片型號(hào)：DS1302 */
/*/
/*********************************************************************/
/******************************************************************** 
*
* 名稱(chēng): v_RTInputByte
* 說(shuō)明: 
* 功能: 往DS1302寫(xiě)入1Byte數(shù)據(jù)
* 調(diào)用:
* 輸入: ucDa 寫(xiě)入的數(shù)據(jù) 
* 返回值: 無(wú)
***********************************************************************/
void v_RTInputByte(unsigned int ucDa) 
{ 
unsigned int i,p;
p = ucDa;
for(i=8; i>0; i--)
{
	if(p&1) SSDA;
	else CSDA;
	SSCK;
	SSCK;
	CSCK;
	p = p >> 1; 
	} 
}
/******************************************************************** 
*
* 名稱(chēng): unsigned int uc_RTOutputByte
* 說(shuō)明: 
* 功能: 從DS1302讀取1Byte數(shù)據(jù)
* 調(diào)用: 
* 輸入: 
* 返回值: P
***********************************************************************/
unsigned int uc_RTOutputByte(void) 
{ 
unsigned int i,p;
CSDA;
p=0;
for(i=8; i>0; i--)
{
p = p >>1; 
p|=TDAI;
SSCK;
SSCK;
CSCK;
} 
return(p); 
}
/******************************************************************** 
*
* 名稱(chēng): v_W1302
* 說(shuō)明: 先寫(xiě)地址，后寫(xiě)命令/數(shù)據(jù)
* 功能: 往DS1302寫(xiě)入數(shù)據(jù)
* 調(diào)用: v_RTInputByte() 
* 輸入: ucAddr: DS1302地址, ucDa: 要寫(xiě)的數(shù)據(jù)
* 返回值: 無(wú)
***********************************************************************/
void v_W1302(unsigned int ucAddr, unsigned int ucDa)
{
CRST;
CSCK;
SRST;
v_RTInputByte(ucAddr); /* 地址，命令 */
v_RTInputByte(ucDa); /* 寫(xiě)1Byte數(shù)據(jù)*/
SSCK;
CRST;
} 
/******************************************************************** 
*
* 名稱(chēng): uc_R1302
* 說(shuō)明: 先寫(xiě)地址，后讀命令/數(shù)據(jù)
* 功能: 讀取DS1302某地址的數(shù)據(jù)
* 調(diào)用: v_RTInputByte() , uc_RTOutputByte()
* 輸入: ucAddr: DS1302地址
* 返回值: ucDa :讀取的數(shù)據(jù)
***********************************************************************/
unsigned int uc_R1302(unsigned int ucAddr)
{
unsigned int ucDa;
CRST;
CSCK;
SRST;
v_RTInputByte(ucAddr); /* 地址，命令 */
ucDa = uc_RTOutputByte(); /* 讀1Byte數(shù)據(jù) */
SSCK;
CRST;
return(ucDa);
}
/******************************************************************** 
*
* 名稱(chēng): v_BurstW1302T
* 說(shuō)明: 先寫(xiě)地址，后寫(xiě)數(shù)據(jù)(時(shí)鐘多字節(jié)方式)
* 功能: 往DS1302寫(xiě)入時(shí)鐘數(shù)據(jù)(多字節(jié)方式)
* 調(diào)用: v_RTInputByte() 
* 輸入: pSecDa: 時(shí)鐘數(shù)據(jù)地址 格式為: 秒 分 時(shí) 日 月 星期 年 控制
* 8Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B 1B
* 返回值: 無(wú)
***********************************************************************/
void v_BurstW1302T(unsigned int *pSecDa)
{
unsigned int i;
asm("	SETC	INTM");     /*總中斷開(kāi)關(guān)關(guān)*/
*WDKEY=0X5555;		
*WDKEY=0XAAAA;		
v_W1302(0x8e,0x00); /* 控制命令,WP=0,寫(xiě)操作?*/
CRST;
CSCK;
SRST;
dl5us;
v_RTInputByte(0xbe); /* 0xbe:時(shí)鐘多字節(jié)寫(xiě)命令 */
for (i=8;i>0;i--) /*8Byte = 7Byte 時(shí)鐘數(shù)據(jù) + 1Byte 控制*/
{
v_RTInputByte(*pSecDa);/* 寫(xiě)1Byte數(shù)據(jù)*/
pSecDa++;
}
SSCK;
CRST;
asm("	CLRC	INTM");     /*總中斷開(kāi)關(guān)開(kāi)*/
} 
/******************************************************************** 
*
* 名稱(chēng): v_BurstR1302T
* 說(shuō)明: 先寫(xiě)地址，后讀命令/數(shù)據(jù)(時(shí)鐘多字節(jié)方式)
* 功能: 讀取DS1302時(shí)鐘數(shù)據(jù)
* 調(diào)用: v_RTInputByte() , uc_RTOutputByte()
* 輸入: pSecDa: 時(shí)鐘數(shù)據(jù)地址 格式為: 秒 分 時(shí) 日 月 星期 年 
* 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B
* 返回值: ucDa :讀取的數(shù)據(jù)
***********************************************************************/
void v_BurstR1302T(unsigned int *pSecDa)
{
unsigned int i;
asm("	SETC	INTM");     /*總中斷開(kāi)關(guān)關(guān)*/
*WDKEY=0X5555;		
*WDKEY=0XAAAA;		
CRST;
CSCK;
SRST;
dl5us;
v_RTInputByte(0xbf); /* 0xbf:時(shí)鐘多字節(jié)讀命令 */
for (i=8; i>0; i--) 
{
*pSecDa = uc_RTOutputByte(); /* 讀1Byte數(shù)據(jù) */
pSecDa++;
}
SSCK;
CRST;
asm("	CLRC	INTM");     /*總中斷開(kāi)關(guān)開(kāi)*/
}
/******************************************************************** 
*
* 名稱(chēng): v_BurstW1302R
* 說(shuō)明: 先寫(xiě)地址，后寫(xiě)數(shù)據(jù)(寄存器多字節(jié)方式)
* 功能: 往DS1302寄存器數(shù)寫(xiě)入數(shù)據(jù)(多字節(jié)方式)
* 調(diào)用: v_RTInputByte() 
* 輸入: pReDa: 寄存器數(shù)據(jù)地址
* 返回值: 無(wú)
***********************************************************************/
void v_BurstW1302R(unsigned int *pReDa)
{
unsigned int i;
v_W1302(0x8e,0x00); /* 控制命令,WP=0,寫(xiě)操作?*/
CRST;
CSCK;
SRST;
v_RTInputByte(0xbe); /* 0xbe:時(shí)鐘多字節(jié)寫(xiě)命令 */
for (i=8;i>0;i--) /*7Byte 寄存器數(shù)據(jù) */
{
v_RTInputByte(*pReDa); /* 寫(xiě)1Byte數(shù)據(jù)*/
pReDa++;
}
SSCK;
CRST;
v_W1302(0x8e,0x80); /* 控制命令,WP=0,寫(xiě)操作?*/
} 
/******************************************************************** 
*
* 名稱(chēng): uc_BurstR1302R
* 說(shuō)明: 先寫(xiě)地址，后讀命令/數(shù)據(jù)(寄存器多字節(jié)方式)
* 功能: 讀取DS1302寄存器數(shù)據(jù)
* 調(diào)用: v_RTInputByte() , uc_RTOutputByte()
* 輸入: pReDa: 寄存器數(shù)據(jù)地址
* 返回值: 無(wú)
***********************************************************************/
void v_BurstR1302R(unsigned int *pReDa)
{
unsigned int i;
CRST;
CSCK;
SRST;
v_RTInputByte(0xbf); /* 0xbf:時(shí)鐘多字節(jié)讀命令 */
for (i=8; i>0; i--) /*31Byte 寄存器數(shù)據(jù) */
{
*pReDa = uc_RTOutputByte(); /* 讀1Byte數(shù)據(jù) */
pReDa++;
}
SSCK;
CRST;
}
/******************************************************************** 
*
* 名稱(chēng): v_Set1302
* 說(shuō)明: 
* 功能: 設(shè)置初始時(shí)間
* 調(diào)用: v_W1302() 
* 輸入: pSecDa: 初始時(shí)間地址。初始時(shí)間格式為: 秒 分 時(shí) 日 月 星期 年 
* 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 無(wú)
***********************************************************************/
void v_Set1302(unsigned int *pSecDa) 
{
unsigned int i;
unsigned int ucAddr = 0x80; 
v_W1302(0x8e,0x00); /* 控制命令,WP=0,寫(xiě)操作?*/
for(i =7;i>0;i--)
{ 
v_W1302(ucAddr,*pSecDa); /* 秒 分 時(shí) 日 月 星期 年 */

pSecDa++;
ucAddr +=2;
}
v_W1302(0x8e,0x80); /* 控制命令,WP=1,寫(xiě)保護(hù)?*/
}
/******************************************************************** 
*
* 名稱(chēng): v_Get1302
* 說(shuō)明: 
* 功能: 讀取DS1302當(dāng)前時(shí)間
* 調(diào)用: uc_R1302() 
* 輸入: ucCurtime: 保存當(dāng)前時(shí)間地址。當(dāng)前時(shí)間格式為: 秒 分 時(shí) 日 月 星期 年 
* 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 無(wú)
***********************************************************************/
void v_Get1302(unsigned int ucCurtime[]) 
{
unsigned int i;
unsigned int ucAddr = 0x81;
for (i=0;i<7;i++)
{
ucCurtime[i] = uc_R1302(ucAddr);/*格式為: 秒 分 時(shí) 日 月 
星期 年 */
ucAddr += 2;
}
} 

/******************************************************************** 
*
* 名稱(chēng): v_Set1302CH
* 說(shuō)明: 
* 功能: 設(shè)置1302充電命令
* 調(diào)用: v_W1302() 
* 輸入: 無(wú)
* 返回值: 無(wú)
***********************************************************************/
void v_Set1302CH() 
{
unsigned int i;
unsigned int ucAddr = 0x80; 
v_W1302(0x8e,0x00); /* 控制命令,WP=0,寫(xiě)操作?*/
v_W1302(0x90,0x0A9); /* 允許充電，2二極管，2K*/
v_W1302(0x8e,0x80); /* 控制命令,WP=1,寫(xiě)保護(hù)?*/
}