时钟DS1302LCD

随心的天空2023-12-12 23:29

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

* 描述 : 该文件实现用DS1302来实现日历和时钟功能，液晶1602上显示出来。

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

#include<reg52.h>

#include<intrins.h>

#define uchar unsigned char

#define uint unsigned int

sbit ACC0 = ACC^0;

sbit ACC7 = ACC^7;

sbit T_CLK = P1^6; /*实时时钟时钟线引脚 */

sbit T_IO = P3^5; /*实时时钟数据线引脚 */

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

//这三个引脚参考资料

sbit E=P2^7; //1602使能引脚

sbit RW=P2^6; //1602读写引脚

sbit RS=P2^5; //1602数据/命令选择引脚

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

* 名称 : delay()

* 功能 : 延时,延时时间大概为140US。

* 输入 : 无

* 输出 : 无

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

void delay()

{

int i,j;

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

for(j=0; j<=2; j++)

;

}

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

* 名称 : enable(uchar del)

* 功能 : 1602命令函数

* 输入 : 输入的命令值

* 输出 : 无

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

void enable(uchar del)

{

P0 = del;

RS = 0;

RW = 0;

E = 0;

delay();

E = 1;

delay();

}

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

* 名称 : write(uchar del)

* 功能 : 1602写数据函数

* 输入 : 需要写入1602的数据

* 输出 : 无

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

void write(uchar del)

{

P0 = del;

RS = 1;

RW = 0;

E = 0;

delay();

E = 1;

delay();

}

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

* 名称 : L1602_init()

* 功能 : 1602初始化，请参考1602的资料

* 输入 : 无

* 输出 : 无

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

void L1602_init(void)

{

enable(0x01);

enable(0x38);

enable(0x0c);

enable(0x06);

enable(0xd0);

}

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

* 名称 : L1602_char(uchar hang,uchar lie,char sign)

* 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符显示"b" ，调用该函数如下

L1602_char(1,5,'b')

* 输入 : 行，列，需要输入1602的数据

* 输出 : 无

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

void L1602_char(uchar hang,uchar lie,char sign)

{

uchar a;

if(hang == 1) a = 0x80;

if(hang == 2) a = 0xc0;

a = a + lie - 1;

enable(a);

write(sign);

}

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

* 名称 : L1602_string(uchar hang,uchar lie,uchar *p)

* 功能 : 改变液晶中某位的值，如果要让第一行，第五个字符开始显示"ab cd ef" ，调用该函数如下

L1602_string(1,5,"ab cd ef;")

* 输入 : 行，列，需要输入1602的数据

* 输出 : 无

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

void L1602_string(uchar hang,uchar lie,uchar *p)

{

uchar a;

if(hang == 1) a = 0x80;

if(hang == 2) a = 0xc0;

a = a + lie - 1;

enable(a);

while(1)

{

if(*p == '\0') break;

write(*p);

p++;

}

}

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

* 名称 : v_RTInputByte（）

* 功能 : 往DS1302写入1Byte数据

* 输入 : ucDa 写入的数据

* 输出 : 无

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

void v_RTInputByte(uchar ucDa)

{

uchar i;

ACC = ucDa;

T_RST = 1;

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

{

T_IO = ACC0;

T_CLK = 1;

T_CLK = 0;

ACC = ACC >> 1;

}

}

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

* 名称 : uc_RTOutputByte（）

* 功能 : 从DS1302读取1Byte数据

* 输入 : 无

* 返回值: ACC

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

uchar uc_RTOutputByte(void)

{

uchar i;

T_RST = 1;

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

{

ACC = ACC >>1;

T_IO=1;

ACC7 = T_IO;

T_CLK = 1;

T_CLK = 0;

}

return(ACC);

}

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

* 名称 : v_W1302(uchar ucAddr, uchar ucDa)

* 功能 : 往DS1302写入数据

* 输入 : ucAddr: DS1302地址, ucDa: 要写的数据

* 返回值 : 无

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

void v_W1302(uchar ucAddr, uchar ucDa)

{

T_RST = 0;

T_CLK = 0;

T_RST = 1;

v_RTInputByte(ucAddr); // 写地址

nop();

nop();

v_RTInputByte(ucDa); // 写1Byte数据

T_CLK = 1;

T_RST = 0;

}

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

