基于51單片機(jī)的溫度檢測(cè)系統(tǒng)程序及仿真

1、/*/*用DS18B20進(jìn)行測(cè)量,lcd1602顯示*/*#include "reg51.h"#include "intrins.h"#define uchar unsigned char#define uint unsigned intuchar code table1 ="ID: " /歡迎顯示，包括空格在內(nèi)<=16uchar code table2 ="Name: "/歡迎顯示，包括空格在內(nèi)<=16uchar code str1 =" Temperature " uchar c

2、ode str2 =" "/*管腳定義*sbit lcd_rs = P30; /液晶數(shù)據(jù)命令選擇端sbit lcd_en = P31; /液晶使能sbit DQ = P36; /液晶使能/*參數(shù)定義*uint tvalue;/溫度值uchar tflag;/溫度正負(fù)標(biāo)志uchar data disdata5;/*子函數(shù)定義*void delay(uchar z); /delay延時(shí)子程序void init_lcd(); /LCD1602初始化函數(shù)void write_com(uchar com); /LCD1602寫指令函數(shù)void write_data(uchar dat

3、e); /LCD1602寫數(shù)據(jù)函數(shù)void lcd1602_display(uchar *q,uchar *p);/LCD1602顯示函數(shù)void welcome(); /LCD1602顯示歡迎函數(shù)void delay_DS18B20(uint i); /delay_DS18B20函數(shù)void Init_DS18B20_display(); /DS18B20初始化顯示void Init_DS18B20(); /DS18B20初始化uchar ReadOneByte(); /DS18B20讀一字節(jié)void WriteOneByte(uchar dat); /DS18B20寫一字節(jié)Read_Tem

4、perature(); /DS18B20讀取溫度值并轉(zhuǎn)換void DS18B20_display(); /DS18B20溫度顯示/*主函數(shù)*void main()welcome();delay(2000);Init_DS18B20_display();while(1)Read_Temperature();DS18B20_display(); /*delay延時(shí)子程序*void delay(uchar z)uchar x,y;for(x=0;x<z;x+)for(y=0;y<114;y+);/*LCD1602初始化函數(shù)*void init_lcd()write_com(0x38);

5、/設(shè)置16*2顯示，5*7點(diǎn)陣，8位數(shù)據(jù)接口write_com(0x08); /寫一個(gè)字符后地址指針加1 write_com(0x01); /顯示清零，數(shù)據(jù)指針清零write_com(0x06); /寫一個(gè)字符后地址指針加1write_com(0x0c); /關(guān)顯示，光標(biāo)不顯示不閃爍/*LCD1602寫指令函數(shù)*void write_com(uchar com)delay(5);lcd_rs = 0; / 選擇寫指令lcd_en = 0; / 將使能端置0P2 = com; / 將要寫的命令送到數(shù)據(jù)總線上delay(5); / 延時(shí)5ms，待數(shù)據(jù)穩(wěn)定lcd_en = 1; / 由于初始化已將l

6、cd_en置為0，使能端給一個(gè)高脈沖，delay(5); / 延時(shí)5ms，待數(shù)據(jù)穩(wěn)定lcd_en = 0; / 將使能端置0以完成脈沖/*LCD1602寫數(shù)據(jù)函數(shù)*void write_data(uchar date)delay(5);lcd_rs = 1; / 選擇寫數(shù)據(jù)lcd_en = 0; / 將使能端置0P2 = date; / 將要寫的數(shù)據(jù)送到數(shù)據(jù)總線上delay(5); / 延時(shí)5ms，待數(shù)據(jù)穩(wěn)定lcd_en = 1; / 由于初始化已將lcd_en置為0，使能端給一個(gè)高脈沖，delay(5); / 延時(shí)5ms，待數(shù)據(jù)穩(wěn)定lcd_en = 0; / 將使能端置0以完成脈沖/*LCD

7、1602顯示函數(shù)*void lcd1602_display(uchar *q,uchar *p)write_com(0x80); / 現(xiàn)將數(shù)據(jù)指針定位到第一行第一個(gè)字處while(*q!='0')write_data(*q);q+;delay(1);write_com(0xc0); / 現(xiàn)將數(shù)據(jù)指針定位到第二行第一個(gè)字處while(*p!='0')write_data(*p);p+;delay(1);/*LCD1602顯示歡迎函數(shù)*void welcome()init_lcd();lcd1602_display(table1,table2);delay(5000

8、); /*DS18B20初始化顯示*void Init_DS18B20_display()init_lcd();lcd1602_display(str1,str2); /*LCD1602顯示函數(shù)*void delay_DS18B20(uint i)while(i-);/*DS18B20初始化*void Init_DS18B20()DQ = 1; /DQ復(fù)位delay_DS18B20(4); /延時(shí)DQ = 0; /DQ拉低delay_DS18B20(100); /精確延時(shí)大于480usDQ = 1; /拉高delay_DS18B20(40);/*DS18B20讀一字節(jié)*uchar ReadOn

9、eByte()uchar i,dat = 0;for(i=8;i>0;i-)DQ = 0;/給脈沖信號(hào)dat>>=1;DQ = 1; /給脈沖信號(hào)if(DQ) dat|=0x80;delay_DS18B20(10);return (dat);/*DS18B20寫一字節(jié)*void WriteOneByte(uchar dat)uchar i;for(i=8;i>0;i-)DQ = 0;DQ = dat&0x01;delay_DS18B20(10);DQ = 1;dat>>=1;/*DS18B20讀取溫度值并轉(zhuǎn)換*Read_Temperature() u

10、char a,b; Init_DS18B20(); WriteOneByte(0xcc); /跳過讀序列號(hào) WriteOneByte(0x44); /啟動(dòng)溫度轉(zhuǎn)換 Init_DS18B20(); WriteOneByte(0xcc); /跳過讀序列號(hào) WriteOneByte(0xbe); /讀取溫度 a = ReadOneByte(); b = ReadOneByte(); tvalue=b; tvalue<<=8; tvalue=tvalue|a; if(tvalue<0xfff)tflag = 0;elsetvalue = tvalue+1;tflag = 1;tval

11、ue = tvalue*(0.625); /溫度值擴(kuò)大10倍，精確到1位小數(shù)return (tvalue);/*DS18B20溫度顯示*void DS18B20_display()uchar flagdat;disdata0=tvalue/1000+0x30; /百位數(shù)disdata1=tvalue%1000/100+0x30;/十位數(shù)disdata2=tvalue%100/10+0x30; /個(gè)位數(shù)disdata3=tvalue%10+0x30; /小數(shù)位if(tflag = 0)flagdat = 0x20; /正溫度不顯示符號(hào)elseflagdat = 0x2d; /負(fù)溫度顯示負(fù)號(hào)if(disdata0 = 0x30)disdata0 =0x20;/如果百位為0，不顯示if(disdata1 = 0x30)disdata1 =0x20;/如果百位為0，十位為0也不顯示write_com(0xc4);write_data(flagdat); /顯示符號(hào)位write_com(0xc5);write_data(d