ds1302实时时钟C程序

1、ds1302实时时钟C程序*/ /*51会员经典作品已经测试成功/#include #include #define uchar unsigned charsbit T_CLK = P3A4; /*实时时钟时钟线引脚*/sbit T_IO = P3A3; /*实时时钟数据线引脚*/sbit T_RST = P3A2; /*实时时钟复位线引脚*/sbit OE=P3A6;sbit ACC0=ACCA0;sbit ACC7=ACCA7;uchar time8=:;uchar min,hou,day,mon,yea;void Init1302(void);/ 初始化 DS1302void v_W13

2、02(uchar ucAddr, uchar ucDa);/ 往 DS1302 写入数据uchar uc_R1302(uchar ucAddr);/ 读取 DS1302 某地址的数据void v_BurstW1302T(uchar *pSecDa);/ 往 DS1302 写入时钟数据(多字节方式)void v_BurstR1302T(uchar *pSecDa);/ 读取 DS1302 时钟数据void v_BurstW1302R(uchar *pReDa);/往DS1302寄存器数写入数据(多字节方式)void v_BurstR1302R(uchar *pReDa);/ 读取 DS1302

3、寄存器数据void v_Set1302(uchar *pSecDa);/ 设置初始时间void v_Get1302(uchar ucCurtime);/读取 DS1302 当前时间void donetime(void);时间处理void bcd_int(uchar i);void bcdtoInt(void);void SetTime(void);/ 时间设置* 名称：v_RTInputByte*说明：*功能：往DS1302写入IByte数据*调用：*输入：ucDa写入的数据*返回值：无 void v_WTInputByte(uchar ucDa)uchar i;/OE=0;ACC= ucDa

4、;for(i=8; i0; i-)T_IO = ACC0; /* 名称:uchar uc_RTOutputByte*说明：*功能：从DS1302读取1Byte数据*调用：*输入：*返回值:ACC相当于汇编中的RRCT_CLK = 1;T_CLK = 0;ACC =ACC 1;/ OE=1;uchar uc_RTOutputByte(void)uchar i;/OE=0;for(i=8; i0; i-)ACC = ACC1; /*相当于汇编中的RRCACC7 = T_IO;T_CLK = 1;T_CLK = 0;/OE=1;return(ACC);*名称：v_W1302*说明：先写地址，后写命令

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

6、utByte() , uc_RTOutputByte()输入:ucAddr: DS1302 地址*返回值:ucDa :读取的数据 uchar uc_R1302(uchar ucAddr)uchar ucDa;/OE=0;T_RST = 0;T_CLK = 0;T_RST = 1;v_WTInputByte(ucAddr); /* 地址，命令 */ucDa = uc_RTOutputByte(); /* 读 1Byte 数据 */T_CLK = 1;T_RST =0;/ OE=1;return(ucDa);名称：v_BurstW1302T*说明：先写地址，后写数据（时钟多字节方式）*功能：往DS

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

8、/* 0 xbe:时钟多字节写命令for (i=8;i0;i-) /*8Byte = 7Byte 时钟数据 + 1Byte 控制v_WTInputByte(*pSecDa);/* 写 1Byte 数据pSecDa+;T_CLK = 1;T_RST =0; */* 调用：v_RTInputByte() , uc_RTOutputByte() *输入:pSecDa:时钟数据地址格式为：秒分时日月星期年 * 7Byte (BCD 码)1B 1B 1B 1B 1B 1B 1B *返回值:ucDa :读取的数据/*void v_BurstR1302T(uchar *pSecDa)uchar i;T_RS

9、T = 0;T_CLK = 0;T_RST = 1;v_WTInputByte(0 xbf); /* 0 xbf:时钟多字节读命令for (i=8; i0; i-)*pSecDa = uc_RTOutputByte(); /* 读 1Byte 数据 pSecDa+;T_CLK = 1;T_RST =0; */*名称：v_BurstW1302R*说明：先写地址，后写数据（寄存器多字节方式）*功能：往DS1302寄存器数写入数据（多字节方式）调用：v_RTInputByte（）*输入:pReDa:寄存器数据地址*返回值：无/*void v_BurstW1302R(uchar *pReDa)ucha

10、r i;v_W1302(0 x8e,0 x00); /* 控制命令,WP=0，写操作?T_RST = 0;T_CLK = 0;T_RST = 1;v_WTInputByte(0 xfe); /* 0 xbe :时钟多字节写命令for (i=31;i0;i-) /*31Byte 寄存器数据v_WTInputByte(*pReDa); /* 写 1Byte 数据pReDa+;T_CLK = 1;T_RST =0; */*名称：uc_BurstR1302R*说明：先写地址，后读命令/数据(寄存器多字节方式)*功能：读取DS1302寄存器数据调用：v_RTInputByte() , uc_RTOutp

11、utByte()*输入:pReDa:寄存器数据地址*返回值：无/*void v_BurstR1302R(uchar *pReDa)uchar i;T_RST = 0;T_CLK = 0;T_RST = 1;v_WTInputByte(0 xff); /* 0 xbf:时钟多字节读命令for (i=31; i0; i-) /*31Byte 寄存器数据*pReDa = uc_RTOutputByte(); /* 读 1Byte 数据 pReDa+;T_CLK = 1;T_RST =0; */*名称：v_Set1302*说明：*功能：设置初始时间调用：v_W1302()*输入:pSecDa:初始时间

12、地址。初始时间格式为：秒分 时日月 星期年7Byte (BCD 码)1B 1B 1B 1B 1B 1B 1B*返回值：无/*void v_Set1302(uchar *pSecDa)uchar i;uchar ucAddr = 0 x80;v_W1302(0 x8e,0 x00); / 控制命令,WP=0，写操作？for(i =7;i0;i-)v_W1302(ucAddr,*pSecDa); /秒分时日月星期年pSecDa+;ucAddr +=2;v_W1302(0 x8e,0 x80); / 控制命令,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 = 0 x81;for (i=0;i4;time1=(j&0 x0f)+48; */*void bcdtoInt(void)uchar i;for(i=0;i7;i+)bcd_int(ucCurtmi