//===========================================
//DS18B20 drive
//===========================================
#include <intrins.h>
#include <reg52.h>

#define uchar unsigned char
#define uint unsigned int
/*----------------引腳定義-----------------*/
sbit DQ=P2^7;

/*----------------變量定義-----------------*/
uchar code offset=2;				//溫度顯示時第一位數字的x方向的偏移量
uchar code ty=0;					//溫度顯示在y方向的位置
uchar code SKROM=0xcc;				//跳過ROM讀取的指令
static uchar code CONVT=0x44;		//溫度轉換指令
uchar code RROM=0x33;				//讀取ROM指令
uchar code WSCR=0x4e;				//寫寄存器指令
uchar code RPOW=0xb4;				//讀取電源類型指令
uchar code RSCR=0xbe;				//讀取寄存器指令
//uchar code MROM=0x55;				//匹配ROM指令

uchar data f_t=1;
uchar data TEMPL=0;
uchar data TEMPM=0;
uchar data TH=0;
uchar data TL=0;
uchar data CONF=0;
uchar data FamilyCode=0;
uchar data SerialNumber[6];
uchar data CRC=0;
/*----------------函數定義-----------------*/

//===========================================
//函數名稱:timer0()
//函數功能:產生較準確的定時中斷
//===========================================
void timer0() interrupt 1 using 0
{
	f_t=0;
}

//===========================================
//函數名稱:delay(uint t)
//函數功能:延時
//===========================================
void delay(uint t)
{
 	uint i=0;
	for(i=0;i<t;i++);
}

//----------------------------------------
//函數名稱:ShowByte(uchar x,uchar y,uchar num)
//功能描述:以二進制顯示一個字節中數據
//----------------------------------------	
void ShowByte(uchar x,uchar y,uchar num)
{
 	uchar i=0;
	uchar str[8];
	str[8]='\0';
	for(i=0;i<8;i++)
		str[i]=(num>>(7-i))&0x01;
	for(i=0;i<8;i++)
	{									   
		write_LCD_char(x+i,y,str[i]+'0');
	}
}

//===========================================
//函數名稱:WriteDQ(uchar num)
//函數功能:寫數據線一位
//===========================================
void WriteDQ(uchar num)
{
 	if(num==0)
	{
	 	DQ=0;
		f_t=1;
		TH0=0xff;
		TL0=0x60;
		TR0=1;
		while(f_t);
		TR0=0;
		DQ=1;
		_nop_();
		_nop_();
		_nop_();
		_nop_();			
	}
	else
	{
	 	DQ=0;
		f_t=1;
		TH0=0xff;
		TL0=0xf6;
		TR0=1;
		while(f_t);
		TR0=0;
		f_t=1;
		DQ=1;
		TH0=0xff;
		TL0=0x60;
		TR0=1;
		while(f_t);
		TR0=0;
		
	}
}
//===========================================
//函數名稱:ReadDQ()
//函數功能:讀數據線
//===========================================
uchar ReadDQ()
{
	DQ=0;
	f_t=1;
	TH0=0xff;
	TL0=0xe2;
	TR0=1;
	while(f_t);
	TR0=0;
	DQ=1;
	return DQ;	
}

//===========================================
//函數名稱:Reset()
//函數功能:產生復位信號
//===========================================
void Reset()
{
	DQ=0;	 	
	f_t=1;		
	TH0=0xfb;	
	TL0=0x7e;	
	TR0=1;		
	while(f_t);	
	TR0=0;		
	DQ=1;
	_nop_();
	_nop_();
	_nop_();
	_nop_();		
}
//===========================================
//函數名稱:WriteByte(uchar COMM)
//函數功能:寫入一個字節
//===========================================
void WriteByte(uchar COMM)
{
	uchar i=0;
	for(i=0;i<8;i++)
	{
	 	if((COMM>>i)&0x01)
				WriteDQ(1);
		 else
		 		WriteDQ(0);
	}	
}

uchar ReadByte()
{
 	uchar i=0,in=0,temp=0;
	for(i=0;i<8;i++)
	{
	 	temp=ReadDQ();
		if (temp==1)
          in=(in>>1)|0x80;
      	else
          in=(in>>1)&0x7f;
	}
	return in;
}

//===========================================
//函數名稱:Init()
//函數功能:初始化系統
//===========================================
uchar Init()
{
	uchar f_i=0;
	DQ=0;	 		  //
	f_t=1;			  
	TH0=0xfb;		  //延時600us
	TL0=0x50;		  //產生復位脈沖 
	TR0=1;			  
	while(f_t);		  
	TR0=0;			  
	DQ=1;			  //
	f_t=1;			  //
	TH0=0xff;		  //延時80us
	TL0=0x60;
	TR0=1;			  //
	while(f_t);
	TR0=0;
	f_i=!DQ;
	do{}while(!DQ);
	return f_i; //成功返回1   失敗返回0	
}

//===========================================
//函數名稱:WriteSCR(uchar TH,uchar TL,uchar config)
//函數功能:寫寄存器
//===========================================
void WriteSCR(uchar TH,uchar TL,uchar CONFIG)		  
{
	WriteByte(WSCR);
	WriteByte(TH);
	WriteByte(TL);
	WriteByte(CONF);
	Reset();
	while(!Init());
				
}

