ds1302的51子程序

void wr1302(unsigned char dat) //向1302写1个字节
{
unsigned char i;
for(i=0;i<8;i++) //从最低位开始发送
{
ACC=dat;
DATA1302=BIT0;//位传送至数据总线
;
SCLK1302=0; //清时钟总线
;
SCLK1302=1; //时钟上升沿，发送数据有效
dat=dat>>1; //数据右移
;
}
}
unsigned char rd1302(void) //从1302读1个字节
{
unsigned char i;
for(i=0;i<8;i++) //从最低位开始接收
{
ACC=ACC>>1;
DATA1302=1; //读数据之前，P1口输出1
SCLK1302=1;//时钟置高电平
;
SCLK1302=0;//时钟下降沿，接收数据有效
;
BIT7=DATA1302;//接收1位数据
;
}
return ACC;
}
void v_wr1302(unsigned char add,unsigned char dat)//先写地址，后写1字节数据
{ // 地址或命令 数据
RST1302=0;//复位引脚低电平，所有数据传送终止
;
SCLK1302=0;//清时钟总线
;
RST1302=1;//复位引脚高电平，控制逻辑有效
;
wr1302(add); //写地址或命令
;
wr1302(dat); //写1个数据
;
SCLK1302=1;
RST1302=0;
}
unsigned char v_rd1302(unsigned char add) //先写地址，后读1字节命令或数据
{ // 地址
unsigned char i;
RST1302=0;//复位引脚低电平，所有数据传送终止
;
SCLK1302=0;//清时钟总线
;
RST1302=1;//复位引脚高电平，控制逻辑有效
;
wr1302(add); //写地址或命令
;
i=rd1302();
SCLK1302=1;
RST1302=0;
return i; //返回读取的数据
}
/********************************************************************
* 名称: send_byte1302
* 说明: 先写地址，后写数据(时钟多字节方式)
* 功能: 往DS1302写入时钟数据(多字节方式)
* 调用: wr1302();v_wr1302();
* 输入: *p: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 控制
* 8Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void send_byte1302(unsigned char *p)
{
unsigned char i;
v_wr1302(0x8e,0x00); // 控制命令,WP=0,写操作
RST1302=0;//复位引脚低电平，所有数据传送终止
;
SCLK1302=0;//清时钟总线
;
RST1302=1;//复位引脚高电平，控制逻辑有效
;
wr1302(0xbe); //0xbe:时钟多字节写命令
for(i=0;i<8;i++)//发送数据8字节
{
wr1302(*p);
p++;
}
SCLK1302=1;
RST1302=0;
}
/********************************************************************
* 名称: rcv_byte1302
* 说明: 先写地址，后读命令/数据(时钟多字节方式)
* 功能: 读取DS1302时钟数据
* 调用: wr1302() , rd1302()
* 输入: *p1: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: ucDa :读取的数据
***********************************************************************/
unsigned char rcv_byte1302(unsigned char *p1)
{
unsigned char i;
RST1302=0;//复位引脚低电平，所有数据传送终止
;
SCLK1302=0;//清时钟总线
;
RST1302=1;//复位引脚高电平，控制逻辑有效
;
wr1302(0xbf);// 0xbf:时钟多字节读命令
for(i=0;i<8;i++)//接收数据8字节
{
*p1=rd1302();
p1++;
}
SCLK1302=1;
RST1302=0;
}
/********************************************************************
* 名称: v_set1302
* 说明:
* 功能: 设置初始时间
* 调用: v_wr1302()
* 输入: *p2: 初始时间地址。初始时间格式为: 秒 分 时 日 月 星期 年
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_set1302(unsigned char *p2)
{
unsigned char i;
unsigned char addr=0x80;
v_wr1302(0x8e,0x00); //控制命令,WP=0,允许写
for(i=0;i<7;i++)
{
v_wr1302(addr,*p2); /* 秒 分 时 日 月 星期 年 */
p2++;
addr=addr+2;
}
v_wr1302(0x8e,0x80); // 控制命令,WP=1,写保护
}
/********************************************************************
* 名称: v_get1302
* 说明:
* 功能: 读取DS1302当前时间
* 调用: v_rd1302()
* 输入: time: 保存当前时间地址。当前时间格式为: 秒 分 时 日 月 星期 年
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_get1302(void)
{
unsigned char i;
unsigned char addr=0x81;
for(i=0;i<7;i++)
{
time[i]=v_rd1302(addr); //格式为: 秒 分 时 日 月 星期 年
addr=addr+2;
}
}