實(shí)時(shí)時(shí)鐘芯片DS1302的C51程序列子

/*********************************************************************/
/*實(shí)時(shí)時(shí)鐘模塊時(shí)鐘芯片型號(hào)：DS1302*/
/*/
/*********************************************************************/
sbitT_CLK=P2^7;/*實(shí)時(shí)時(shí)鐘時(shí)鐘線(xiàn)引腳*/
sbitT_IO=P1^4;/*實(shí)時(shí)時(shí)鐘數(shù)據(jù)線(xiàn)引腳*/
sbitT_RST=P1^5;/*實(shí)時(shí)時(shí)鐘復(fù)位線(xiàn)引腳*/
/********************************************************************
*
*名稱(chēng):v_RTInputByte
*說(shuō)明:
*功能:往DS1302寫(xiě)入1Byte數(shù)據(jù)
*調(diào)用:
*輸入:ucDa寫(xiě)入的數(shù)據(jù)
*返回值:無(wú)
***********************************************************************/
voidv_RTInputByte(ucharucDa)
{
uchari;
ACC=ucDa;
for(i=8;i>0;i--)
{
T_IO=ACC0;/*相當(dāng)于匯編中的RRC*/
T_CLK=1;
T_CLK=0;
ACC=ACC>>1;
}
}
/********************************************************************
*
*名稱(chēng):ucharuc_RTOutputByte
*說(shuō)明:
*功能:從DS1302讀取1Byte數(shù)據(jù)
*調(diào)用:
*輸入:
*返回值:ACC
***********************************************************************/
ucharuc_RTOutputByte(void)
{
uchari;
for(i=8;i>0;i--)
{
ACC=ACC>>1;/*相當(dāng)于匯編中的RRC*/
ACC7=T_IO;
T_CLK=1;
T_CLK=0;
}
return(ACC);
}
/********************************************************************
*
*名稱(chēng):v_W1302
*說(shuō)明:先寫(xiě)地址，后寫(xiě)命令/數(shù)據(jù)
*功能:往DS1302寫(xiě)入數(shù)據(jù)
*調(diào)用:v_RTInputByte()
*輸入:ucAddr:DS1302地址,ucDa:要寫(xiě)的數(shù)據(jù)
*返回值:無(wú)
***********************************************************************/
voidv_W1302(ucharucAddr,ucharucDa)
{
T_RST=0;
T_CLK=0;
T_RST=1;
v_RTInputByte(ucAddr);/*地址，命令*/
v_RTInputByte(ucDa);/*寫(xiě)1Byte數(shù)據(jù)*/
T_CLK=1;
T_RST=0;
}
/********************************************************************
*
*名稱(chēng):uc_R1302
*說(shuō)明:先寫(xiě)地址，后讀命令/數(shù)據(jù)
*功能:讀取DS1302某地址的數(shù)據(jù)
*調(diào)用:v_RTInputByte(),uc_RTOutputByte()
*輸入:ucAddr:DS1302地址
*返回值:ucDa:讀取的數(shù)據(jù)
***********************************************************************/
ucharuc_R1302(ucharucAddr)
{
ucharucDa;
T_RST=0;
T_CLK=0;
T_RST=1;
v_RTInputByte(ucAddr);/*地址，命令*/
ucDa=uc_RTOutputByte();/*讀1Byte數(shù)據(jù)*/
T_CLK=1;
T_RST=0;
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碼)1B1B1B1B1B1B1B1B
*返回值:無(wú)
***********************************************************************/
voidv_BurstW1302T(uchar*pSecDa)
{
uchari;
v_W1302(0x8e,0x00);/*控制命令,WP=0,寫(xiě)操作?*/
T_RST=0;
T_CLK=0;
T_RST=1;
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++;
}
T_CLK=1;
T_RST=0;
}
/********************************************************************
*
*名稱(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碼)1B1B1B1B1B1B1B
*返回值:ucDa:讀取的數(shù)據(jù)
***********************************************************************/
voidv_BurstR1302T(uchar*pSecDa)
{
uchari;
T_RST=0;
T_CLK=0;
T_RST=1;
v_RTInputByte(0xbf);/*0xbf:時(shí)鐘多字節(jié)讀命令*/
for(i=8;i>0;i--)
{
*pSecDa=uc_RTOutputByte();/*讀1Byte數(shù)據(jù)*/
pSecDa++;
}
T_CLK=1;
T_RST=0;
}
/********************************************************************
*
*名稱(chēng):v_BurstW1302R
*說(shuō)明:先寫(xiě)地址，后寫(xiě)數(shù)據(jù)(寄存器多字節(jié)方式)
*功能:往DS1302寄存器數(shù)寫(xiě)入數(shù)據(jù)(多字節(jié)方式)
*調(diào)用:v_RTInputByte()
*輸入:pReDa:寄存器數(shù)據(jù)地址
*返回值:無(wú)
***********************************************************************/
voidv_BurstW1302R(uchar*pReDa)
{
uchari;
v_W1302(0x8e,0x00);/*控制命令,WP=0,寫(xiě)操作?*/
T_RST=0;
T_CLK=0;
T_RST=1;
v_RTInputByte(0xfe);/*0xbe:時(shí)鐘多字節(jié)寫(xiě)命令*/
for(i=31;i>0;i--)/*31Byte寄存器數(shù)據(jù)*/
{
v_RTInputByte(*pReDa);/*寫(xiě)1Byte數(shù)據(jù)*/
pReDa++;
}
T_CLK=1;
T_RST=0;
}
/********************************************************************
*
*名稱(chēng):uc_BurstR1302R
*說(shuō)明:先寫(xiě)地址，后讀命令/數(shù)據(jù)(寄存器多字節(jié)方式)
*功能:讀取DS1302寄存器數(shù)據(jù)
*調(diào)用:v_RTInputByte(),uc_RTOutputByte()
*輸入:pReDa:寄存器數(shù)據(jù)地址
*返回值:無(wú)
***********************************************************************/
voidv_BurstR1302R(uchar*pReDa)
{
uchari;
T_RST=0;
T_CLK=0;
T_RST=1;
v_RTInputByte(0xff);/*0xbf:時(shí)鐘多字節(jié)讀命令*/
for(i=31;i>0;i--)/*31Byte寄存器數(shù)據(jù)*/
{
*pReDa=uc_RTOutputByte();/*讀1Byte數(shù)據(jù)*/
pReDa++;
}
T_CLK=1;
T_RST=0;
}
/********************************************************************
*
*名稱(chēng):v_Set1302
*說(shuō)明:
*功能:設(shè)置初始時(shí)間
*調(diào)用:v_W1302()
*輸入:pSecDa:初始時(shí)間地址。初始時(shí)間格式為:秒分時(shí)日月星期年
*7Byte(BCD碼)1B1B1B1B1B1B1B
*返回值:無(wú)
***********************************************************************/
voidv_Set1302(uchar*pSecDa)
{
uchari;
ucharucAddr=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碼)1B1B1B1B1B1B1B
*返回值:無(wú)
***********************************************************************/
voidv_Get1302(ucharucCurtime[])
{
uchari;
ucharucAddr=0x81;
for(i=0;i7;i++)
{
ucCurtime[i]=uc_R1302(ucAddr);/*格式為:秒分時(shí)日月
星期年*/
ucAddr+=2;
}
}
(綜合電子論壇)