/*******************************************
程序功能：利用單線制DS18B20溫度傳感器
          LED數碼管顯示當前的溫度值
********************************************/
#include <reg51.h>                 //DS18B20溫度傳感器程序 
code unsigned char seg7code[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,
                               0x82,0xf8,0x80,0x90,0xff}; //不帶小數點的共陽數碼管段碼
code unsigned char seg7codeB[]={0x40,0x79,0x24,0x30,0x19,0x12,
                               0x02,0x78,0x00,0x10,0xff}; //帶小數點的共陽數碼管段碼

sbit DQ=P3^6; //數據傳輸線接單片機的相應的引腳 
unsigned char tempL=0; //設全局變量
unsigned char tempH=0; 
unsigned int sdata;//測量到的溫度的整數部分
unsigned char xiaoshu1;//小數第一位
unsigned char xiaoshu2;//小數第二位
unsigned char xiaoshu;//兩位小數
bit  fg=1;        //溫度正負標志



//******************延時子程序 *******************************

//這個延時程序的具體延時時間是time=i*8+10,適用于小于2ms的延時

//************************************************************
void delay(unsigned char i)
{
 for(i;i>0;i--);
}


//***********************************************************

//                     延時子程序

//************************************************************
void delay1ms()
{
 unsigned char i;
 for(i=124;i>0;i--);  //延時124*8+10=1002us
}



//*****************************初始化程序 *********************************//

Init_DS18B20(void) 
{
 unsigned char x=0;
 DQ=1; //DQ先置高 
 delay(8); //稍延時
 DQ=0; //發送復位脈沖 
 delay(80); //延時（>480us) 
 DQ=1; //拉高數據線 
 delay(5); //等待（15~60us) 
 x=DQ; //用X的值來判斷初始化有沒有成功，18B20存在的話X=0，否則X=1 
 delay(20); 
} 


//**********讀一個字節************//

ReadOneChar(void)  //主機數據線先從高拉至低電平1us以上，再使數據線升為高電平，從而產生讀信號
{
unsigned char i=0; //每個讀周期最短的持續時間為60us，各個讀周期之間必須有1us以上的高電平恢復期
unsigned char dat=0; 
for (i=8;i>0;i--) //一個字節有8位 
{
 DQ=1; 
 delay(1); 
 DQ=0;
 dat>>=1; 
 DQ=1; 
 if(DQ) 
 dat|=0x80; 
 delay(4);
} 
return(dat);
} 



//*********************** **寫一個字節**************************//

WriteOneChar(unsigned char dat) 
{ 
  unsigned char i=0; //數據線從高電平拉至低電平，產生寫起始信號。15us之內將所需寫的位送到數據線上，
  for(i=8;i>0;i--) //在15~60us之間對數據線進行采樣，如果是高電平就寫1，低寫0發生。 
  {
   DQ=0; //在開始另一個寫周期前必須有1us以上的高電平恢復期。 
   DQ=dat&0x01; 
   delay(5); 
   DQ=1; 
   dat>>=1;
  } 
  delay(4);
} 


//讀溫度值（低位放tempL;高位放tempH;）
ReadTemperature(void) 
{ 
 Init_DS18B20(); //初始化
 WriteOneChar(0xcc); //跳過讀序列號的操作
 WriteOneChar(0x44); //啟動溫度轉換
 delay(125); //轉換需要一點時間，延時 
 Init_DS18B20(); //初始化
 WriteOneChar(0xcc); //跳過讀序列號的操作 
 WriteOneChar(0xbe); //讀溫度寄存器（頭兩個值分別為溫度的低位和高位） 
 tempL=ReadOneChar(); //讀出溫度的低位LSB
 tempH=ReadOneChar(); //讀出溫度的高位MSB 
  
		if(tempH>0x7f)      //最高位為1時溫度是負
		{
		 tempL=~tempL;         //補碼轉換，取反加一
		 tempH=~tempH+1;       
		 fg=0;      //讀取溫度為負時fg=0
       }
		sdata = tempL/16+tempH*16;      //整數部分
		xiaoshu1 = (tempL&0x0f)*10/16; //小數第一位
		xiaoshu2 = (tempL&0x0f)*100/16%10;//小數第二位
		xiaoshu=xiaoshu1*10+xiaoshu2; //小數兩位
}


//********************顯示函數****************
void Led(unsigned int date)
{ 
 if(fg==1)
 {
	 P2=0xfe;     //P1.0=0，選通第一位
	 P0=seg7code[date/10];  //十位數，查表，輸出
	 delay1ms();
	 P0=0xff;        //消隱
	
	 P2=0xfd;     //P1.1=0,選通第二位，個位數
	 P0=seg7codeB[date%10];
	 delay1ms();
	 P0=0xff;       //消隱
	
	 P2=0xfb;     //P1.3=0,選通第三位，小數點第一位
	 P0=seg7code[xiaoshu1];
	 delay1ms();
	 P0=0xff;         //消隱
	
	 P2=0xf7;     //P1.3=0,選通第四位，小數點第二位
	 P0=seg7code[xiaoshu2];
	 delay1ms();
	 P0=0xff;       //消隱
 }

   if(fg==0)  //溫度為負時顯示的數據
   {
	 P2=0xfe;     //P1.0=0，選通第一位
	 P0=seg7code[11];  //顯示負號
	 delay1ms();
	 P0=0xff;        //消隱
	
	 P2=0xfd;     //P1.1=0,選通第二位，十位數
	 P0=seg7code[date/10];
	 delay1ms();
	 P0=0xff;       //消隱
	
	 P2=0xfb;     //P1.3=0,選通第三位，個位數
	 P0=seg7codeB[date%10];
	 delay1ms();
	 P0=0xff;         //消隱
	
	 P2=0xf7;     //P1.3=0,選通第四位，小數點第一位
	 P0=seg7code[xiaoshu1];
	 delay1ms();
	 P0=0xff;       //消隱
   }
}


//**************************** //主程序 


main()
{
 while(1)
 {
  ReadTemperature();
  Led(sdata);
 }
}