Ds3231+12864液晶显示AT89C51带温度功能的时钟程序。
#include
#include
#include
#define uchar unsigned char
#define uint unsigned int
sbit LCD_RS=P2^6;
sbit LCD_RW=P2^5;
sbit LCD_EN=P2^4;
sbit LCD_PSB=P2^3;
sbit DQ=P3^7; //18b20
sbit SDA=P1^4; //ds32321 //模拟I2C数据传送位SDA
sbit SCL=P1^3; //模拟I2C时钟控制位SCL
//
sbit K1=P3^2;
sbit K2=P3^3;
sbit K3=P3^4;
sbit K4=P3^5;
//定义变量
uchar numbr[10]="0123456789"; //字模
uchar dis4[]=" "; // 第四行显示 自己添加
uchar t[]=" . ℃" ; //18b20
uint sdata,xiaoshu1,xiaoshu2; //整数、小数1位、小数2位
bit fg=1; //温度正负标志
uchar tempL=0,tempH=0; // 变量
uchar year,month,date,hour,min,sec; // ds3231
uchar a[]="22月33日";
uchar b[]="11时22分33秒";
///函数
/
void write_cmd(uchar cmd)
{
LCD_RS=0;
LCD_RW=0;
LCD_EN=0;
P0=cmd;
delay1ms(5);
LCD_EN=1;
delay1ms(5);
LCD_EN=0;
}
void lcd_pos(uchar X, uchar Y)
{
ucharpos;
if(X== 0)
{
X= 0x80;
}
elseif(X == 1)
{
X= 0x90;
}
elseif(X == 2)
{
X= 0x88;
}
elseif(X == 3)
{
X= 0x98;
}
pos= X + Y;
write_cmd(pos); //显示地址
}
void write_dat(uchar dat)
{
LCD_RS=1;
LCD_RW=0;
LCD_EN=0;
P0=dat;
delay1ms(5);
LCD_EN=1;
delay1ms(5);
LCD_EN=0;
}
void lcd_init()
{ uinti;
LCD_PSB=1; //并口方式
write_cmd(0x30); //基本操作指令
delay1ms(5);
write_cmd(0x0c); //打开显示，光标关闭
delay1ms(5);
write_cmd(0x01); //清除LCD显示类容
delay1ms(5);
lcd_pos(3,0);
i=0;
while(dis4[ i]!='\0')
{
delay1ms(1);
write_dat(dis4);
delay1ms(1);
i++;
}
}
void Init_DS18B20(void) //初始化
{
uchar x=0;
DQ=1; //DQ先置高
delay(8); //稍延时
DQ=0; //发送复位脉冲
delay(80); //延时(>480us)
DQ=1; //拉高数据线
delay(5); //等待(15~60us)
x=DQ; //用X的值来判断初始化有没有成功，18B20存在的话X=0，否则X=1
delay(20);
}
//
ReadOneChar(void) //主机数据线先从高拉至低电平1us以上，再使数据线升为高电平，从而产生读信号
{
unsigned char i=0; //每个读周期最短的持续时间为60us，各个读周期之间必须有1us以上的高电平恢复期
unsigned char dat=0;
for (i=8;i>0;i--) //一个字节有8位
{
DQ=1;
delay(1);
DQ=0;
dat>>=1;
DQ=1;
if(DQ)
dat|=0x80;
delay(4);
}
return(dat);
}
//
void WriteOneChar(unsigned char dat)
{
unsigned char i=0; //数据线从高电平拉至低电平，产生写起始信号。15us之内将所需写的位送到数据线上，
for(i=8;i>0;i--) //在15~60us之间对数据线进行采样，如果是高电平就写1，低写0发生。
{
DQ=0; //在开始另一个写周期前必须有1us以上的高电平恢复期。
DQ=dat&0x01;
delay(5);
DQ=1;
dat>>=1;
}
delay(4);
}
void ReadTemperature(void) //读温度值(低位放tempL;高位放tempH;)//
{
Init_DS18B20(); //初始化
WriteOneChar(0xcc); //跳过读序列号的操作
WriteOneChar(0x44); //启动温度转换
delay(125); //转换需要一点时间，延时
Init_DS18B20(); //初始化
WriteOneChar(0xcc); //跳过读序列号的操作
WriteOneChar(0xbe); //读温度寄存器(头两个值分别为温度的低位和高位)
tempL=ReadOneChar(); //读出温度的低位LSB
tempH=ReadOneChar(); //读出温度的高位MSB
if(tempH>0x7f) //最高位为1时温度是负
{
tempL=~tempL; //补码转换，取反加一
tempH=~tempH+1;
fg=0; //读取温度为负时fg=0
}
sdata= tempL/16+tempH*16; //整数部分
xiaoshu1= (tempL&0x0f)*10/16; //小数第一位
xiaoshu2= (tempL&0x0f)*100/16;//小数第二位
t[0]=numbr[sdata/10];
t[1]=numbr[sdata];
t[3]=numbr[xiaoshu1];
t[4]=numbr[xiaoshu2];
}
#define ADDRTW 0xD0 //器件写地址
#define ADDRTD 0xD1 //器件读地址
#define DS3231_SEC 0x00 //秒
#define DS3231_MIN 0x01 //分
#define DS3231_HOUR 0x02 //时
#define DS3231_DAY 0x03 //星期
#define DS3231_DATE 0x04 //日
#define DS3231_MONTH 0x05 //月
#define DS3231_YEAR 0x06 //年
//闹铃1
#define DS3231_Al1SEC 0x07 //秒
#define DS3231_AL1MIN 0x08 //分
#define DS3231_AL1HOUR 0x09 //时
#define DS3231_AL1DAY 0x0A //星期/日
//闹铃2
#define DS3231_AL2MIN 0x0b //分
#define DS3231_AL2HOUR 0x0c //时
#define DS3231_AL2DAY 0x0d //星期/日
#define DS3231_CONTROL 0x0e //控制寄存器
#define DS3231_STATUS 0x0f //状态寄存器
bit ack;
uchar BCD2HEX(uchar val) //BCD转换为Byte
{ uchari;
i= val&0x0f;
val >>= 4;
val &= 0x0f;
val *= 10;
i+= val;
return i;
}
uchar HEX2BCD(uchar val)//B码转换为BCD码
{
uchari,j,k;
i=val/10;
j=val;
k=j+(i<<4);
return k;
}
void Start()
{
SDA=1; //发送起始条件的数据信号
delay(1);
SCL=1;
delay(5); //起始条件建立时间大于4.7us,延时
SDA=0; //发送起始信号
delay(5); // 起始条件锁定时间大于4μs
SCL=0; //钳住I2C总线，准备发送或接收数据
delay(2);
}
void Stop()
{
SDA=0; //发送结束条件的数据信号
delay(1); //发送结束条件的时钟信号
SCL=1; //结束条件建立时间大于4us
delay(5);
SDA=1; //发送I2C总线结束信号
delay(4);
}
void SendByte(uchar Dat)
{
uchar BitCnt;
for(BitCnt=0;BitCnt<8;BitCnt++) //要传送的数据长度为8位
{
if((Dat<
SDA=1; //判断发送位
else
SDA=0;
delay(1);
SCL=1; //置时钟线为高，通知被控器开始接收数据位
delay(5); //保证时钟高电平周期大于4μs
SCL=0;
}
delay(2);
SDA=1; //8位发送完后释放数据线，准备接收应答位
delay(2);
SCL=1;
delay(3);
if(SDA==1)
ack=0;
else
ack=1; //判断是否接收到应答信号
SCL=0;
delay(2);
}
uchar RcvByte() //功能: 用来接收从器件传来的数据,并判断总线错误(不发应答信号)，发完后请用应答函数应答从机。
{
uchar retc;
uchar BitCnt;
retc=0;
SDA=1; //置数据线为输入方式
for(BitCnt=0;BitCnt<8;BitCnt++)
{
delay(1);
SCL=0; //置时钟线为低，准备接收数据位
delay(5); //时钟低电平周期大于4.7μs
SCL=1; //置时钟线为高使数据线上数据有效
delay(3);
retc=retc<<1;
if(SDA==1)
retc=retc+1; //读数据位,接收的数据位放入retc中
delay(2);
}
SCL=0;
delay(2);
return(retc);
}
void I2CACK(bit a) // 功能: 主控器进行应答信号(可以是应答或非应答信号，由位参数a决定)
{
if(a==0)
SDA=0; //在此发出应答或非应答信号
else
SDA=1;
delay(3);
SCL=1;
delay(5); //时钟低电平周期大于4μs
SCL=0; //清时钟线，钳住I2C总线以便继续接收
delay(2);
}
uchar I2CRead()
{
uchar read_data;
Start();
SendByte(ADDRTD);
if(ack==0)
{
return(0);
}
read_data = RcvByte();
I2CACK(1);
Stop();
return read_data;
}
uchar I2CReadAdd(uchar addr)
{
Start();
SendByte(ADDRTW);
if(ack==0)
{
return(0);
}
SendByte(addr);
if(ack==0)
{
return(0);
}
return(I2CRead());
}
void Readtime()
{
uchar temp;
temp=I2CReadAdd(DS3231_SEC);//秒
sec=BCD2HEX(temp);
temp=I2CReadAdd(DS3231_MIN);//分
min=BCD2HEX(temp);
temp=I2CReadAdd(DS3231_HOUR); //时
hour=BCD2HEX(temp);
temp=I2CReadAdd(DS3231_DATE); //日
date=BCD2HEX(temp);
temp=I2CReadAdd(DS3231_MONTH); //月
month=BCD2HEX(temp);
temp=I2CReadAdd(DS3231_YEAR); //年
year=BCD2HEX(temp);
}
void InitDS3231() //ds3231初始化
{SCL=1;
delay(5);
SDA=1;
delay(5);
}
void TimeDisplay(uchar Dhour,ucharDmin,uchar Dsec) //时分秒数组赋值
{ b[0]=numbr[Dhour / 10]; // 时十位
b[1]=numbr[Dhour % 10]; // 时个位
b[4]=numbr[Dmin / 10]; // 分十位
b[5]=numbr[Dmin % 10]; // 分个位
b[8]=numbr[Dsec / 10]; // 秒十位
b[9]=numbr[Dsec % 10]; // 秒个位
}
void DateDisplay(uchar Dyear,ucharDmonth,uchar Dday) //年月天数组赋值
{ a[2]=numbr[Dyear / 10]; // 年十位
a[3]=numbr[Dyear % 10]; // 年个位
a[6]=numbr[Dmonth / 10]; // 月十位
a[7]=numbr[Dmonth % 10]; // 月个位
a[10]=numbr[Dday / 10]; // 天十位
a[11]=numbr[Dday % 10]; // 天个位
}
void Start_I2C()
{
SDA=1; //发送起始条件的数据信号
delay(1);
SCL=1;
delay(5); //起始条件建立时间大于4.7us,延时
SDA=0; //发送起始信号
delay(5); // 起始条件锁定时间大于4μs
SCL=0; //钳住I2C总线，准备发送或接收数据
delay(2);
}
void Stop_I2C()
{
SDA=0; //发送结束条件的数据信号
delay(1); //发送结束条件的时钟信号
SCL=1; //结束条件建立时间大于4us
delay(5);
SDA=1; //发送I2C总线结束信号
delay(4);
}
uchar write_byte(uchar addr, ucharwrite_data)
{
Start_I2C();
SendByte(ADDRTW); ///
if (ack == 0)
return 0;
SendByte(addr);
if (ack == 0)
return 0;
SendByte(write_data);
if (ack == 0)
return 0;
Stop_I2C();
delay1ms(10);
return 1;
}
void ModifyTime(uchar yea,uchar mon,ucharda,uchar hou,uchar min,uchar sec)
{ uchar temp=0;
temp=HEX2BCD(yea);
write_byte(DS3231_YEAR,temp); //修改年
temp=HEX2BCD(mon);
write_byte(DS3231_MONTH,temp); //修改月
temp=HEX2BCD(da); /
write_byte(DS3231_DATE,temp); //修改日
temp=HEX2BCD(hou);
write_byte(DS3231_HOUR,temp); //修改时
temp=HEX2BCD(min);
write_byte(DS3231_MIN,temp); //修改分
temp=HEX2BCD(sec);
write_byte(DS3231_SEC,temp); //修改秒
}
void xianshi(void)
{
{uint i;
TimeDisplay(hour,min,sec);
lcd_pos(1,1); //时间
i=0;
while(b[ i]!='\0')
{
delay1ms(1);
write_dat(b);
delay1ms(1);
i++;
}
DateDisplay(year,month,date); //显示日期
delay1ms(1);
lcd_pos(0,0);
i=0;
while(a[ i]!='\0')
{
delay1ms(1);
write_dat(a);
delay1ms(1);
i++;
}
ReadTemperature(); //显示温度
delay1ms(1);
lcd_pos(2,1);
delay1ms(1);
i=0;
while(t[ i]!='\0')
{
delay1ms(1);
write_dat(t);
delay1ms(2);
i++;
}
}
}
void shuaxin(void)
{ uint i;
TimeDisplay(hour,min,sec);
lcd_pos(1,1); //时间
i=0;
while(b[ i]!='\0')
{
delay1ms(1);
write_dat(b);
delay1ms(1);
i++;
}
DateDisplay(year,month,date); //显示日期
delay1ms(1);
lcd_pos(0,0);
i=0;
while(a[ i]!='\0')
{
delay1ms(1);
write_dat(a);
delay1ms(1);
i++;
}
}
void sotp(void)
{
uinti;
while(1)
{
duan1: if(K1==0)
{
delay1ms(100);
if(K1==0)
{
Readtime();
shuaxin();
i=0;
gotoduan2;
}
}
else
{gotoduan5;}
duan2: if(K2==0)
{
delay1ms(100);
if(K2==0)
{
i++;
if(i>6){i=0;}
shuaxin();
}
}
switch(i)
{
case 0: if(K3==0){delay1ms(100);if(K3==0){year=year+1;} if(year>=100){year=0;} shuaxin();}break;
case 1: if(K3==0){delay1ms(100);if(K3==0){month=month+1;} if(month>=13){month=0;} shuaxin();}break;
case 2: if(K3==0){delay1ms(100);if(K3==0){date=date+1;} if(date>=32){date=0;} shuaxin();}break;
case 3: if(K3==0){delay1ms(100);if(K3==0){hour=hour+1;} if(hour>=25){hour=0;} shuaxin();}break;
case 4: if(K3==0){delay1ms(100);if(K3==0){min=min+1;} if(min>=61){min=0;} shuaxin();}break;
case 5: if(K3==0){delay1ms(100);if(K3==0){sec=sec+1;} if(sec>=61){sec=0;} shuaxin();} break;
}
duan4: if(K4==0)
{
delay1ms(100);
if(K4==0)
{
ModifyTime(year,month,date,hour,min,sec);
gotoduan5; ///
}
}
else
{gotoduan2;}
duan5: Readtime();
xianshi();
}
}
main()
{
lcd_init();
delay1ms(5);
InitDS3231();
delay1ms(5);
delay1ms(5);
sotp();
}
