/******************************************/
//
//      DS18B20溫度計C程序
//      2006.11.12
/******************************************/
//使用AT89C2051單片機，12MHZ晶振，用共陽LED數碼管
//P1口輸出段碼，P3口掃描，P3.4接DS18B20
//#Pragma src(d:\aa.asm)
#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; 
//
//
//**************溫度小數部分用查表法***********//
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(90);                          //延時
	  discan=0xff;
	 }
}
//
//
/****************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();                                  //總線復位
  write_byte(0xcc);                            //發命令
  write_byte(0xbe);                            //發讀命令
  temp_data[0]=read_byte();                    //溫度低8位
  temp_data[1]=read_byte();                    //溫度高8位
  ow_reset();
  write_byte(0xcc);                            //Skip ROM
  write_byte(0x44);                            //發轉換命令
}
//
/****************溫度數據處理函數************************/

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

/********************************************************/
work_temp()
{
 uchar n=0;
 if(temp_data[1]>127) //正、負數判斷
  {
    temp_data[1]=(256-temp_data[1]);temp_data[0]=(256-temp_data[0]);n=1; //負溫度求補碼
  }
  display[4]=temp_data[0]&0x0f;  //取低字節的低4位--小數部分
  display[0]=ditab[display[4]];  //存放小數部分
  display[4]=((temp_data[0]&0xf0>>4)|((temp_data[1]&0x0f)<<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<500;h++)                  //開機顯示"8888"
      {scan();}
  while(1)
  {
    read_temp();                      //讀出DS18B20溫度數據
	work_temp();                      //處理溫度數據
	for(h=0;h<500;h++)                //顯示溫度值2s
	   {scan();}
  }
}
//
//***********************結束**************************//