#include <reg52.h>
#include <stdio.h>
#define  uchar unsigned char
#define  uint  unsigned int
sbit ds=P2^4;     //溫度傳感器信號(hào)線
sbit beep=P1^4;   //蜂鳴器
sbit s1=P2^0;//數(shù)碼管
sbit s2=P2^1;
sbit s3=P2^2;
sbit led0=P1^0;//控制發(fā)光二極管
sbit led1=P1^1;//控制發(fā)光二極管
sbit led2=P1^2;//控制發(fā)光二極管
sbit led3=P1^3;//控制發(fā)光二極管
uint temp;//定義整形的溫度數(shù)據(jù)
float f_temp;//定義浮點(diǎn)型的溫度數(shù)據(jù)
uint warn_l1=270;//定義溫度下線值，是乘以10的結(jié)果
uint warn_l2=250;//動(dòng)議溫度下限值，是乘以10的結(jié)果
uint warn_h1=300;//定義溫度上限值，上同
uint warn_h2=320;//定義溫度上限值，上同


unsigned char code table[]={
0x3f,0x06,0x5b,0x4f,
0x66,0x6d,0x7d,0x07,
0x7f,0x6f,//不帶小數(shù)點(diǎn)的編碼
0xbf,0x86,
0xdb,0xcf,0xe6,0xed,
0xfd,0x87,0xff,0xef};     //帶小數(shù)點(diǎn)的編碼

void delay(uint z)//延時(shí)函數(shù)
{
	uint x,y;
	for(x=z;x>0;x--)
		for(y=110;y>0;y--);
}



void dsreset(void)    //18B20復(fù)位，初始化函數(shù)
{
  uint i;
  ds=0;
  i=103;
  while(i>0)i--;
  ds=1;
  i=4;
  while(i>0)i--;
}

bit tempreadbit(void)   //讀1位函數(shù)
{
   uint i;
   bit dat;
   ds=0;i++;          //i++ 起延時(shí)作用
   ds=1;i++;i++;
   dat=ds;
   i=8;while(i>0)i--;
   return (dat);
}

uchar tempread(void)   //讀1個(gè)字節(jié)
{
  uchar i,j,dat;
  dat=0;
  for(i=1;i<=8;i++)
  {
    j=tempreadbit();
    dat=(j<<7)|(dat>>1);   //讀出的數(shù)據(jù)最低位在最前面，這樣剛好一個(gè)字節(jié)在DAT里
  }
  return(dat);
}

void tempwritebyte(uchar dat)   //向18B20寫一個(gè)字節(jié)數(shù)據(jù)
{
  uint i;
  uchar j;
  bit testb;
  for(j=1;j<=8;j++)
  {
    testb=dat&0x01;
    dat=dat>>1;
    if(testb)     //寫 1
    {
      ds=0;
      i++;i++;
      ds=1;
      i=8;while(i>0)i--;
    }
    else
    {
      ds=0;       //寫 0
      i=8;while(i>0)i--;
      ds=1;
      i++;i++;
    }

  }
}

void tempchange(void)  //DS18B20 開始獲取溫度并轉(zhuǎn)換
{
  dsreset();
  delay(1);
  tempwritebyte(0xcc);  // 寫跳過讀ROM指令
  tempwritebyte(0x44);  // 寫溫度轉(zhuǎn)換指令
}

uint get_temp()         //讀取寄存器中存儲(chǔ)的溫度數(shù)據(jù)
{
  uchar a,b;

  dsreset();
  delay(1);
  tempwritebyte(0xcc);
  tempwritebyte(0xbe);
  a=tempread();         //讀低8位
  b=tempread();         //讀高8位
  temp=b;
  temp<<=8;            //兩個(gè)字節(jié)組合為1個(gè)字
  temp=temp|a;
  f_temp=temp*0.0625;      //溫度在寄存器中為12位 分辨率位0.0625°
  temp=f_temp*10+0.5;    //乘以10表示小數(shù)點(diǎn)后面只取1位，加0.5是四舍五入
  f_temp=f_temp+0.05; 
  return temp;         //temp是整型
}


////////////////////顯示程序//////////////////////////
void display(uchar num,uchar dat)
{
      
   P0=table[dat];
   switch(num)
    {
       case 1:s1=0;break;
       case 2:s2=0;break;
       case 3:s3=0;break;
    }

}

void dis_temp(uint t)
{
  uchar i;
  i=t/100;
  display(1,i);
  delay(1);
  s1=1;
  i=t%100/10;
  display(2,i+10);
  delay(1);
  s2=1;
  i=t%100%10;
  display(3,i);
  delay(1);
  s3=1;
}
//////////////////////////////////////////////
void warn(uint s,uchar led)   //蜂鳴器報(bào)警聲音 ,s控制音調(diào)
{
    uchar i;i=s;
    //dula=0;
   // wela=0;
 
	beep=0;
    switch(led)
      {
         case 1:led0=0;break;
         case 2:led1=0;break;
         case 3:led2=0;break;
         case 4:led3=0;break;
      }
    //a=~(led);
    while(i--)
    {
      dis_temp(get_temp());
    }   
	beep=1;
    P1=0XFF;  
    i=s;  
     while(i--)
    {
      dis_temp(get_temp());
    }  
}
void deal(uint t)
{
  uchar i;
  if((t>warn_l2)&&(t<=warn_l1)) //大于25度小于27度
	{
       warn(40,1);
       
	}
  else if(t<=warn_l2)                   //小于25度 
	{
       warn(10,2);
	}
  else if((t<warn_h2)&&(t>=warn_h1)) //小于32度大于30度
    {
     warn(40,3);
	}
  else if(t>=warn_h2)                   //大于32度
	{
       warn(10,4);
	}
  else
    {
       i=40;
       while(i--)
       {
        dis_temp(get_temp());
       } 
    }
}

void init_com(void)
{
     TMOD = 0x20;
     PCON = 0x00;
     SCON = 0x50;
     TH1 = 0xFd;
     TL1 = 0xFd;
     TR1 = 1;
}

void comm(char *parr)         
{
	do
	{
	 SBUF = *parr++;                                                           //發(fā)送數(shù)據(jù)                          
     while(!TI);                                                               //等待發(fā)送完成標(biāo)志為1
	 TI =0;                                                                    //標(biāo)志清零
	}while(*parr);                                                             //保持循環(huán)直到字符為'\0'
}

void main()
{
  uchar buff[4],i;
  
  init_com();
  while(1)
 {    
      tempchange();
      for(i=10;i>0;i--)
     {
      dis_temp(get_temp());}
      deal(temp); 

      sprintf(buff,"%f",f_temp);

    for(i=10;i>0;i--)
     {
      dis_temp(get_temp());}

      comm(buff);

     for(i=10;i>0;i--)
     {
      dis_temp(get_temp());}
    
 }
}