* 名称 : uc_R1302(uchar ucAddr)

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

* 输入 : ucAddr: DS1302地址

* 返回值 : ucDa :读取的数据

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

uchar uc_R1302(uchar ucAddr)

{

uchar ucDa;

T_RST = 0;

T_CLK = 0;

T_RST = 1;

v_RTInputByte(ucAddr); //写地址，命令

nop();

nop();

ucDa = uc_RTOutputByte(); //读1Byte数据

T_CLK = 1;

T_RST = 0;

return(ucDa);

}

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

* 名称 : v_BurstW1302T

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

* 输入 : 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(uchar *pSecDa)

* 功能 : 读取DS1302时钟数据

* 输入 : 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(uchar *pReDa)

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

* 输入 : 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; i>0; i--) //31Byte 寄存器数据

{

v_RTInputByte(*pReDa); //写1Byte数据

pReDa++;

}

T_CLK = 1;

T_RST = 0;

}

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

* 名称 : v_BurstR1302R(uchar *pReDa)

* 功能 : 读取DS1302寄存器数据

* 输入 : pReDa: 寄存器数据地址

* 返回值 : 无

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

void v_BurstR1302R(uchar *pReDa)

{

uchar i;

T_RST = 0;

T_CLK = 0;

T_RST = 1;

v_RTInputByte(0xff); //0xbf:时钟多字节读命令

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

{

*pReDa = uc_RTOutputByte(); //读1Byte数据

pReDa++;

}

T_CLK = 1;

T_RST = 0;

}

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

* 名称 : v_Set1302(uchar *pSecDa)

* 功能 : 设置初始时间

* 输入 : pSecDa: 初始时间地址。初始时间格式为: 秒 分 时 日 月 星期 年

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

* 返回值: 无

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

void v_Set1302(uchar *pSecDa)

