ds18b20多路温度采集程序

1、本程序为ds18b20的多路温度采集程序,是我自己参考其他程序后改写而成，可显示4路正负温度值，弁有上下限温度报警（声 首、灯光报警）。亲测，更改端口即可使用。（主要器件：51单片机，ds18b20, led显示器）附有proteus仿真图，及序列号采集程序.(1EFEAMEF.Si* 收D21. LJEP &.Ug国 Tjl|j加AM1 Hj用r司lzrowra：E1dFCfl*AWFDJWMR&T皿力AWp2.a醍 P? IMF2 1疝HH73 UA1IALE建 dVAir京P2 5,A13F2 TZR.1CIPWT3：PIJJTZELEHJ&P1X1肛 1Pia标FUCEXJIFS.a*4TJR1CEX1Ml-WTOflR3 flfTIPWCEX3PHJ9ICIK4ATFinrflD-rTEnPERflRTURE：U2-020.2 n0/*上限62度 下限-20度*/#include#define uehar unsigned char#define uint unsigned intsbit ds=P1A1;sbit rs=P1A4;sbit e=P1A6;sbit sp=P1

2、A0;sbit d1=P1A2;sbit d2=P1A3;ucha门Cdrom48=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 table。尸TEMPERARTURE:U;unsigned char code tablel尸0123456789ABCDEF;int f4;int tvalue;float ftvalue;uint warnl=320;uint warnh=992;/*lcd程序*/void delayms(uint ms)延时uint i,j;for(i=ms;i0;i-)for(j=110;j0;j-);void wrcom(uchar com)/ 写指令delayms(1);rs=0;P3=com;delayms(1);e=1;delayms(1);e=0;

3、void wrdat(uchar dat)写数据rs=1;e=0;P3=dat;delayms(5);e=1;delayms(5);e=0;void lcdinit() 初始化 leddelayms(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();wrcom(0x80);display(tableO);/*ds18b20 程序 */void dsrst()/ds18b20 复位uint i;ds=0;i=103;while(i0)i-;ds=1;i=4;while(i0)i-;bit dsrd0()/读一位数据uint i;bit dat;ds=0;i+;ds=1;i+;i+;dat=ds;i=8;while(i0)i-;return(dat);uchar dsrd(

4、)/读1个字节数据uchar i,j,dat;dat=0;for(i=8;i0;i-)j=dsrd0();dat=(j1);return(dat);void dswr(uchar dat)写数据uint i;uchar j;bit testb;for(j=8;j0;j-)testb=dat&OxO1;dat=dat1;if(testb)(ds=O;i+;i+;ds=1;i=8;while(i0)i-;)elseds=O;i=8;while(i0)i-;ds=1;i+;i+;) void tmstart() 初始化 ds18b20sp=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;j4;j+)dsrst();delayms(1);dswr(0x55);for(i=0;i8;i+)dswr(lcdromji); 发送 64 位序列号dswr(Oxbe);a=dsrd();b=dsrd();tvalue=b;tvalu

5、e=8;tvalue=tvalue|a;if(tvaluewarnl)d2=0;sp=0；elsed2=1;sp=1；else d2=1;wrcom(0xc0);wrdat();if(tvaluewarnh)d1=0;sp=0；elsed1=1;sp=1； if(j=0)wrcom(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;ftvalue=ftvalue+0.05;fj=tvalue;温度扩大十倍，精确到一位小数tvalue=fj;t=tvalue/1000;wrcom(0x80+0x41);wrdat(table1t);/ 显示百位t=tvalue%1000/100;wrdat(table1t);/ 显示十位t=tvalue%100/10;wrdat(table1t);/ 显示个位wrdat(0x2e); 显示小数点儿t=tvalue%10/1

6、;wrdat(table1t);/ 显示小数位 delayms(5000);/*主函数*/void main()d1=1;d2=1;sp=1；displaying);/初始化显示while(1)tmstart();/初始化read_dealtemp();/W 取温度/*序列号读取程序*/#include #define uchar unsigned char#define uint unsigned int温度传感sbit DQ = P1八1;器信号线/LCD数据/LCD使能信号端sbit rs = P1八4;命令选择端（H/L）位声明sbit Icden = P1八6;位声明void delay(uint z);延时函数voidDS18B20_Reset(void);/DQ18B20复位，初始化函数bit DS18B20_Readbit(void);读 1 位数据函数uchar DS18B20_ReadByte(void);读 1 个字节数据函数void DS18B20_WriteByte(uchar dat);向 DQ18B20 写一个字节数据函数void LCD_WriteCom

7、(uchar com);/1602 液晶命令写入函数void LCD_WriteData(uchar dat);/1602 液晶LCD_Init();显示18B20序歹I数据写入函数void/LCD初始化函数void Display18B20Rom(char Rom);号函数/*/*/*/void main()uchar a,b,c,d,e,f,g,h;LCD_Init();DS18B20_Reset();delay(1)；DS18B20_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);Display18B20Rom(h);Display18B20Rom(g);Display18B20Rom;Display18B20Rom(e);Display18B20Rom(d);Display18B20Rom(c);Display18B20Rom(b);Display18B20Rom(a);while(1);/*/*延时函数：void*/*delay()函数*/ /*/ void delay(uint z)/ 延时函数uint x,y;for( x = z; x 0; x-)for( y = 110; y 0; y-);*/*DS

《ds18b20多路温度采集程序》由会员hs****ma分享，可在线阅读，更多相关《ds18b20多路温度采集程序》请在金锄头文库上搜索。