ds18b20.c

通过DS18B20读取温度（范围-55C~125C

/*作者：史叔伍
完成日期：2008-10-16
程序实现功能：通过DS18B20读取温度（范围-55C~125C，精确到小数点后一位），通过4位数码管显示出来。
当温度为正且百位为零时，不显示，当温度为负时百位显负号。当温度百位和十位都为0时0都不显示。
*/
#include<reg52.h>
#define uchar unsigned char
#define uint unsigned int
sbit DQ=P3^5; //数据口
uchar disdata[4];
uint tvalue;  //温度值
uchar tflag;  //温度正负标志
uchar code table[]=
{0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f, //0,1,2,3,4,5,6,7,8,9,
0xbf,0x86,0xdb,0xcf,0xe6,0xed,0xfd,0x87,0xff,0xef //0.,1.,2.,3.,4.,5.,6.,7.,8.,9.,
};

/* 延时t毫秒 */
void delay(uint t)
{
	uint i;
	while(t--)
	{
		/* 对于11.0592M时钟，约延时1ms */
		for (i=0;i<125;i++)
		{}
	}
} 

void display(uchar *disdata)
{	
	if(disdata[0]==0)	//如果百位为0，不显示
     { 
	    if(tflag==1)	 //如果是负温度值，百位显负号  
		{
	        P1=0xf7;
	        P0=0x40;
		    delay(5);
		}
	    else 	        //温度为正，百位不显
		{
		    P1=0xf7;
	        P0=0x00;
		    delay(5);
		}
	 }
	 else
	 {
	 	P1=0xf7;
	    P0=table[disdata[0]];
	    delay(5);
	 }
	 if(disdata[1]==0)	  //如果百位为0，十位为0也不显示
     {
		P1=0xfb;
		P0=0x00;
		delay(5);
	 } 
	 else
	 {
    	P1=0xfb;
    	P0=table[disdata[1]];
	    delay(5);
	 }
	 P1=0xfd;
	 P0=table[disdata[2]+10];
	 delay(5);
	 P1=0xfe;
	 P0=table[disdata[3]];
	 delay(5);
	
}

/* 产生复位脉冲初始化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/*&DQ==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);
}

/* 读取数据的一个字节 */
uchar RdByte(void)
{
	uchar i,j,b;
	b = 0;
	for (i=1;i<=8;i++)
	{
		j = RdBit();
		b = (j<<7)|(b>>1);	//从低位移向高位，一共16位，2个字节
	}
	return(b);
}

/* 写数据的一个字节，满足写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 命令
}

/* 读取温度值并转化 */
uchar RdTemp(void)
{
    uchar tplsb,tpmsb; //温度值低位,高位字节
	TxReset();			// 产生复位脉冲，初始化DS18B20 
	RxWait();			// 等待DS18B20给出应答脉冲
	delay(1);			// 延时
	WrByte(0xcc);		// skip rom 命令
	WrByte(0xbe);		// read scratchpad 命令
	tplsb = RdByte();	// 温度值低8位字节（其中低4位为二进制的“小数”部分）
	tpmsb = RdByte();	// 高位值高8位字节（其中高5位为符号位）
	tvalue=tpmsb;
	tvalue<<=8;
	tvalue=tvalue|tplsb;
	if(tvalue<0x07ff)
	   tflag=0;		  //正温度
    else
	{
	    tvalue=~tvalue+1;
		tflag=1;	  //负温度		
	}
	tvalue=tvalue*(0.625);	//温度值扩大10倍，精确到1位小数
	return(tvalue);		
}

/* 读取温度	*/
void Pro()
{
	 disdata[0]=tvalue/1000;
	 disdata[1]=tvalue%1000/100;
	 disdata[2]=tvalue%100/10;
	 disdata[3]=tvalue%10;
}

/* 主程序，读取的温度值最终存放在tplsb和tpmsb变量中。
   tplsb其中低4位为二进制的“小数”部分；tpmsb其中高
   5位为符号位。真正通过数码管输出时，需要进行到十进
   制有符号实数（包括小数部分）的转换。              */
void main(void)
{
	do
	{
		uchar i;
		delay(1);	 // 延时1ms
		convert();	 // 启动温度转换，需要750ms
		for(i=0;i<50;i++)	  //循环显示防止数码管显示抖动
		   display(disdata);
		RdTemp();	//读取温度值并转化
		Pro();		// 读取温度	
		//display(disdata);						
	}
	while(1);
}