1、实时时钟模 DS1302 程序列子 /*/* 实时时钟模块 时钟芯片型号： DS1302 */*/*/sbit T_CLK = P27; /*实时时钟时钟线引脚 */sbit T_IO = P14; /*实时时钟数据线引脚 */sbit T_RST = P15; /*实时时钟复位线引脚 */* * 名称: v_RTInputByte* 说明: * 功能: 往 DS1302 写入 1Byte 数据* 调用:* 输入: ucDa 写入的数据 * 返回值: 无*/void v_RTInputByte(uchar ucDa) uchar i;ACC = ucDa;for(i=8; i0; i-)T_I
2、O = 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; i0; i-)ACC = ACC 1; /*相当于汇编中的 RRC */ACC7 = T_IO;T_CLK = 1;T_CLK = 0; return(ACC); /* * 名称: v_W1302* 说明: 先写地址，后
3、写命令 /数据* 功能: 往 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* 说明: 先写地址，后读命令 /数据* 功能: 读取 DS1
4、302 某地址的数据* 调用: 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* 说明: 先
5、写地址，后写数据 (时钟多字节方式)* 功能: 往 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
6、:时钟多字节写命令 */for (i=8;i0;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
7、 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; i0; i-) *pSecDa = uc_RTOutputByte(); /* 读 1Byte 数据 */pSecDa+;T_CLK = 1;T_RST =0;/* * 名称: v_BurstW1302R* 说明: 先写地址，后写数据 (寄存器多字节方式)* 功能: 往 DS1302 寄
8、存器数写入数据 (多字节方式)* 调用: v_RTInputByte() * 输入: pReDa: 寄存器数据地址* 返回值: 无*/void v_BurstW1302R(uchar *pReDa)uchar i;v_W1302(0x8e,0x00); /* 控制命令 ,WP=0,写操作?*/T_RST = 0;T_CLK = 0;T_RST = 1;v_RTInputByte(0xfe); /* 0xbe:时钟多字节写命令 */for (i=31;i0;i-) /*31Byte 寄存器数据 */v_RTInputByte(*pReDa); /* 写 1Byte 数据*/pReDa+;T_CL
9、K = 1;T_RST =0; /* * 名称: uc_BurstR1302R* 说明: 先写地址，后读命令 /数据(寄存器多字节方式)* 功能: 读取 DS1302 寄存器数据* 调用: v_RTInputByte() , uc_RTOutputByte()* 输入: pReDa: 寄存器数据地址* 返回值: 无*/void v_BurstR1302R(uchar *pReDa)uchar i;T_RST = 0;T_CLK = 0;T_RST = 1;v_RTInputByte(0xff); /* 0xbf:时钟多字节读命令 */for (i=31; i0; i-) /*31Byte 寄存
10、器数据 */*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) uchar i;uchar ucAddr = 0x80; v_W1302(0x8e,0x00); /*
11、 控制命令 ,WP=0,写操作?*/for(i =7;i0;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) uchar i;uchar ucAddr = 0x81;for (i=0;i7;i+)ucCurtimei = uc_R1302(ucAddr);/*格式为: 秒 分 时 日 月 星期 年 */ucAddr += 2;
