DS1302可调电子时钟1602显示proteus仿真

1、总电路图：单片机电路图：1602 接线图：1302 接线图：（I/O 接单片机 3.5 脚）程序清单：#include#include#define uchar unsigned char#define uint unsigned int sbit ACC0 = ACC0;sbit ACC7 = ACC7;sbit t=P10;/ 进入调时按键sbit jia=P11;/ 加一按键sbit jian=P12;/ 减一按键sbit m=P13;/ 退出调时按键sbit BEEP=P20;/ 蜂鸣器sbit jtod=P14;/ 矩阵按键转独立按键，该脚置 0sbit T_CLK = P16; /

2、* 实时时钟时钟线引脚 */sbit T_IO = P35; /* 实时时钟数据线引脚 */sbit T_RST = P17; /* 实时时钟复位线引脚 */sbit E=P27;/1602 使能引脚sbit RW=P26; /1602 读写引脚sbit RS=P25;/1602 数据 /命令选择引脚codeucharhanzi8=0x04,0x0f,0x12,0x0f,0x0a,0x1f,0x02,0x02,0x0f,0x09,0x0f,0x09,0x0f,0x09,0x13, 0x11,0x1f,0x11,0x11,0x1f,0x11,0x11,0x1f,0x00;void v_W1302

3、(uchar ucAddr, uchar ucDa); uchar uc_R1302(uchar);uchar dectobcd(uchar bcd);uchar bcdtodec(uchar);void beep();void delay(uchar x)uchar i;while(x-)for(i=0;i110;i+);/* 名称 : enable(uchar del)* 功能 : 1602 命令函数* 输入 : 输入的命令值* 输出 : 无void enable(uchar del)RS = 0;RW = 0;P0 = del; E = 1; delay(3);E=0;/* 名称 : w

4、rite(uchar del)* 功能 : 1602 写数据函数* 输入 : 需要写入 1602 的数据* 输出 : 无void write(uchar del)RS = 1;RW = 0;P0 = del; E = 1;delay(3);E=0;* 名称: L1602_init()* 功能: 1602 初始化，请参考 1602 的资料* 输入: 无* 输出: 无*void L1602_init(void)enable(0x01);enable(0x38);enable(0x06);enable(0x0c);E=0;/装入自定义字符(汉字)void writch()uchar i,j; ena

5、ble(0x40);for(i=0;i8;i+) for(j=0;j59)sec=0;L1602_char(2, 12, sec/10%10+48);L1602_char(2, 13, sec%10 + 48);v_W1302(0x80,dectobcd(sec)|0x80); if(jian=0) / 秒减一 delay(5);if(jian=0) while(!jian);sec=bcdtodec(uc_R1302(0x81); sec-;if(sec=-1)sec=59;L1602_char(2, 12, sec/10%10+48);L1602_char(2, 13, sec%10 +

6、48); v_W1302(0x80,dectobcd(sec)|0x80); if(num=2)/调分钟enable(0xc0+9);if(jia=0)delay(5);if(jia=0) min = bcdtodec(uc_R1302(0x83); min+;while(!jia);if(min59)min=0;L1602_char(2, 9, min / 10 % 10 + 48);L1602_char(2, 10, min % 10 + 48); v_W1302(0x82,dectobcd(min); if(jian=0) delay(5); if(jian=0) min = bcdto

7、dec(uc_R1302(0x83); min-;while(!jian);if(min=-1)min=59;L1602_char(2, 9, min / 10 % 10 + 48);L1602_char(2, 10, min % 10 + 48);v_W1302(0x82,dectobcd(min);if(num=3)/ 调小时enable(0xc0+6);if(jia=0)delay(5);if(jia=0)hour = bcdtodec(uc_R1302(0x85); hour+;while(!jia); if(hour23)hour=0;L1602_char(2, 6, hour /

8、10 % 10 + 48);L1602_char(2, 7, hour % 10 + 48); v_W1302(0x84,dectobcd(hour);if(jian=0) delay(5); if(jian=0) while(!jian);hour = bcdtodec(uc_R1302(0x85); hour-;if(hour=-1) hour=23;L1602_char(2, 6, hour / 10 % 10 + 48);L1602_char(2, 7, hour % 10 + 48); v_W1302(0x84,dectobcd(hour);if(num=4)/ 调日期enable(

9、0x80+13);if(jia=0)delay(5);if(jia=0)hour = bcdtodec(uc_R1302(0x87); day+;while(!jia); if(day31)day=0;L1602_char(1, 13, day / 10 % 10 + 48);L1602_char(1, 14, day % 10 + 48); v_W1302(0x86,dectobcd(day); if(jian=0) delay(5); if(jian=0)while(!jian); day=bcdtodec(uc_R1302(0x87); day-;if(day=-1) day=31;L1

10、602_char(1,13,day/10%10+48);L1602_char(1,14,day%10+48); v_W1302(0x86,dectobcd(day);if(num=5) / 调月份enable(0x80+10);if(jia=0)delay(5);if(jia=0)mon = bcdtodec(uc_R1302(0x89); mon+;while(!jia); if(mon12) mon=0;L1602_char(1, 10, mon / 10 % 10 + 48);L1602_char(1, 11, mon % 10 + 48); v_W1302(0x88,dectobcd(

11、mon);if(jian=0) delay(5); if(jian=0) while(!jian); mon = bcdtodec(uc_R1302(0x89); mon-;if(mon=-1) mon=12;L1602_char(1, 10, mon / 10 % 10 + 48);L1602_char(1, 11, mon % 10 + 48); v_W1302(0x88,dectobcd(mon);if(num=6)/ 调年份enable(0x80+7);if(jia=0)delay(5);if(jia=0)year = bcdtodec(uc_R1302(0x8d);year+;whi

12、le(!jia);if(year20)year=0;L1602_char(1, 7, year / 10 % 10 + 48);L1602_char(1, 8, year % 10 + 48);v_W1302(0x8c,dectobcd(year);if(jian=0)delay(5);if(jian=0)while(!jian);year = bcdtodec(uc_R1302(0x8d);year-;if(year=-1)year=20;L1602_char(1, 7, year / 10 % 10 + 48);L1602_char(1, 8, year % 10 + 48); v_W13

13、02(0x8c,dectobcd(year);if(num=0)/ 关闭光标闪烁enable(0x0c);v_W1302(0x80,uc_R1302(0x81)&0x7f); /开启 1302 记时 * 名称 : v_RTInputByte ()* 功能 :往 DS1302 写入 1Byte 数据* 输入 :ucDa 写入的数据* 输出 :无*void v_RTInputByte(uchar ucDa)uchar i;ACC = ucDa;T_RST = 1;for(i=8; i0; i-)T_IO = ACC0;T_CLK = 1;T_CLK = 0;ACC = ACC 1;/* 名称 :

14、uc_RTOutputByte ()* 功能 : 从 DS1302 读取 1Byte 数据* 输入 : 无* 返回值 : ACC uchar uc_RTOutputByte(void)uchar i;T_RST = 1; for(i=8; i0; i-) ACC = ACC 1;ACC7 = T_IO;T_CLK = 1;T_CLK = 0; return(ACC);* 名称 : v_W1302(uchar ucAddr, uchar ucDa)* 功能 : 往 DS1302 写入数据* 输入 : ucAddr: DS1302 地址 , ucDa: 要写的数据* 返回值 : 无void v_W

15、1302(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_

16、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);/* 名称 : bcdtodec(uchar bcd)为数值* 功 能 : BCD 码 转 换 为 DEC 码 (DEC 码 为 十 进 制 数 据 ： BCD:0x11-DEC 11(HEX:0x0b)* 输入 : bcd 码* 输出 : dec 码*/ uchar bcdtodec(uchar bc

17、d)uchar data1; data1=(bcd&0x70)4)*10+(bcd&0x0f);return data1;uchar dectobcd(uchar dec)uchar dat; dat=(dec/10)4|(dec%10);return dat;/* 名称 : Write_DS1302Init()* 功能 : 往 DS1302 中写入数据。最开始显示的数据就是在这里设置的。* 输入 : 无* 输出 : 无*/void Write_DS1302Init(void)v_W1302(0x8e,0);v_W1302(0x80,0x00); /写入秒 v_W1302(0x8e,0);v_

18、W1302(0x82,0x00); /写入分 v_W1302(0x8e,0);v_W1302(0x84,0x00); /写入小时 v_W1302(0x8e,0);v_W1302(0x86,0x00); /写入日 v_W1302(0x8e,0);v_W1302(0x88,0x00); /写入月 v_W1302(0x8e,0);v_W1302(0x8a,0x00); /写入星期 v_W1302(0x8e,0);v_W1302(0x8c,0x00); /写入年 v_W1302(0x90,0xa6);/ 单二极管， 2K 电阻充电/* 名称 : Run_DS1302(void)* 功能 : 读出 DS

19、1302 中的数据，并在液晶 1602 上进行显示* 输入 : 无* 输出 : 无*/void Run_DS1302(void)uchar sec, min, hour, day, month, year; 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

20、(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); / 字符 ASIIC 码显示， 0 的 ASIIC=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);L1