DS18B20多點溫度檢測系統

本文為DS18B20多點溫度檢測系統設計程序

#include

#include //_nop_();延時函數用

#define uchar unsigned char

#define uint unsigned int

//********************** DS18B20 指令********************* *********

#define ds18B20_READ_ROM 0x33 // 讀ROM指令

#define ds18B20_MATCH_ROM 0x55 // 匹配ROM指令

#define ds18B20_SKIP_ROM 0xCC // 跳過ROM指令

#define ds18B20_SEARCH_ROM 0xF0 // 搜索ROM指令

#define ds18B20_ALARM_SEARCH 0xEC // 報警搜索指令

#define ds18B20_WRITE_SCRATCHPAD 0x4E // 寫暫存寄存器指令

#define ds18B20_READ_SCRATCHPAD 0xBE // 讀暫存寄存器指令

#define ds18B20_COPY_SCRATCHPAD 0x48 // 復制暫存寄存器指令

#define ds18B20_CONVERT_T 0x44 // 啟動溫度轉換指令

#define ds18B20_RECALL_E2 0xB8 // 重新調出E2PROM的數據

sbit DQ=P0^7; //將P0.7口模擬時鐘數據口

bit flag=0;

/******************************

溫 度小數部分用查表法

*******************************/

uchar code ditab[16]=

{0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x04,0x05,0x06,0x06,0x07,0x08,0x08,0x09,0x09};

/**************************

延 時函數

***************************/

void delay_us(unsigned int us)

