51单片机　DS18B20（带proteus源码数码管显示）

51单片机　DS18B20(带proteus,源码,数码管显示)

#include  
#include 
#define uchar unsigned char
bit Tflag;//温度正负标志
sbit DQ = P3^7;

unsigned char code dispcode[]={0x3f0x060x5b0x4f 
						0x660x6d0x7d0x07 
						0x7f0x6f0x770x7c 
						0x390x5e0x790x710x000x40}; 	  //0x40  负
unsigned char dispbitcode[]={0xfe0xfd0xfb0xf7 
					0xef0xdf0xbf0x7f}; 
unsigned char dispbuf[8]={00000000}; 

void digitalshow（unsigned char a2unsigned char a1unsigned char a0）
{
	unsigned char i;
	dispbuf[0]=a0; 
	dispbuf[1]=a1;
	dispbuf[2]=a2;
	for（i=0;i<3;i++） 
	{ 
		P2=0xff;      //关闭所有显示	
		P0=dispcode[dispbuf[i]]; 
		P2=dispbitcode[i]; 	
	}   
}
/********** 该程序为总线上只有一个器件 **********/
//毫秒延时 11.0592 Mhz
void dmsec （unsigned int count） 
{     
	unsigned int i;			// 1ms延时
	whil

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      94388  2008-06-07 21:39  DS18B20 数字温度计使用-数码管\DS18B20.DSN

     文件       1028  2008-10-16 10:41  DS18B20 数字温度计使用-数码管\DS18B20.PWI

     文件       3344  2008-06-07 21:02  DS18B20 数字温度计使用-数码管\Keil\ds18b20.c

     文件       8549  2008-06-07 21:38  DS18B20 数字温度计使用-数码管\Keil\ds18b20.LST

     文件      10328  2008-06-07 21:38  DS18B20 数字温度计使用-数码管\Keil\ds18b20.OBJ

     文件         37  2008-06-07 21:38  DS18B20 数字温度计使用-数码管\Keil\ds18b20.__i

     文件       9471  2008-06-07 21:39  DS18B20 数字温度计使用-数码管\Keil\proj

     文件       1848  2008-06-07 21:39  DS18B20 数字温度计使用-数码管\Keil\proj.hex

     文件         44  2008-06-07 21:39  DS18B20 数字温度计使用-数码管\Keil\proj.lnp

     文件      13795  2008-06-07 21:39  DS18B20 数字温度计使用-数码管\Keil\proj.M51

     文件       1035  2008-06-07 21:39  DS18B20 数字温度计使用-数码管\Keil\proj.Opt

     文件        395  2008-06-07 21:39  DS18B20 数字温度计使用-数码管\Keil\proj.plg

     文件       2191  2008-06-07 21:39  DS18B20 数字温度计使用-数码管\Keil\proj.Uv2

    .......         0  2008-06-07 21:38  DS18B20 数字温度计使用-数码管\Keil\proj_Uv2.Bak

     文件       6376  2005-03-22 15:22  DS18B20 数字温度计使用-数码管\Keil\STARTUP.A51

     文件      14049  2008-06-06 12:45  DS18B20 数字温度计使用-数码管\Keil\STARTUP.LST

     文件        749  2008-06-06 12:45  DS18B20 数字温度计使用-数码管\Keil\STARTUP.OBJ

     目录          0  2008-06-07 21:39  DS18B20 数字温度计使用-数码管\Keil

     目录          0  2008-06-07 21:42  DS18B20 数字温度计使用-数码管

----------- ---------  ---------- -----  ----

               167627                    19