1302.h

织带机产量检测系统的监测终端。RS-485总线

#ifndef DS1302_H
#define DS1302_H
   
/*********************************************************************/
/* 实时时钟模块 时钟芯片型号：DS1302 */
/*/
/*********************************************************************/
sbit T_CLK = P1^7; /*实时时钟时钟线引脚 */
sbit T_IO = P1^2; /*实时时钟数据线引脚 */
sbit T_RST = P1^0; /*实时时钟复位线引脚 */
sbit ACC0 = ACC^0;
sbit ACC7 = ACC^7;
/******************************************************************** 
*
* 名称: v_RTInputByte
* 说明: 
* 功能: 往DS1302写入1Byte数据
* 调用:
* 输入: ucDa 写入的数据 
* 返回值: 无
***********************************************************************/
void v_RTInputByte(uchar ucDa) 
{ 
     uchar i;
     ACC = ucDa;
     for(i=8; i>0; i--)
     {
         T_IO = ACC0; /*相当于汇编中的 RRC */
         T_CLK = 1;
         T_CLK = 0;
		 ACC = ACC >> 1; 
	 } 
}

/******************************************************************** 
*
* 名称: uchar uc_RTOutputByte
* 说明: 
* 功能: 从DS1302读取1Byte数据
* 调用: 
* 输入: 
* 返回值: ACC
***********************************************************************/
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); 
}

/******************************************************************** 
*
* 名称: v_W1302
* 说明: 先写地址，后写命令/数据
* 功能: 往DS1302写入数据
* 调用: v_RTInputByte() 
* 输入: ucAddr: DS1302地址, ucDa: 要写的数据
* 返回值: 无
***********************************************************************/
void v_W1302(uchar ucAddr, uchar ucDa)
{
	 T_RST = 0;
	 T_CLK = 0;
	 T_RST = 1;
	 v_RTInputByte(ucAddr); /* 地址，命令 */
	 v_RTInputByte(ucDa); /* 写1Byte数据*/
	 T_CLK = 1;
	 T_RST =0;
}
 
/******************************************************************** 
*
* 名称: uc_R1302
* 说明: 先写地址，后读命令/数据
* 功能: 读取DS1302某地址的数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: ucAddr: DS1302地址
* 返回值: ucDa :读取的数据
***********************************************************************/
uchar uc_R1302(uchar ucAddr)
{
	uchar ucDa;
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	v_RTInputByte(ucAddr); /* 地址，命令 */
	ucDa = uc_RTOutputByte(); /* 读1Byte数据 */
	T_CLK = 1;
	T_RST =0;
	return(ucDa);
}

/******************************************************************** 
*
* 名称: v_BurstW1302T
* 说明: 先写地址，后写数据(时钟多字节方式)
* 功能: 往DS1302写入时钟数据(多字节方式)
* 调用: v_RTInputByte() 
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 控制
* 8Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_BurstW1302T(uchar *pSecDa)
{
	uchar i;
	v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	v_RTInputByte(0xbe); /* 0xbe:时钟多字节写命令 */
	for (i=8;i>0;i--) /*8Byte = 7Byte 时钟数据 + 1Byte 控制*/
	{
		v_RTInputByte(*pSecDa);/* 写1Byte数据*/
		pSecDa++;
	}
	T_CLK = 1;
	T_RST =0;
} 

/******************************************************************** 
*
* 名称: v_BurstR1302T
* 说明: 先写地址，后读命令/数据(时钟多字节方式)
* 功能: 读取DS1302时钟数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: ucDa :读取的数据
***********************************************************************/
void v_BurstR1302T(uchar *pSecDa)
{
	uchar i;
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	v_RTInputByte(0xbf); /* 0xbf:时钟多字节读命令 */
	for (i=8; i>0; i--) 
	{
		*pSecDa = uc_RTOutputByte(); /* 读1Byte数据 */
		pSecDa++;
	}
	T_CLK = 1;
	T_RST =0;
}

/******************************************************************** 
*
* 名称: v_BurstW1302R
* 说明: 先写地址，后写数据(寄存器多字节方式)
* 功能: 往DS1302寄存器数写入数据(多字节方式)
* 调用: v_RTInputByte() 
* 输入: pReDa: 寄存器数据地址
* 返回值: 无
***********************************************************************/
void v_BurstW1302R(uchar *pReDa, uchar uLen)
{
	uchar i;
	v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	v_RTInputByte(0xfe); /* 0xbe:时钟多字节写命令 */
	for (i=uLen;i>0;i--) /*31Byte 寄存器数据 */
	{
		v_RTInputByte(*pReDa); /* 写1Byte数据*/
		pReDa++;
	}
	T_CLK = 1;
	T_RST =0;
} 

/******************************************************************** 
*
* 名称: uc_BurstR1302R
* 说明: 先写地址，后读命令/数据(寄存器多字节方式)
* 功能: 读取DS1302寄存器数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: pReDa: 寄存器数据地址
* 返回值: 无
***********************************************************************/
void v_BurstR1302R(uchar *pReDa, uchar uLen)
{
	uchar i;
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	v_RTInputByte(0xff); /* 0xbf:时钟多字节读命令 */
	for (i=uLen; i>0; i--) /*31Byte 寄存器数据 */
	{
		*pReDa = uc_RTOutputByte(); /* 读1Byte数据 */
		pReDa++;
	}
	T_CLK = 1;
	T_RST =0;
}
/******************************************************************** 
*
* 名称: v_Set1302
* 说明: 
* 功能: 设置初始时间
* 调用: v_W1302() 
* 输入: pSecDa: 初始时间地址。初始时间格式为: 秒 分 时 日 月 星期 年 
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_Set1302(uchar *pSecDa) reentrant
{
	uchar i;
	uchar ucAddr = 0x80; 
	v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
	for(i =7;i>0;i--)
	{ 
		v_W1302(ucAddr,*pSecDa); /* 秒 分 时 日 月 星期 年 */
		pSecDa++;
		ucAddr +=2;
	}
	v_W1302(0x8e,0x80); /* 控制命令,WP=1,写保护?*/
}

/******************************************************************** 
*
* 名称: v_Get1302
* 说明: 
* 功能: 读取DS1302当前时间
* 调用: uc_R1302() 
* 输入: ucCurtime: 保存当前时间地址。当前时间格式为: 秒 分 时 日 月 星期 年 
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_Get1302(uchar ucCurtime[]) reentrant
{
	uchar i;
	uchar ucAddr = 0x81;
	for (i=0;i<7;i++)
	{
		ucCurtime[i] = uc_R1302(ucAddr);/*格式为: 秒 分 时 日 月 
		星期 年 */
		ucAddr += 2;
	}
} 

#endif