{

unsigned int i;

us=us/7; //1/7是STC89C58在22.1184MHz晶振

for( i=0;i }

void delay_ms(unsigned int ms)

{

unsigned int i,j;

for( i=0;i for(j=0;j332;j++); //332是STC89C58在22.1184MHz晶振

}

/***********讀出溫度函數************

輸 入：無

輸出：zs+xs，格式為123.4

即為浮點型數的溫度格式

***********************************/

/***********18B20 復位函數**********/

void Init18b20 (void)

{

DQ=1;;_nop_();_nop_();

DQ=0; delay_us(600); //要大于480us，小于960us

DQ=1;delay_us(60); //要大于15us-- 60us

if(DQ==0)

flag = 1; //detect 1820 success!

else

flag = 0; //detect 1820 fail!

delay_us(200); //要大于60us，小于 240us

DQ = 1;

}

/**********18B20寫命令函數*********

向 1-WIRE 總線上寫一個字節

**********************************/

void write_byte(uchar val)

{

uchar i;

for (i=8; i>0; i--)

{

DQ=1;_nop_();_nop_();

DQ = 0;_nop_();_nop_();_nop_();_nop_();_nop_();//5us

DQ = val0x01; //最低位移出

delay_us(60); //66us

val=val>>1; //右移一位

}

DQ = 1;

delay_us(10);

}

/*********18B20讀1個字節 函數********

從總線上讀取一個字節

***********************************/

uchar read_byte(void)

{

uchar i;

uchar value = 0;

for (i=8;i>0;i--)

{

DQ=1;_nop_();_nop_();

value>>=1;

DQ = 0;_nop_();_nop_();_nop_();_nop_(); //4us

DQ = 1;_nop_();_nop_();_nop_();_nop_(); //4us

if(DQ)value|=0x80;

delay_us(60); //60us

}

DQ=1;

delay_us(10);

return(value);

}

/***************************

串 口中斷服務子程序

****************************/

static void com_int(void) interrupt 4

{

if (RI)

{

RI = 0;

if (SBUF == 0x0d)

{

ISP_CONTR = 0x60; // 軟復位到ISP區

}

}

}

/**************************

串口發送一個字符

**************************/

void com_send_dat( unsigned char dat)

{

SBUF=dat;

while (TI== 0);

TI= 0 ;

}

/**************************

串口初始化

**************************/

void init_com( void )

{

SCON=0x50 ; //SCON: serail mode 1, 8-bit UART, enable ucvr //UART為模式1，8位數據，允許接收

TMOD|=0x20 ; //TMOD: timer 1, mode 2, 8-bit reload //定時器1為模式2,8位自動重裝

TH1=0xfa ; //Baud:19200 fosc=22.1184MHz

TL1=0xfa;

PCON|=0x80; //SMOD=1;波特率加倍;

ES=1; //Enable Serial Interrupt

TR1 = 1 ; // timer 1 run

}

/**************************

搜索DS18B2064位ROM

**************************/

uchar search_rom(uchar *p)

{

uchar dat,i,j,k,n,value,number=1,number_temp=1,clash_number=0;

bit clash_flag=0;

for(n=0;n {

flag=0;

while(!flag)Init18b20(); // 復位ds18b20

write_byte(ds18B20_SEARCH_ROM); //搜索ROM命令

for(i=0; i8;i++) //8個字節第ROM

{

dat=0;

for(j=0;j8; j++) //8位數據

{

value=0;

for(k=0;k2;k++) //一位數據 位，一位補碼位

{

DQ=1;_nop_();_nop_();

value=1;

DQ = 0;_nop_();_nop_();_nop_();_nop_(); //4us

DQ = 1;_nop_();_nop_();_nop_();_nop_(); //4us

if(DQ)value|=0x01;

delay_us(60); //60us

}

switch(value) //根據回復第兩位數據來發出相應操作

{

case 0x00: //總線沖突

if(n==0)

{

number++;

number_temp=number;

dat=dat>>1;

DQ = 1;_nop_();_nop_();

DQ = 0;_nop_();_nop_();_nop_();_nop_();_nop_();//5us

DQ = 0; //最低位移出

delay_us(60); //60us

}

else // 第二次以上循環時

{

clash_number++;

if(clash_number>=(number_temp-1))

{

if(!clash_flag)

{

clash_flag=1;

dat=dat>>1;

dat=dat|0x80;

DQ = 1;_nop_();_nop_();

DQ = 0;_nop_();_nop_();_nop_();_nop_();_nop_();//5us

DQ = 1; //最低位移出

delay_us(60); //60us

}

else

{

clash_flag=0;

number_temp--;

dat=dat>>1;

DQ = 1;_nop_();_nop_();

DQ = 0;_nop_();_nop_();_nop_();_nop_();_nop_();//5us

DQ = 0; //最低位移出

delay_us(60); //60us

}

}

}

break;

case 0x01:

dat=dat>>1;

DQ = 1;_nop_();_nop_();

DQ = 0;_nop_();_nop_();_nop_();_nop_();_nop_();//5us

DQ = 0; //最低位移出

delay_us(60); //66us

break;

case 0x02:

dat=dat>>1;

dat=dat|0x80;

DQ = 1;_nop_();_nop_();

DQ = 0;_nop_();_nop_();_nop_();_nop_();_nop_();//5us

DQ = 1; //最低位移出

delay_us(60); //66us

break;

case 0x03:i=8;j=8;break;

default:break;

}

}

*p++=dat;

}

}

return number;

}

/****************************

多個DS18B20測試主函數

****************************/

void main()

{

uchar i,j,dat,amount;

uchar ROM_data[16]; // 讀出ROM暫存

uchar temp_data[2]; //讀出溫度暫存

uchar temperature[7]={0,0,0,'.',0,'?,'?}; //要發送的數據緩存

init_com();

EA=0;

while(1)

{

amount=search_rom(ROM_data);

flag=0;

while(!flag)Init18b20();

write_byte(ds18B20_SKIP_ROM); // 跳過ROM命令

write_byte(ds18B20_CONVERT_T); // 發轉換命令

EA=1;

delay_ms(1000);

EA=0;

for(j=0;j {

flag=0;

while(!flag)Init18b20();

write_byte(ds18B20_MATCH_ROM); // 符合ROM命令

for(i=j*8;i(j+1)*8;i++)

{

write_byte(ROM_da

ta[i]);

}

write_byte(ds18B20_READ_SCRATCHPAD);//發讀命令

temp_data[0]=read_byte(); //溫度低8位

temp_data[1]=read_byte(); //溫度高8位

temperature[4]=ditab[temp_data[0]0x0f]+0x30; // 小數位

dat=((temp_data[0]0xf0)>>4)|((temp_data[1]0x0f)4); // 整數位

for(i=0;i3;i++)

{

temperature[2-i]=dat%10+0x30;

dat=dat/10;

}

for(i=0; i7;i++) //串口發送溫度數據

{

com_send_dat(temperature[i]);

}

}

}