//===========================================
//函數名稱:ReadSCR()
//函數功能:讀寄存器
//===========================================
void ReadSCR()
{
	uchar i=0,p[8];
	WriteByte(SKROM);
	WriteByte(RSCR);
	for(i=0;i<8;i++)
	{
	 	p[i]=ReadByte();
	}
	Reset();
	while(!Init());
	TEMPL=p[0];
	TEMPM=p[1];
	TH=p[2];
	TL=p[3];
	CONF=p[4];
}

//===========================================
//函數名稱:ReadPower()
//函數功能:讀取電源類型
//===========================================
uchar ReadPower()
{
	WriteByte(RPOW);
	Reset();
	while(!Init());
	return DQ;	//0為電容電源，1為外部電源
}

//===========================================
//函數名稱:ConvT()
//函數功能:轉化溫度
//===========================================
void ConvT()
{
	WriteByte(SKROM);
	WriteByte(CONVT);
	DQ=1;
	while(!DQ);
	Reset();
	while(!Init());		
}

//----------------------------------------
//函數名稱:ShowT()
//功能描述:將讀出的溫度顯示
//----------------------------------------	
void ShowT()
{
	uchar data tstr[9];
	uchar data WTEMPL[8];
	uchar data WTEMPM[8];
	uchar data i=0;
	uint data sum=0;				//整數位和 
	for(i=0;i<8;i++)
		WTEMPL[i]=(TEMPL>>i)&0x01;
	for(i=0;i<8;i++)
		WTEMPM[i]=(TEMPM>>i)&0x01;
	sum=WTEMPL[4]+WTEMPL[5]*2+WTEMPL[6]*4+WTEMPL[7]*8
			+WTEMPM[0]*16+WTEMPM[1]*32+WTEMPM[2]*64;
	if(WTEMPM[3]) tstr[0]='-';
	else tstr[0]=' ';
	if(WTEMPL[0])	tstr[8]='5';
	else	tstr[8]='0';
	if(WTEMPL[1])
	{
	 	switch(tstr[8])
		{
		 	case '0':tstr[7]='5';break;
			case '5':tstr[7]='7';break;
			default: tstr[7]='0';
		}
	}
	else
	{
		switch(tstr[8])
		{
		 	case '0':tstr[7]='0';break;
			case '5':tstr[7]='2';break;
			default: tstr[7]='0';
		}
	}
	if(WTEMPL[2])
	{
	 	switch(tstr[7])
		{
		 	case '0':tstr[6]='5';break;
			case '2':tstr[6]='1';break;
			case '5':tstr[6]='7';break;
			case '7':tstr[6]='3';break;
			default: tstr[6]='0';
		}
	}
	else
	{
	 	switch(tstr[7])
		{
		 	case '0':tstr[6]='0';break;
			case '2':tstr[6]='6';break;
			case '5':tstr[6]='2';break;
			case '7':tstr[6]='8';break;
			default: tstr[6]='0';
		}
	}
	if(WTEMPL[3])
	{
	 	switch(tstr[6])
		{
		 	case '0':tstr[5]='5';break;
			case '1':tstr[5]='8';break;
			case '2':tstr[5]='6';break;
			case '3':tstr[5]='9';break;
			case '5':tstr[5]='7';break;
			case '6':tstr[5]='5';break;
			case '7':tstr[5]='8';break;
			case '8':tstr[5]='6';break;
			default: tstr[5]='0';
		}
	}
	else
	{
	 	switch(tstr[6])
		{
		 	case '0':tstr[5]='0';break;
			case '1':tstr[5]='3';break;
			case '2':tstr[5]='1';break;
			case '3':tstr[5]='4';break;
			case '5':tstr[5]='2';break;
			case '6':tstr[5]='0';break;
			case '7':tstr[5]='3';break;
			case '8':tstr[5]='1';break;
			default: tstr[5]='0';
		}
	}
	tstr[4]='.';
	if(WTEMPM[0]&&WTEMPM[1]&&WTEMPM[2])
	{
	 	tstr[1]='1';
	}
	else tstr[1]=' ';
	tstr[2]=(sum%100)/10+'0';
	tstr[3]=sum%10+'0';
/*	for(i=0;i<8;i++)
	{									   
		write_LCD_char(7-i,0,WTEMPL[i]+'0');
	}
	write_LCD_str(0,1,"TEML");
	for(i=0;i<8;i++)
	{									   
		write_LCD_char(15-i,0,WTEMPM[i]+'0');
	}*/
	for(i=0;i<9;i++)
	{
		write_LCD_char(offset+i,ty,tstr[i]);	
	}	
	write_LCD_char(offset+9,ty,0);
}

//----------------------------------------
//函數名稱:ReadFamilyCode()
//功能描述:讀取器件的FamilyCode
//----------------------------------------	
void ReadFamilyCode()
{
	while(!Init());
	WriteByte(RROM);
	FamilyCode=ReadByte();
	while(!Init());	
}

//----------------------------------------
//函數名稱:ReadSerialNumber()
//功能描述:讀取器件的SerialNumber
//----------------------------------------	
void ReadSerialNumber()
{
	uchar i=0;
	while(!Init());
	WriteByte(RROM);
	ReadByte();				//跳過FamilyCode的讀取
	for(i=0;i<6;i++)
	{
	 	SerialNumber[i]=ReadByte();
	}
	while(!Init()); 	
}

//----------------------------------------
//函數名稱:ReadCrc()
//功能描述:讀取器件的CRC
//----------------------------------------	
void ReadCrc()
{
	uchar i=0;
	while(!Init());
	WriteByte(RROM);
	for(i=0;i<7;i++) ReadByte();
 	CRC=ReadByte();
	while(!Init());
}