{

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(uchar ucCurtime[])

* 功能 : 读取DS1302当前时间

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

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

* 返回值 : 无

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

void v_Get1302(uchar ucCurtime[])

{

uchar i;

uchar ucAddr = 0x81;

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

{

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

ucAddr += 2;

}

}

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

* 名称 : dectobcd(uchar dec)

* 功能 : DEC码转换为BCD码

* 输入 : dec码

* 输出 : bcd码

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

uchar dectobcd(uchar dec)

{

uchar bcd;

bcd = 0;

while(dec >= 10)

{

dec -= 10;

bcd++;

}

bcd <<= 4;

bcd |= dec;

return bcd;

}

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

* 名称 : bcdtodec(uchar bcd)

* 功能 : BCD码转换为DEC码

* 输入 : bcd码

* 输出 : dec码

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

uchar bcdtodec(uchar bcd)

{

uchar data1;

data1 = bcd & 0x0f; //取BCD低4位

bcd = bcd & 0x70; //剔除BCD的最高位和低4位。

data1 += bcd >> 1;

data1 += bcd >> 3; //用位移代替乘法运算

return data1;

}

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

* 名称 : Write_DS1302Init()

* 功能 : 往DS1302中写入数据。最开始显示的数据就是在这里设置的。

* 输入 : 无

* 输出 : 无

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

void Write_DS1302Init(void)

{

v_W1302(0x8e,0);

v_W1302(0x80,0x50); //写入秒

v_W1302(0x8e,0);

v_W1302(0x82,0x59); //写入分

v_W1302(0x8e,0);

v_W1302(0x84,0x07); //写入小时

v_W1302(0x8e,0);

v_W1302(0x86,0x08); //写入日

v_W1302(0x8e,0);

v_W1302(0x88,0x08); //写入月

v_W1302(0x8e,0);

v_W1302(0x8a,0x05); //写入星期

v_W1302(0x8e,0);

v_W1302(0x8c,0x08); //写入年

}

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

* 名称 : Run_DS1302(void)

* 功能 : 读出DS1302中的数据，并在液晶1602上进行显示

* 输入 : 无

* 输出 : 无

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

void Run_DS1302(void)

{

uchar sec, min, hour, day, month, year;

while(1)

{

v_W1302(0x8f, 0);

sec = bcdtodec(uc_R1302(0x81)); //读出DS1302中的秒

v_W1302(0x8f, 0);

min = bcdtodec(uc_R1302(0x83)); //读出DS1302中的分

v_W1302(0x8f, 0);

hour = bcdtodec(uc_R1302(0x85)); //读出DS1302中的小时

v_W1302(0x8f, 0);

day = bcdtodec(uc_R1302(0x87)); //读出DS1302中的日

v_W1302(0x8f, 0);

month = bcdtodec(uc_R1302(0x89)); //读出DS1302中的月

v_W1302(0x8f, 0);

year = bcdtodec(uc_R1302(0x8d)); //读出DS1302中的年

L1602_char(2, 6, hour / 10 % 10 + 48);

L1602_char(2, 7, hour % 10 + 48);

L1602_char(2, 8, '-');

L1602_char(2, 9, min / 10 % 10 + 48);

L1602_char(2, 10, min % 10 + 48);

L1602_char(2, 11, '-');

L1602_char(2, 12, sec / 10 % 10 + 48);

L1602_char(2, 13, sec % 10 + 48);

L1602_char(1, 8, year / 10 % 10 + 48);

L1602_char(1, 9, year % 10 + 48);

L1602_char(1, 10, '-');

L1602_char(1, 11, month / 10 % 10 + 48);

L1602_char(1, 12, month % 10 + 48);

L1602_char(1, 13, '-');

L1602_char(1, 14, day / 10 % 10 + 48);

L1602_char(1, 15, day % 10 + 48);

}

}

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

* 名称 : Main(void)

* 功能 : 主函数

* 输入 : 无

* 输出 : 无

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

void Main(void)

{

L1602_init();

L1602_string(1,1,"DAYS 20");

L1602_string(2,1,"TIME");

Write_DS1302Init();

Run_DS1302();

}

相关推荐
code_snow6 小时前
STM32-- 看门狗--介绍、使用场景、失效场景
stm32·单片机·嵌入式硬件
荣世蓥7 小时前
1.1 STM32_GPIO_基本知识
stm32·单片机·嵌入式硬件
深圳市青牛科技实业有限公司8 小时前
电动工具领域可推荐的一些调速控制电路，运算放大器芯片等相关型号
人工智能·科技·stm32·单片机·嵌入式硬件·测试工具·电动工具
zyjishuyuan8 小时前
25 基于51单片机的温度电流电压检测系统（压力、电压、温度、电流、LCD1602）
单片机·嵌入式硬件·51单片机
饮啦冰美式8 小时前
什么是串联谐振
单片机·嵌入式硬件
浮梦终焉8 小时前
单片机_简单AI模型训练与部署__从0到0.9
人工智能·stm32·单片机·嵌入式·c/c++
深圳市青牛科技实业有限公司 小芋圆8 小时前
【青牛科技】2K02 电动工具专用调速电路芯片描述
单片机·嵌入式硬件·智能马桶·直流有刷风扇调速·割草机·小型电钻·电动工具调速
weixin_452600699 小时前
【青牛科技】电动工具电流反馈型相位控制电路D2010
科技·单片机·音视频·电动工具·白色家电电源·机顶盒电源
夜间看花11 小时前
33 基于单片机的智能窗帘控制系统
单片机·嵌入式硬件·51单片机·oled
小昭在路上……12 小时前
《解读 freeRTOS queue.c 源码：探寻任务间高效通信的核心机制》（建议收藏）
单片机·嵌入式硬件
热门推荐
01如何识别手机是否有灵动岛（dynamic island）02(欧拉)openEuler系统添加网卡文件配置流程、(欧拉)openEuler系统手动配置ipv6地址流程、(欧拉)openEuler系统网络管理说明03【HarmonyOS】HUAWEI DevEco Studio 下载地址汇总04百度云盘发展历程与影响05玄机平台应急响应—webshell查杀06PyTorch机器学习实现液态神经网络07电源管理入门-21 SoC芯片中的电源管理08Docker 夺命连环 15 问09Coze扣子平台完整体验和实践（附国内和国际版对比）10昇腾多卡通信教程【配置网络检测对象IP】