#include<reg51.h>
#include<stdio.h>
#include<stdlib.h> 
#include<intrins.h>
#include<absacc.h>
#define NOP() _nop_();
#define  uch unsigned char                     //給unsigned char起別名 uch
sbit DQ=P3^6 ;                               //定義18B20數據端口                       //定義18B20D口方向寄存器                  //設置數據口為輸入
#define DQ_LOW() DQ = 0           //設置數據口為輸出
 unsigned char  TLV=0 ;                        //采集到的溫度高8位
 unsigned char  THV=0;                         //采集到的溫度低8位
 unsigned int TZ=0;                           //轉換后的溫度值整數部分
 unsigned int TX=0;                           //轉換后的溫度值小數部分
 unsigned int wd;                              //轉換后的溫度值BCD碼形式

unsigned char shi;                             //整數十位
unsigned char ge;                              //整數個位
unsigned char shifen;                          //十分位
unsigned char baifen;                          //百分位
unsigned char qianfen;                         //千分位
unsigned char wanfen;                          //萬分位

unsigned char code table[]={
						0x3f,0x06,0x5b,
						0x4f,0x66,0x6d,
						0x7d,0x07,0x7f,
						0x6f,0x40
							} ;
//0-9的顯示代碼

//------------------------------------------------
//延時函數
void delay(char x,char y) 
{
  char z;
  do{
      z=y;
      do{;}while(--z);
     }while(--x);
 }
//其指令時間為：7+（3*（Y-1）+7）*（X-1）如果再加上函數調用的call 指令、頁面設定、傳遞參數花掉的7 個指令。
//則是：14+（3*（Y-1）+7）*（X-1）。

//--------------------------------------------------
//結果顯示函數
void display()
{
                           //設置A口全為輸出
P0=table[shi];                      //顯示整數十位
 
 P2=0x01;
 delay(10,30);
P0=table[ge]|0X80;                  //顯示整數個位，并點亮小數點
 
 P2=0x02;
 delay(10,30);
 P0=table[shifen];                   //顯示小數十分位
 P2=0x04;
 delay(10,30);
 P0=table[baifen];                   //顯示小數百分位
 P2=0x08;
 delay(10,30);

}




//-----------------------------------------------
//復位DS18B20函數
reset(void)
{
  char presence=1;
  while(presence)
  { 
    DQ_LOW();                                //主機拉至低電平
    delay(4,70);                              //延時503us
	DQ=1;
    delay(2,5);                               //延時70us
    if(DQ==1) presence=1;                     //沒有接收到應答信號，繼續復位
    else presence=0;                          //接收到應答信號
    delay(2,60);                              //延時430us
   }
   //	P1=0X00;
  }

//-----------------------------------------------
//寫18b20寫字節函數
void write_byte(uch val)
{
 uch i;
 uch temp;
 for(i=8;i>0;i--)
 {
   temp=val&0x01;                            //最低位移出
   DQ_LOW(); 
   NOP();
   NOP();
   NOP();
   NOP();
   NOP();                                    //從高拉至低電平,產生寫時間隙
   NOP();
   NOP();
   NOP();
   NOP();
  // NOP();
   if(temp==1) DQ=1;                  //如果寫1,拉高電平
   delay(2,7);                               //延時63us
  DQ=1; 
   NOP();
   NOP();
   val=val>>1;                               //右移一位
   NOP();

  }
}

//------------------------------------------------
//18b20讀字節函數
uch read_byte(void)
{
 
 uch i;
 uch value=0;                                //讀出溫度
 static bit j;
 for(i=8;i>0;i--)
 {
   value>>=1; 
   DQ_LOW();
   NOP();
   NOP();
   NOP();
   NOP();
   NOP();
   NOP();                                   //6us
   DQ=1;                              //拉至高電平
   NOP(); 
   NOP();
   NOP();  
   NOP(); 
  NOP();                                  //4us
   j=DQ;
   if(j) value|=0x80;
   delay(2,9);                             //63us
   
  }
  
  return(value);
}

//-------------------------------------------------
//啟動溫度轉換函數
void get_temp()
{ 
int i;
DQ=1;
reset();                                 //復位等待從機應答 
write_byte(0XCC);                        //忽略ROM匹配 
write_byte(0X44);                        //發送溫度轉化命令  
for(i=20;i>0;i--)
    {
        
        display();                       //調用多次顯示函數，確保溫度轉換完成所需要的時間
    }
reset();                                 //再次復位，等待從機應答 
write_byte(0XCC);                        //忽略ROM匹配 
write_byte(0XBE);                        //發送讀溫度命令 
TLV=read_byte();                         //讀出溫度低8 
THV=read_byte();                         //讀出溫度高8位 
                              //釋放總線 
TZ=(TLV>>4)|(THV<<4)&0X3f;               //溫度整數部分
TX=TLV<<4;                               //溫度小數部分
//if(TZ>100) 
//TZ/100;                       //不顯示百位
ge=TZ%10;//個位                          //整數部分個位
shi=TZ/10;//十位                         //整數十位
wd=0;  
if (TX & 0x80) wd=wd+5000;
if (TX & 0x40) wd=wd+2500;
if (TX & 0x20) wd=wd+1250;
if (TX & 0x10) wd=wd+625;                //以上4條指令把小數部分轉換為BCD碼形式             
shifen=wd/1000;                          //十分位                    
baifen=(wd%1000)/100;                    //百分位
qianfen=(wd%100)/10;                     //千分位
wanfen=wd%10;                            //萬分位
NOP();
}

//--------------------------------------------------
//豬函數
void main()
{
 
   while(1)
     {
   get_temp();                  //調用溫度轉換函數
   display();                       //調用結果顯示函數
   


     }
}