#include<reg52.h>
#include<intrins.h>
#define uchar unsigned char
#define uint  unsigned int
uchar  addr[6]={0x8d,0x89,0x8b,0x85,0x83,0x81}; //年，月，日，时，分，秒 读
uchar time[6];
uchar zhuanhua[12];
sbit rs=P1^2;  //数据/命令选择
sbit rw=P1^1;  //读写控制
sbit e=P1^0;  //片选信号
sbit rst=P3^0; //ds1302
sbit sclk=P3^1;         
sbit io=P3^2;
sbit dq=P1^3;//ds18b20定义数据线
#define lcd P2 //8 bit数据线
#define low  0
#define high  1
void ds18b20ini();
ds18b20writebyte(uchar byte);
uchar ds18b20readbyte();
uint gettemp();
void ds18b20dis( );
void delayus(uint i)  
{
uchar k;
    for(k=0;k<i;k++)
_nop_();   
}
void delay(uint t)  
{
  uint i;
  while(t--)
  {
     for(i=0;i<125;i++);
  }
}
//液晶模块
void checkbusy()
{
uchar busy;
rs=0;
rw=1;
lcd=0xff;
do
{
e = 1;
busy=lcd;
e=0;
}
while(busy&0x80);
}
//写命令函数
void wcom(uchar com)
{
  checkbusy();
  e=low;
  rs=low;   
  rw=low;   
  lcd=com;
  e=high;
  delay(10);
  e=low;   
}
//写数据函数
void wdata(int dat)
{
checkbusy();
e=low;
rs=high;
rw=low;
lcd=dat;
  e=high;
  delay(10);
e=low;
}
//初始化函数
void init()
{
lcd=0xff;
delay(100);
wcom(0x30); //写基本指令集
delay(1);
wcom(0x30);
delay(1);
wcom(0x0c); //显示开
delay(1);
wcom(0x01);  //清屏指令
delay(20);
  wcom(0x06);  //游标右移
  delay(100);
}
//清屏函数
void lcdclear(void)
{
wcom(0x01);  //清屏指令
delay(100);
}
//显示汉字
dishanzi(uchar addr,uchar *hz)
{
int i;
checkbusy();
wcom(addr);
for(i=0;hz[i]!='';i++)
{
  wdata(hz[i]);
  checkbusy();
}
delay(5);
}  

//ds1302模块
void ds1302write(uchar addr,uchar data1)  //写地址数据函数
{
uchar i;
rst=0;
_nop_();
sclk=0;
rst=1;
for(i=0;i<8;i++)
{
if(addr&0x01==1)
io=1;
else
io=0;
sclk=1;
_nop_();
sclk=0;
_nop_();
addr>>=1;
}
for(i=0;i<8;i++)
{
if(data1&0x01==1)
io=1;
else
io=0;
sclk=1;
_nop_();
sclk=0;
_nop_();
data1>>=1;
}
}
//ds1302读函数
uchar ds1302read(uchar addr)
{
uchar i;
uchar dat=0;
rst=0;
sclk=0;
_nop_();
rst=1;
_nop_();
for(i=0;i<8;i++)
{
if(addr&0x01==1)
io=1;
else
io=0;  
sclk=1;
_nop_();
sclk=0;
_nop_();
addr>>=1;
}
for(i=0;i<8;i++)
{
dat>>=1;
if(io)
dat|=0x80;
else
dat|=0x00;
sclk=1;
_nop_();
sclk=0;
_nop_();
}
rst=0;
_nop_();
io=1;
_nop_();
sclk=1;
_nop_();
return dat;
}
//获得时间
void gettime()   
{
int i;
for(i=0;i<6;i++)
{
time[i]=ds1302read(addr[i]);  //依次为年月日时分秒
}
}
//转化为10进制
void zh()
{
zhuanhua[0]=time[0]%16+0x30;
zhuanhua[1]=time[0]/16+0x30;
zhuanhua[2]=time[1]%16+0x30;
zhuanhua[3]=time[1]/16+0x30;
zhuanhua[4]=time[2]%16+0x30;
zhuanhua[5]=time[2]/16+0x30;
zhuanhua[6]=time[3]%16+0x30;
zhuanhua[7]=time[3]/16+0x30;
zhuanhua[8]=time[4]%16+0x30;
zhuanhua[9]=time[4]/16+0x30;
zhuanhua[10]=time[5]%16+0x30;
zhuanhua[11]=time[5]/16+0x30;
}
//写时间
void  ds1302ini()
{
ds1302write(0x8e,0x00);//去除写保护
ds1302write(0x8c,0x11);   // 写年
ds1302write(0x88,0x10);   //写月
ds1302write(0x8a,0x01);   //写日
ds1302write(0x84,0x10);   //写时
ds1302write(0x82,0x14);  // 写分
ds1302write(0x80,0x00);  // 写秒
ds1302write(0x8e,0x80);//写保护
}
     
