1602A液晶控制、32 64点阵程序、DS1302、定时器、实时时钟、数字温度计……等等程序

#include<reg51.h> sbit en=P2^6; sbit weia=P2^3; sbit weib=P2^4; sbit weic=P2^5; char sec,min,hour,date; unsigned char ucCurtime[7]; unsigned char tab1[]={0xC0,0xCF,0xA4,0x86,0x8B,0x92,0x90,0xC7,0x80,0x82}; //0, 1, 2 3 4 5 6 7 8 9 unsigned char timenow[]={0,0,12,27,6,6,8}; void delay(unsigned int time) { while(time--); } /* 实时时钟模块 时钟芯片型号：DS1302 */ /*/ /*********************************************************************/ sbit T_CLK = P3^5; /*实时时钟时钟线引脚 */ sbit T_IO = P3^4; /*实时时钟数据线引脚 */ sbit T_RST = P3^3; /*实时时钟复位线引脚 */ /******************************************************************** * * 名称: DS1302_InputByte() * 功能: 往DS1302写入1Byte数据 * 输入: ucDa 写入的数据 ***********************************************************************/ void DS1302_InputByte(unsigned char ucDa) { unsigned char i; unsigned char temp; temp = ucDa; for(i=8; i>0; i--) { T_IO = temp&0x01; T_CLK = 1; T_CLK = 0; temp = temp >> 1; } } /******************************************************************** * * 名称: DS1302_OutputByte() * 功能: 从DS1302读取1Byte数据 ***********************************************************************/ unsigned char DS1302_OutputByte(void) { unsigned char i; unsigned char temp; temp=0; for(i=0; i<8;i++) { T_CLK = 0; if(T_IO!=0) temp|=(1<<i); T_CLK = 1; } return(temp); } /******************************************************************** * * 名称: DS1302_InputByte() * 说明: 先写地址，后写命令/数据 * 功能: 往DS1302写入数据 * 输入: ucAddr: DS1302地址, ucDa: 要写的数据 ***********************************************************************/ void DS1302_W1302(unsigned char ucAddr, unsigned char ucDa) { T_RST = 0; T_CLK = 0; T_RST = 1; DS1302_InputByte(ucAddr); /* 地址，命令 */ DS1302_InputByte(ucDa); /* 写1Byte数据*/ T_CLK = 1; T_RST =0; } /******************************************************************** * * 名称: DS1302_R1302() * 说明: 先写地址，后读命令/数据 * 功能: 读取DS1302某地址的数据 * 输入: ucAddr: DS1302地址 ***********************************************************************/ unsigned char DS1302_R1302(unsigned char ucAddr) { unsigned char ucDa; T_RST = 0; T_CLK = 0; T_RST = 1; DS1302_InputByte(ucAddr); /* 地址，命令 */ ucDa = DS1302_OutputByte(); /* 读1Byte数据 */ T_CLK = 1; T_RST =0; return(ucDa); } /******************************************************************** * * 名称: DS1302_BurstW1302T() * 说明: 先写地址，后写数据(时钟多字节方式) * 功能: 往DS1302写入时钟数据(多字节方式) * 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 ***********************************************************************/ void DS1302_BurstW1302T(unsigned char *pSecDa) { unsigned char i; DS1302_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/ T_RST = 0; T_CLK = 0; T_RST = 1; DS1302_InputByte(0xbe); /* 0xbe:时钟多字节写命令 */ for (i=8;i>0;i--) /*8Byte = 7Byte 时钟数据 + 1Byte 控制*/ { DS1302_InputByte(*pSecDa);/* 写1Byte数据*/ pSecDa++; } T_CLK = 1; T_RST =0; } /******************************************************************** * * 名称: DS1302_BurstR1302T() * 说明: 先写地址，后读命令/数据(时钟多字节方式) * 功能: 读取DS1302时钟数据 * 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 ***********************************************************************/ void DS1302_BurstR1302T(unsigned char *pSecDa) { unsigned char i; T_RST = 0; T_CLK = 0; T_RST = 1; DS1302_InputByte(0xbf); /* 0xbf:时钟多字节读命令 */ for (i=8; i>0; i--) { *pSecDa = DS1302_OutputByte(); /* 读1Byte数据 */ pSecDa++; } T_CLK = 1; T_RST =0; } /******************************************************************** * * 名称: DS1302_BurstW1302R() * 说明: 先写地址，后写数据(寄存器多字节方式) * 功能: 往DS1302寄存器数写入数据(多字节方式) * 输入: pReDa: 寄存器数据地址 ***********************************************************************/ void DS1302_BurstW1302R(unsigned char *pReDa) { unsigned char i; DS1302_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/ T_RST = 0; T_CLK = 0; T_RST = 1; DS1302_InputByte(0xfe); /* 0xbe:时钟多字节写命令 */ for (i=31;i>0;i--) /*31Byte 寄存器数据 */ { DS1302_InputByte(*pReDa); /* 写1Byte数据*/ pReDa++; } T_CLK = 1; T_RST =0; } /******************************************************************** * * 名称: DS1302_BurstR1302R() * 说明: 先写地址，后读命令/数据(寄存器多字节方式) * 功能: 读取DS1302寄存器数据 * 输入: pReDa: 寄存器数据地址 ***********************************************************************/ void DS1302_BurstR1302R(unsigned char *pReDa) { unsigned char i; T_RST = 0; T_CLK = 0; T_RST = 1; DS1302_InputByte(0xff); /* 0xbf:时钟多字节读命令 */ for (i=31; i>0; i--) /*31Byte 寄存器数据 */ { *pReDa = DS1302_OutputByte(); /* 读1Byte数据 */ pReDa++; } T_CLK = 1; T_RST =0; } /******************************************************************** * * 名称: DS1302_Set1302() * 说明: * 功能: 设置初始时间 * 输入: pSecDa: 初始时间地址。初始时间格式为: 秒 分 时 日 月 星期 年 ***********************************************************************/ void DS1302_Set1302(unsigned char *pSecDa) { unsigned char i; unsigned char ucAddr = 0x80; DS1302_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/ for(i =7;i>0;i--) { DS1302_W1302(ucAddr,*pSecDa); /* 秒 分 时 日 月 星期 年 */ pSecDa++; ucAddr +=2; } DS1302_W1302(0x8e,0x80); /* 控制命令,WP=1,写保护?*/ } /******************************************************************** * * 名称: DS1302_Get1302() * 说明: * 功能: 读取DS1302当前时间 * 调用: DS1302_R1302() * 输入: ucCurtime: 保存当前时间地址。当前时间格式为: 秒 分 时 日 月 星期 年 ***********************************************************************/ void DS1302_Get1302(unsigned char ucCurtime[]) { unsigned char i; unsigned char ucAddr = 0x81; for (i=0;i<7;i++) { ucCurtime[i] = DS1302_R1302(ucAddr);/*格式为: 秒 分 时 日 月 星期 年 */ ucAddr += 2; } } void display_tempmain() {en=0; weic=1; weib=0; weia=0; P1=tab1[date/10]; en=1; delay(50); en=0; weic=1; weib=0; weia=1; P1=tab1[date%10]; en=1; delay(50); en=0; weic=1; weib=1; weia=0; P1=tab1[hour/10]; en=1; delay(50); en=0; weic=1; weib=1; weia=1; P1=tab1[hour%10]; en=1; delay(50); en=0; weic=0; weib=0; weia=0; P1=tab1[min/10]; //显示百位 en=1; delay(50); //亮5ms en=0; weic=0; weib=0; weia=1; P1=tab1[min%10]; //显示十位 en=1; delay(50); //亮5ms en=0; weic=0; weib=1; weia=0; P1=tab1[sec/10]; //显示个位 en=1; delay(50); //亮5ms en=0; weic=0; weib=1; weia=1; P1=tab1[sec%10]; //显示个位 en=1; delay(50); } void main() {DS1302_Set1302(timenow); while(1) {DS1302_Get1302(timenow); sec=timenow[0]; min=timenow[1]; hour=timenow[2]; date=timenow[3]; display_tempmain(); delay(100); } }