ds18b20多路溫度采集程序精編版

1、本程序為 ds18b20 的多路溫度采集程序， 是我自己參考其他程序后改寫而成，可顯示 4 路正負溫度值，并有上下限溫度報警（聲音、燈光報警）。親測，更改端口即可使用。（主要器件： 51 單片機， ds18b20，lcd顯示器）附有 proteus 仿真圖，及序列號采集程序/* 上限 62 度 下限 -20 度 */#include<reg51.h>#define uchar unsigned char#define uint unsigned intsbit ds=P11;sbit rs=P14;sbit e=P16;1sbit sp=P10;sbit d1=P12;sbit d

2、2=P13;uchar lcdrom48=0x28,0x30,0xc5,0xb8,0x00,0x00,0x00,0x8e,0x28,0x31,0xc5,0xb8,0x00,0x00,0x00,0xb9,0x28,0x32,0xc5,0xb8,0x00,0x00,0x00,0xe0,0x28,0x33,0xc5,0xb8,0x00,0x00,0x00,0xd7;unsigned char code table0="TEMPERARTURE:U"unsigned char code table1="0123456789ABCDEF"int f4;int tv

3、alue;float ftvalue;uint warnl=320;uint warnh=992;/*lcd程序 */void delayms(uint ms)/ 延時2uint i,j;for(i=ms;i>0;i-)for(j=110;j>0;j-);void wrcom(uchar com)/ 寫指令delayms(1);rs=0;P3=com;delayms(1);e=1;delayms(1);e=0;void wrdat(uchar dat)/ 寫數(shù)據(jù)rs=1;e=0;P3=dat;delayms(5);e=1;delayms(5);3e=0;void lcdinit()

4、/ 初始化 lcddelayms(15);wrcom(0x38);delayms(5);wrcom(0x0c);delayms(5);wrcom(0x06);delayms(5);wrcom(0x01);delayms(5);void display(uchar *p)/ 顯示while(*p!='0')wrdat(*p);p+;delayms(1);displayinit()/ 初始化顯示lcdinit();4wrcom(0x80);display(table0);/*ds18b20程序 */void dsrst()/ds18b20 復位uint i;ds=0;i=103;w

5、hile(i>0)i-;ds=1;i=4;while(i>0)i-;bit dsrd0()/ 讀一位數(shù)據(jù)uint i;bit dat;ds=0;i+;ds=1;i+;i+;5dat=ds;i=8;while(i>0)i-;return(dat);uchar dsrd()/讀 1 個字節(jié)數(shù)據(jù)uchar i,j,dat;dat=0;for(i=8;i>0;i-)j=dsrd0();dat=(j<<7)|(dat>>1);return(dat);void dswr(uchar dat)/ 寫數(shù)據(jù)uint i;uchar j;bit testb;for(

6、j=8;j>0;j-)6testb=dat&0x01;dat=dat>>1;if(testb)ds=0;i+;i+;ds=1;i=8;while(i>0)i-;elseds=0;i=8;while(i>0)i-;ds=1;i+;i+;void tmstart()/ 初始化 ds18b207sp=1;d1=1;d2=1;dsrst();delayms(1);dswr(0xcc);dswr(0x44);void read_dealtemp()/讀取并處理溫度uchar i,j,t;uchar a,b;for(j=0;j<4;j+)dsrst();dela

7、yms(1);dswr(0x55);for(i=0;i<8;i+)dswr(lcdromji);/發(fā)送 64 位序列號dswr(0xbe);8a=dsrd();b=dsrd();tvalue=b;tvalue<<=8;tvalue=tvalue|a;if(tvalue<0)d1=1;tvalue=tvalue+1;wrcom(0xc0);wrdat(0x2d);if(tvalue>warnl)d2=0;sp=0;elsed2=1;sp=1;9elsed2=1;wrcom(0xc0);wrdat(' ');if(tvalue>warnh)d1=

8、0;sp=0;elsed1=1;sp=1;if(j=0)10wrcom(0x8e);wrdat('2');if(j=1)wrcom(0x8e);wrdat('3');if(j=2)wrcom(0x8e);wrdat('4');if(j=3)wrcom(0x8e);wrdat('5');ftvalue=tvalue*0.0625;tvalue=ftvalue*10+0.5;11ftvalue=ftvalue+0.05;fj=tvalue;/ 溫度擴大十倍，精確到一位小數(shù)tvalue=fj;t=tvalue/1000;wrcom(0x

9、80+0x41);wrdat(table1t);/ 顯示百位t=tvalue%1000/100;wrdat(table1t);/ 顯示十位t=tvalue%100/10;wrdat(table1t);/ 顯示個位wrdat(0x2e); / 顯示小數(shù)點兒t=tvalue%10/1;wrdat(table1t);/ 顯示小數(shù)位delayms(5000);/* 主函數(shù) */12void main()d1=1;d2=1;sp=1;displayinit();/ 初始化顯示while(1)tmstart();/ 初始化read_dealtemp();/讀取溫度/* 序列號讀取程序 */#include