//液晶显示时间
void distime()
{
  dishanzi(0x90,"20");
  wdata(zhuanhua[1]);
  wdata(zhuanhua[0]);
  dishanzi(0x92,"年");
  wdata(zhuanhua[3]);
  wdata(zhuanhua[2]);                                                   
  dishanzi(0x94,"月");   
  wdata(zhuanhua[5]);
  wdata(zhuanhua[4]);
  dishanzi(0x96,"日");
  wcom(0x88);
  wdata(zhuanhua[7]);
  wdata(zhuanhua[6]);
  dishanzi(0x89,"时");
  wdata(zhuanhua[9]);
  wdata(zhuanhua[8]);
  dishanzi(0x8b,"分");
  wdata(zhuanhua[11]);
  wdata(zhuanhua[10]);
  dishanzi(0x8d,"秒");
}  

//ds18b20模块
void ds18b20ini()  //ds1820初始化函数
{
int j;
dq=0;
delayus(500);
dq=1;
delayus(1);
j=dq;
delayus(500);
dq=1;
}
//ds18b20写一字节函数
ds18b20writebyte(uchar byte)
{
  uint j,value;
  for(j=0;j<8;j++)
{
   value=byte&0x01;
   byte=byte>>1;
if(value)
{
dq=0;
delayus(2);
dq=1;
delayus(50);
}
else
{
dq=0;
delayus(60);
dq=1;
delayus(1);
}
}
}
//ds18b20读一字节函数
uchar ds18b20readbyte()  
{
uchar dat,j;
for(j=0;j<8;j++)
{
dat=dat>>1;
dq=0;
delayus(2);
dq=1;
delayus(1);
if(dq)
dat|=0x80;
delayus(40);
}
return dat;
}
//获取温度函数
uint gettemp()
{
uchar a,b,temp;
ds18b20ini();
delayus(100);
ds18b20writebyte(0xcc);  //写跳过读ROM指令
ds18b20writebyte(0x44);   //写温度转换指令 ,启动ds18b20
delay(1);
ds18b20ini();
delayus(100);
ds18b20writebyte(0xcc);  
ds18b20writebyte(0xbe);
a=ds18b20readbyte();
b=ds18b20readbyte();
temp=(b*256+a)*0.0625;  //转换为10进制
return temp;
}
void ds18b20dis( ) //温度显示函数
{
  int tp,i,temp;
  int t[6];
  temp=gettemp();
  tp=temp*10000;
  for(i=0;i<6;i++)
  {
  t[i]=tp%10;
  tp=tp/10;
}
dishanzi(0x98,"温度");
wcom(0x9a);
wdata(':');
wdata(t[5]+0x30);
wdata(t[4]+0x30);
wdata('.');
wdata(t[3]+0x30);
wdata(t[2]+0x30);
wdata(t[1]+0x30);
wdata(t[0]+0x30);
}
     
void main(void)
{
     init();
     lcdclear();
     delay(10);
     ds1302ini();
  ds18b20ini();
delay(10);
    dishanzi(0x82,"电子时钟");
while(1)
   {
   delay(280);
   gettime();
   zh();
   distime();
   gettemp();
   ds18b20dis();
   }
}