#include<reg52.h>
#define uchar unsigned char
#define uint unsigned int


uchar dis[5]={0x10,0x10,0x10,0x10};
uchar c[4]={1, 2, 4, 8};
uchar seg7[17]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e,0xff};
uchar dot_seg[10]={0x40,0x79,0x24,0x30,0x19,0x12,0x02,0x78,0x00,0x10};

uint	tm; //從DS18B20讀出的數(shù)據(jù)

uchar isNeg;/*是否為負(fù)數(shù)標(biāo)志位*/
sbit DQ=P3^7;/*DS18B20的DQ端*/
/* ********************延時(shí)t毫秒 ***************************/
void delay(uint t)
{
	uchar m;
	while(t--)
	{
		for (m=0;m<100;m++)
			;
	}
} 

/******************************ds1820程序***************************************/
void delay_18B20(uint i)//延時(shí)1微秒
{
   while(i--)
   	;
}


/********************* 產(chǎn)生復(fù)位脈沖初始化DS18B20 **************************/
void TxReset(void)
{
	DQ = 1;          //DQ復(fù)位
	delay_18B20(4); //延時(shí)
	DQ = 0;          //DQ拉低
	delay_18B20(100); //精確延時(shí)大于480us
	DQ = 1;          //拉高
	delay_18B20(4); 
}

/* ***********************等待應(yīng)答脈沖 *********************/
void RxWait(void)
{
	while(DQ)
		;
	while(~DQ)
		;			// 檢測(cè)到應(yīng)答脈沖 

	delay_18B20(1);
}

/* ****************讀取數(shù)據(jù)的一個(gè)字節(jié) *****************************/
uchar RdByte(void)
{
	unsigned char i=0;
	unsigned char dat = 0;
	for(i = 8; i > 0; i--)
	{   
		DQ = 0; //給脈沖信號(hào)
    	dat >>= 1;
    	DQ = 1; //給脈沖信號(hào)
    	if(DQ)
    		dat |= 0x80;
    	delay_18B20(10);
	}
   return(dat);
}

/* ****************寫(xiě)數(shù)據(jù)的一個(gè)字節(jié)，滿足寫(xiě)1和寫(xiě)0的時(shí)隙要求 *************/
void WrByte(uchar wdata)
{
	unsigned char i=0;
	for(i = 8; i > 0; i--)
	{
   		DQ = 0;
     	DQ = wdata&0x01;
     	delay_18B20(10);
     	DQ = 1;
     	wdata>>=1;
	 	delay_18B20(10);
	}
}

/* **************啟動(dòng)溫度轉(zhuǎn)換 *******************/
void convert(void)
{
	TxReset();			// 產(chǎn)生復(fù)位脈沖，初始化DS18B20
	RxWait();			// 等待DS18B20給出應(yīng)答脈沖
	WrByte(0xcc);		// skip rom 命令
	WrByte(0x44);		// convert T 命令
}

/**************** 讀取溫度值 *********************/
void RdTemp(void)
{
	uchar tpmsb, tplsb;

	convert();
	TxReset();			// 產(chǎn)生復(fù)位脈沖，初始化DS18B20 
	RxWait();			// 等待DS18B20給出應(yīng)答脈沖
	WrByte(0xcc);		// skip rom 命令
	WrByte(0xbe);		// read scratchpad 命令
	tplsb = RdByte();	// 溫度值低位字節(jié)（其中低4位為二進(jìn)制的“小數(shù)”部分）
	tpmsb = RdByte();	// 高位值高位字節(jié)（其中高5位為符號(hào)位）		
	tm = tpmsb;
	tm <<= 8;
	tm = tm | tplsb;
	if(tm & 0x0fff)
		isNeg = 0;
	else
	{
		tm = ~tm + 1;
		isNeg = 1;
	}
}

//*************************8數(shù)據(jù)處理程序************************//
void dataProc(void)
{
    uchar temp1,temp2;
	uint tt;
	uint tmp;

	if(tm < 0) 
		tm = 0 - tm;
	temp2 = tm & 0x0f;
	temp1 = (tm >> 4) & 0xff;
	tmp = temp1 / 10 % 10;
	if(tmp >= 5 && tmp != 16)
		P1 = 0x08;
	else 
		P1 = 0x40;

	if(tmp == 0)
		dis[0] = seg7[16];
	else
		dis[0] = seg7[tmp];
	if(isNeg)
		dis[0] = 0xbf;
	tmp = temp1 % 10;
	dis[1] = dot_seg[tmp];
	tt = tm & 0x0f;
	if(isNeg == 0)
		tt = 625*tt;
	else 
	{
		tt = 0 - tt;
		tt = tt & 0x0f;
		tt = tt * 625;
	}
	tmp = tt / 1000;
	dis[2] = seg7[tmp];
	tmp = tt / 100 % 10;
	dis[3] = seg7[tmp];
}
//**************顯示程序**************** 使用了時(shí)鐘中斷//
void display(void) interrupt 1
{   
	static uchar	i;   
	
	TH0 = 0xD8;
	TL0 = 0xF0;	 
	P2 = c[i];  
	P0 = dis[i];
	i = (i + 1) % 4;
}

void initINT(void)
{
	TMOD = 0x01;
	TH0 = 0xF0;
	TL0 = 0x5F;
	ET0 = 1;
	EX0 = 1;
    TR0 = 1;    
	EA = 1;
}

/* 主程序，讀取的溫度值最終存放在tplsb和tpmsb變量中。
   tplsb其中低4位為二進(jìn)制的“小數(shù)”部分；tpmsb其中高
   5位為符號(hào)位。真正通過(guò)數(shù)碼管輸出時(shí)，需要進(jìn)行到十進(jìn)
   制有符號(hào)實(shí)數(shù)（包括小數(shù)部分）的轉(zhuǎn)換。*/      
void main(void)
{	
	initINT();
	P0=0xff;
	P1 = 0;
  	while(1)
	{	
		RdTemp();		// 讀取溫度
		dataProc();
		delay(250);
	}
}