您的位置:首页 > 其它

DS1302 时钟芯片的程序

2015-05-26 11:04 309 查看
DS1302 时钟芯片的程序

DS1302 时钟芯片的程序

#include 

sbit T_CLK = P2^7; /*实时时钟时钟线引脚 */ 

sbit T_IO = P1^4; /*实时时钟数据线引脚 */ 

sbit T_RST = P1^5; /*实时时钟复位线引脚 */ 

sbit ACC0 = ACC^0; 

sbit ACC7 = ACC^7; 

void RTInputByte(uchar); /* 输入 1Byte */ 

uchar RTOutputByte(void); /* 输出?1Byte */ 

void W1302(uchar, uchar); 

uchar R1302(uchar); 

void Set1302(uchar *); /* 设置时间 */ 

void Bcd2asc(uchar,uchar *); 

void Get1302(uchar curtime[]); /* 读取1302当前时间 */ 

/******************************************************************** 

函 数 名:RTInputByte() 

功 能:实时时钟写入一字节 

说 明:往DS1302写入1Byte数据 (内部函数) 

入口参数:d 写入的数据 

返 回 值:无 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

void RTInputByte(uchar d) 



uchar i; 

ACC = d; 

for(i=8; i>0; i--) 



T_IO = ACC0; /*相当于汇编中的 RRC */ 

T_CLK = 1; 

T_CLK = 0; 

ACC = ACC >> 1; 





/******************************************************************** 

函 数 名:RTOutputByte() 

功 能:实时时钟读取一字节 

说 明:从DS1302读取1Byte数据 (内部函数) 

入口参数:无 

返 回 值:ACC 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

uchar 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); 



/******************************************************************** 

函 数 名:W1302() 

功 能:往DS1302写入数据 

说 明:先写地址,后写命令/数据 (内部函数) 

调 用:RTInputByte() , RTOutputByte() 

入口参数:ucAddr: DS1302地址, ucData: 要写的数据 

返 回 值:无 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

void W1302(uchar ucAddr, uchar ucDa) 



T_RST = 0; 

T_CLK = 0; 

T_RST = 1; 

RTInputByte(ucAddr); /* 地址,命令 */ 

RTInputByte(ucDa); /* 写1Byte数据*/ 

T_CLK = 1; 

T_RST = 0; 



/******************************************************************** 

函 数 名:R1302() 

功 能:读取DS1302某地址的数据 

说 明:先写地址,后读命令/数据 (内部函数) 

调 用:RTInputByte() , RTOutputByte() 

入口参数:ucAddr: DS1302地址 

返 回 值:ucData :读取的数据 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

uchar R1302(uchar ucAddr) 



uchar ucData; 

T_RST = 0; 

T_CLK = 0; 

T_RST = 1; 

RTInputByte(ucAddr); /* 地址,命令 */ 

ucData = RTOutputByte(); /* 读1Byte数据 */ 

T_CLK = 1; 

T_RST = 0; 

return(ucData); 



/******************************************************************** 

函 数 名:BurstW1302T() 

功 能:往DS1302写入时钟数据(多字节方式) 

说 明:先写地址,后写命令/数据 

调 用:RTInputByte() 

入口参数:pWClock: 时钟数据地址 格式为: 秒分 时 日 月 星期 年 控制 

8Byte (BCD码)1B 1B 1B 1B 1B 1B 1B 1B 

返 回 值:无 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

void BurstW1302T(uchar *pWClock) 



uchar i; 

W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/ 

T_RST = 0; 

T_CLK = 0; 

T_RST = 1; 

RTInputByte(0xbe); /* 0xbe:时钟多字节写命令 */ 

for (i = 8; i>0; i--) /*8Byte = 7Byte 时钟数据 + 1Byte 控制*/ 



RTInputByte(*pWClock); /* 写1Byte数据*/ 

pWClock++; 



T_CLK = 1; 

T_RST = 0; 



