/*****************************************/
/* Copyright (c) 2005, 通信工程學院      */
/* All rights reserved.                  */
/* 作    者：戴 佳						 */
/*****************************************/

#include "DigThermo.h"

/* 延時t毫秒 */
void delay(uint t)
{
	uint i;
	while(t--)
	{
		/* 對于11.0592M時鐘，約延時1ms */
		for (i=0;i<125;i++)
		{}
	}
} 

/* 產生復位脈沖初始化DS18B20 */
void TxReset(void)
{
	uint i;
	DQ = 0;

	/* 拉低約900us */
	i = 100;
	while (i>0)	i--;	
	
	DQ = 1;				// 產生上升沿
	i = 4;
	while (i>0)	i--;
}

/* 等待應答脈沖 */
void RxWait(void)
{
	uint i;
	while(DQ);
	while(~DQ);			// 檢測到應答脈沖 
	i = 4;
	while (i>0)	i--;
}

/* 讀取數據的一位，滿足讀時隙要求 */ 
bit RdBit(void)
{
	uint i;
	bit b;
	DQ = 0;
	i++;
	DQ = 1;
	i++;i++;			// 延時15us以上，讀時隙下降沿后15us，DS18B20輸出數據才有效
	b = DQ;
	i = 8;
	while(i>0) i--;
	return (b);
}

/* 讀取數據的一個字節(jié) */
uchar RdByte(void)
{
	uchar i,j,b;
	b = 0;
	for (i=1;i<=8;i++)
	{
		j = RdBit();
		b = (j<<7)|(b>>1);
	}
	return(b);
}

/* 寫數據的一個字節(jié)，滿足寫1和寫0的時隙要求 */
void WrByte(uchar b)
{
	uint i;
	uchar j;
	bit btmp;
	for(j=1;j<=8;j++)
	{
		btmp = b&0x01;
		b = b>>1;		// 取下一位（由低位向高位）
		if (btmp)
		{
			/* 寫1 */
			DQ = 0;
			i++;i++;	// 延時，使得15us以內拉高
			DQ = 1;
			i = 8;
			while(i>0) i--;	// 整個寫1時隙不低于60us 
	   	}
		else
		{
			/* 寫0 */
			DQ = 0;			
			i = 8;
			while(i>0) i--;	// 保持低在60us到120us之間
			DQ = 1;
			i++;
			i++;
		}
	}
}

/* 啟動溫度轉換 */
void convert(void)
{
	TxReset();			// 產生復位脈沖，初始化DS18B20
	RxWait();			// 等待DS18B20給出應答脈沖
	delay(1);			// 延時
	WrByte(0xcc);		// skip rom 命令
	WrByte(0x44);		// convert T 命令
}

/* 讀取溫度值 */
void RdTemp(void)
{
	TxReset();			// 產生復位脈沖，初始化DS18B20 
	RxWait();			// 等待DS18B20給出應答脈沖
	delay(1);			// 延時
	WrByte(0xcc);		// skip rom 命令
	WrByte(0xbe);		// read scratchpad 命令
	tplsb = RdByte();	// 溫度值低位字節(jié)（其中低4位為二進制的“小數”部分）
	tpmsb = RdByte();	// 高位值高位字節(jié)（其中高5位為符號位）		
}

/* 主程序，讀取的溫度值最終存放在tplsb和tpmsb變量中。
   tplsb其中低4位為二進制的“小數”部分；tpmsb其中高
   5位為符號位。真正通過數碼管輸出時，需要進行到十進
   制有符號實數（包括小數部分）的轉換。              */
void main(void)
{
	do
	{	
		delay(1);		// 延時1ms
		convert();		// 啟動溫度轉換，需要750ms
		delay(1000);	// 延時1s
		RdTemp();		// 讀取溫度			
	}
	while(1);
}