10、 <reg52.h>#define uchar unsigned char#define uint unsigned intsbit DQ = P11;/ 溫度傳感器信號線13sbit rs = P14;/LCD 數(shù)據(jù) /命令選擇端 (H/L) 位聲明sbit lcden = P16;/LCD 使能信號端位聲明voiddelay(uint z);/ 延時函數(shù)voidDS18B20_Reset(void);/DQ18B20 復位，初始化函數(shù)bitDS18B20_Readbit(void);/讀 1 位數(shù)據(jù)函數(shù)uchar DS18B20_ReadByte(void);/讀 1 個字節(jié)數(shù)

11、據(jù)函數(shù)voidDS18B20_WriteByte(uchar dat);/向 DQ18B20 寫一個字節(jié)數(shù)據(jù)函數(shù)voidLCD_WriteCom(ucharcom);/1602 液晶命令寫入函數(shù)voidLCD_WriteData(uchar dat);/1602 液晶數(shù)據(jù)寫入函數(shù)voidLCD_Init();/LCD 初始化函數(shù)voidDisplay18B20Rom(char Rom);/顯示 18B20 序列14號函數(shù)/*/*主函數(shù)*/*/void main()uchar a,b,c,d,e,f,g,h;LCD_Init();DS18B20_Reset();delay(1);DS18B20_

12、WriteByte(0x33);delay(1);a = DS18B20_ReadByte();b = DS18B20_ReadByte();c = DS18B20_ReadByte();d = DS18B20_ReadByte();e = DS18B20_ReadByte();f = DS18B20_ReadByte();g = DS18B20_ReadByte();h = DS18B20_ReadByte();LCD_WriteCom(0x80+0x40);15Display18B20Rom(h);Display18B20Rom(g);Display18B20Rom(f);Display1

13、8B20Rom(e);Display18B20Rom(d);Display18B20Rom(c);Display18B20Rom(b);Display18B20Rom(a);while(1);/*/*延時函數(shù):voiddelay()*/*功能：延時函數(shù)*/*/void delay(uint z)/ 延時函數(shù)uint x,y;for( x = z; x > 0; x- )for( y = 110; y > 0; y- );16/*/*DS18B20函 數(shù) :voidDS18B20_Reset()*/*功能：復位18B20*/*/void DS18B20_Reset(void)/DQ1

14、8B20 復位，初始化函數(shù)uint i;DQ=0;i = 103;while( i > 0 ) i-;DQ=1;i = 4;while( i > 0 ) i-;/*/*DS18B20函 數(shù) :voidDS18B20_Readbit()*/*功能：讀1個字節(jié)數(shù)據(jù)函數(shù)*/*/17bit DS18B20_Readbit(void)/讀 1 位數(shù)據(jù)函數(shù)uint i;bit dat;DQ=0;i+;/i+ 起延時作用DQ=1;i+;i+;dat = DQ;i = 8;while( i > 0 )i-;return( dat );/*/*DS18B20函 數(shù) :voidDS18B20_R

15、eadByte()*/*功能：讀1個字節(jié)數(shù)據(jù)函數(shù)*/*/uchar DS18B20_ReadByte(void)/讀 1 個字節(jié)數(shù)據(jù)函數(shù)18uchar i,j,dat;dat = 0;for( i = 1; i <= 8; i+ )j = DS18B20_Readbit();dat = ( j << 7 ) | ( dat >> 1 );return(dat);/*/*DS18B20函 數(shù) :voidDS18B20_WriteByte()*/*功能：向DQ18B20寫一個字節(jié)數(shù)據(jù)函數(shù)*/*/void DS18B20_WriteByte(uchar dat)/向 D

16、Q18B20 寫一個字節(jié)數(shù)據(jù)函數(shù)uint i;uchar j;bit testb;19for( j=1; j<=8; j+)testb = dat&0x01;dat= dat>>1;if(testb)/寫 1DQ=0;i+;i+;DQ=1;i = 8;while(i>0)i-;elseDQ=0;/寫0i = 8;while(i>0)i-;DQ=1;i+;i+;/*/*LCD函數(shù):voidLCD_WriteCom()20*/*功能：向LCD寫入命令*/*/void LCD_WriteCom(uchar com)rs = 0;P3= com;delay(5);

17、lcden = 0;delay(5);lcden = 1;delay(5);lcden = 0;/*/*LCD函數(shù):voidLCD_WriteData(uchardat)*/*功能：向LCD寫入數(shù)據(jù)*/*/void LCD_WriteData(uchar dat)21rs = 1;/選擇 LCD 為寫入數(shù)據(jù)狀態(tài)lcden = 0;P3= dat;/ 將待寫入數(shù)據(jù)放到總線上delay(5);lcden = 1;/ 給LCD 使能端一個脈沖delay(5);/信號將之前放到總線上lcden = 0;/的數(shù)據(jù)寫入 LCDdelay(5);/*/*LCD函數(shù):voidLCD_Init()*/*功能：初

18、始化LCD，設(shè)定LCD的初始狀態(tài)*/*/void LCD_Init()22LCD_WriteCom(0x38);/LCD顯示模式設(shè)定delay(15);LCD_WriteCom(0x08);/關(guān)閉 LCD 顯示delay(3);LCD_WriteCom(0x01);/LCD顯示清屏delay(3);LCD_WriteCom(0x06);/ 設(shè)定光標地址指針為自動加1delay(3);LCD_WriteCom(0x0c);/打開 LCD 顯示，但不顯示光標/*/*/*顯示18B20序列號*/*23*/*/void Display18B20Rom(char Rom)uchar h,l;l = Rom & 0x0f;/