/******************************************************************** 

函 数 名:BurstR1302T() 

功 能:读取DS1302时钟数据 

说 明:先写地址/命令,后读数据(时钟多字节方式) 

调 用:RTInputByte() , RTOutputByte() 

入口参数:pRClock: 读取时钟数据地址 格式为: 秒分 时 日 月 星期 年 

7Byte (BCD码)1B 1B 1B 1B 1B 1B 1B 

返 回 值:无 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

void BurstR1302T(uchar *pRClock) 



uchar i; 

T_RST = 0; 

T_CLK = 0; 

T_RST = 1; 

RTInputByte(0xbf); /* 0xbf:时钟多字节读命令 */ 

for (i=8; i>0; i--) 



*pRClock = RTOutputByte(); /* 读1Byte数据 */ 

pRClock++; 



T_CLK = 1; 

T_RST = 0; 



/******************************************************************** 

函 数 名:BurstW1302R() 

功 能:往DS1302寄存器数写入数据(多字节方式) 

说 明:先写地址,后写数据(寄存器多字节方式) 

调 用:RTInputByte() 

入口参数:pWReg: 寄存器数据地址 

返 回 值:无 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

void BurstW1302R(uchar *pWReg) 



uchar i; 

W1302(0x8e,0x00); /* 控制命令,WP=0,写操作*/ 

T_RST = 0; 

T_CLK = 0; 

T_RST = 1; 

RTInputByte(0xfe); /* 0xbe:时钟多字节写命令 */ 

for (i=31; i>0; i--) /* 31Byte 寄存器数据 */ 



RTInputByte(*pWReg); /* 写1Byte数据*/ 

pWReg++; 



T_CLK = 1; 

T_RST = 0; 



/******************************************************************** 

函 数 名:BurstR1302R() 

功 能:读取DS1302寄存器数据 

说 明:先写地址,后读命令/数据(寄存器多字节方式) 

调 用:RTInputByte() , RTOutputByte() 

入口参数:pRReg: 寄存器数据地址 

返 回 值:无 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

void BurstR1302R(uchar *pRReg) 



uchar i; 

T_RST = 0; 

T_CLK = 0; 

T_RST = 1; 

RTInputByte(0xff); /* 0xff:时钟多字节读命令 */ 

for (i=31; i>0; i--) /*31Byte 寄存器数据 */ 



*pRReg = RTOutputByte(); /* 读1Byte数据 */ 

pRReg++; 



T_CLK = 1; 

T_RST = 0; 



/******************************************************************** 

函 数 名:Set1302() 

功 能:设置初始时间 

说 明:先写地址,后读命令/数据(寄存器多字节方式) 

调 用:W1302() 

入口参数:pClock: 设置时钟数据地址 格式为: 秒分 时 日 月 星期 年 

7Byte (BCD码)1B 1B 1B 1B 1B 1B 1B 

返 回 值:无 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

void Set1302(uchar *pClock) 



uchar i; 

uchar ucAddr = 0x80; 

W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/ 

for(i =7; i>0; i--) 



W1302(ucAddr,*pClock); /* 秒 分 时 日 月 星期 年 */ 

pClock++; 

ucAddr +=2; 



W1302(0x8e,0x80); /* 控制命令,WP=1,写保护?*/ 



/******************************************************************** 

函 数 名:Get1302() 

功 能:读取DS1302当前时间 

说 明: 

调 用:R1302() 

入口参数:ucCurtime: 保存当前时间地址。当前时间格式为: 秒 分 时 日 月 星期 年 

7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B 

返 回 值:无 

设 计:zhaojunjie 日 期:2002-03-19 

修 改: 日 期: 

***********************************************************************/ 

void Get1302(uchar ucCurtime[]) 



uchar i; 

uchar ucAddr = 0x81; 

for (i=0; i<7; i++) 



ucCurtime[i] = R1302(ucAddr);/*格式为: 秒 分 时 日 月 星期年 */ 

ucAddr += 2; 





/*//////////////////////////////////////////////////////////////////////*/
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息