//***********DS18B20數字溫度計C程序****************//
//*MCU:          AT892051                          //
//*MCU-crystal:  12M                               //
//*Version:      01                                //
//*Last Updata:  2007-6-10                         //
//*Author:       zhaojun                           //
//*Description:                                    //
//DS18B20的讀寫程序,數據腳P3.4                     //
//溫度傳感器18B20匯編程序,采用器件默認的12位轉化   //
//最大轉化時間750微秒,顯示溫度-55到+125度,顯示精度 //
//為0.1度，顯示采用4位LED共陽顯示測溫值            //
//P1口為段碼輸入,P0~P3為位選                       //
/***************************************************/

#include "reg51.h"
#include "intrins.h"                            //_nop_();延時函數用
#define  Disdata P1                             //段碼輸出口
#define  discan  P3                             //掃描口
#define  uchar unsigned char
#define  uint  unsigned int
sbit     DQ=P3^4;                               //溫度輸入口
sbit     DIN=P1^7;                              //LED小數點控制
uint     h; 
uint     temp;
//
//
//**************溫度小數部分用查表法***********//
uchar code ditab[16]=
{0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x04,0x05,0x06,0x06,0x07,0x08,0x08,0x09,0x09};
//
uchar code dis_7[12]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0xff,0xbf};
//共陽LED段碼表        "0"  "1"  "2"  "3"  "4"  "5"  "6"  "7"  "8"  "9" "不亮" "-"              
uchar code scan_con[4]={0xfe,0xfd,0xfb,0xf7};    //列掃描控制字
uchar data temp_data[2]={0x00,0x00};             //讀出溫度暫放
uchar data display[5]={0x00,0x00,0x00,0x00,0x00};     //顯示單元數據，共4個數據和一個運算暫用

//
//
//
/*****************11us延時函數*************************/
//
void delay(uint t)
{
  for (;t>0;t--);
}
//

/****************顯示掃描函數***************************/
scan()
{
  char k;
     for(k=0;k<4;k++)                     //4位LED掃描控制
	 {
	  Disdata=dis_7[display[k]];          //數據顯示
	  if (k==1){DIN=0;}                   //小數點顯示
	  discan=scan_con[k];                 //位選
	  delay(200);
	 }
}
//
//
/****************DS18B20復位函數************************/
ow_reset(void)
{
 char presence=1;
 while(presence)
 {
  while(presence)
   {
    DQ=1;_nop_();_nop_();//從高拉倒低
	DQ=0;                                       
	delay(50);           //550 us
	DQ=1;                                        
	delay(6);            //66 us
	presence=DQ;         //presence=0 復位成功,繼續下一步
   } 
   delay(45);            //延時500 us
   presence=~DQ;         
 }
 DQ=1;                   //拉高電平
}
//
//
/****************DS18B20寫命令函數************************/
//向1-WIRE 總線上寫1個字節
void write_byte(uchar val)
{ 
  uchar i;
  for(i=8;i>0;i--)
  {
   DQ=1;_nop_();_nop_();                  //從高拉倒低
   DQ=0;_nop_();_nop_();_nop_();_nop_();  //5 us
   DQ=val&0x01;                           //最低位移出
   delay(6);                              //66 us
   val=val/2;                             //右移1位
   }
   DQ=1;
   delay(1);
}
//
/****************DS18B20讀1字節函數************************/
//從總線上取1個字節
uchar read_byte(void)
{
 uchar i;
 uchar value=0;
 for(i=8;i>0;i--)
 {
  DQ=1;_nop_();_nop_();
  value>>=1;
  DQ=0;_nop_();_nop_();_nop_();_nop_();         //4 us
  DQ=1;_nop_();_nop_();_nop_();_nop_();         //4 us
  if(DQ)value|=0x80;
  delay(6);                                     //66 us
 }
DQ=1;
return(value);
}
//
/****************讀出溫度函數************************/
//
read_temp()
{
  ow_reset();                  //總線復位
  delay(200);
  write_byte(0xcc);            //發命令
  write_byte(0x44);            //發轉換命令
  ow_reset(); 
  delay(1);
  write_byte(0xcc);            //發命令
  write_byte(0xbe);
  temp_data[0]=read_byte();    //讀溫度值的第字節
  temp_data[1]=read_byte();    //讀溫度值的高字節
  temp=temp_data[1];
  temp<<=8;                                               
  temp=temp|temp_data[0];      // 兩字節合成一個整型變量。
  return temp;                 //返回溫度值
}
//
/****************溫度數據處理函數************************/

//二進制高字節的低半字節和低字節的高半字節組成一字節,這個
//字節的二進制轉換為十進制后,就是溫度值的百、十、個位值,而剩
//下的低字節的低半字節轉化成十進制后,就是溫度值的小數部分

/********************************************************/
work_temp(uint tem)
{
 uchar n=0;
 if(tem>6348)                        // 溫度值正負判斷
     {tem=65536-tem;n=1;}            // 負溫度求補碼,標志位置1
      display[4]=tem&0x0f;           // 取小數部分的值
	  display[0]=ditab[display[4]];  // 存入小數部分顯示值
      display[4]=tem>>4;             // 取中間八位,即整數部分的值
	  display[3]=display[4]/100;     // 取百位數據暫存
	  display[1]=display[4]%100;     // 取后兩位數據暫存
	  display[2]=display[1]/10;      // 取十位數據暫存
	  display[1]=display[1]%10;  
/******************符號位顯示判斷**************************/
  if(!display[3]) 
  {
    display[3]=0x0a;           //最高位為0時不顯示
    if(!display[2])
	 {
	   display[2]=0x0a;        //次高位為0時不顯示
	 }
  }
  if(n){display[3]=0x0b;}      //負溫度時最高位顯示"-"
}
//
//
/****************主函數************************/
main()
{
  Disdata=0xff;                 //初始化端口
  discan=0xff;
  for(h=0;h<4;h++)              //開機顯示"8888"
      {display[h]=8;} 
  ow_reset();                   //開機先轉換一次
  write_byte(0xcc);             //Skip ROM
  write_byte(0x44);             //發轉換命令
  for(h=0;h<100;h++)            //開機顯示"8888"
      {scan();}
  while(1)
  {
	work_temp(read_temp());     //處理溫度數據
	scan();                     //顯示溫度值
  }
}
//
//***********************結束**************************//