【導(dǎo)讀】溫度是一種被廣泛應(yīng)用于生產(chǎn)和生活的重要的物理量。針對與不同的應(yīng)用領(lǐng)域，生產(chǎn)和研制適當(dāng)?shù)臏y溫系統(tǒng)是十分必要的。本文設(shè)計的是近距離溫度檢測系統(tǒng)。統(tǒng)涵蓋了傳感器技術(shù)，信息處理技術(shù)，計算機(jī)通信技術(shù)等幾個方面的技術(shù)。機(jī)進(jìn)行通訊打下了基礎(chǔ)。信號編碼進(jìn)行接受和描述，將其直接顯示在可視的界面當(dāng)中。儲功能，便于對信號進(jìn)行分析和處理。在本設(shè)計中，我們?yōu)榱四軐?shí)現(xiàn)人機(jī)的對話及及。時知道系統(tǒng)的運(yùn)行狀況，我們給本系統(tǒng)增加了報警功能。線形關(guān)系，這說明了系統(tǒng)具有很高的精確度和穩(wěn)定性。到對每個通道的溫度標(biāo)定的目的。關(guān)鍵詞：溫度，編碼，單片機(jī)，實(shí)時曲線，DS18B20，

　　

【正文】 ed int num)// 延時函數(shù){ while( num )。}/**********************************************************/uchar Init_DS18B20(void) // 初始化 ds1820長沙學(xué)院畢業(yè)設(shè)計30{ DQ = 1。 // DQ 復(fù)位 Delay(8)。 // 稍做延時 DQ = 0。 // 單片機(jī)將 DQ 拉低 Delay(90)。 // 精確延時 大于 480us DQ = 1。 // 拉高總線 Delay(8)。 presence = DQ。 // 如果=0 則初始化成功 =1 則初始化失敗 Delay(100)。 DQ = 1。 return(presence)。 // 返回信號， 0=presence,1= no presence}/**********************************************************/uchar ReadOneChar(void) // 讀一個字節(jié){unsigned char i = 0。unsigned char dat = 0。for (i = 8。 i 0。 i) { DQ = 0。 // 給脈沖信號 dat = 1。 DQ = 1。 // 給脈沖信號 if(DQ) dat |= 0x80。 Delay(4)。 } return (dat)。}/**********************************************************/void WriteOneChar(unsigned char dat)// 寫一個字節(jié){ unsigned char i = 0。 for (i = 8。 i 0。 i) {長沙學(xué)院畢業(yè)設(shè)計31 DQ = 0。 DQ = datamp。0x01。 Delay(5)。 DQ = 1。 dat=1。 }}/*********************************************************/void Read_Temperature(void)// 讀取溫度{ Init_DS18B20()。 if(presence==1) { beep()。flash=1。} // DS18B20 不正常，蜂鳴器報警 else { flash=0。 WriteOneChar(0xCC)。 // 跳過讀序號列號的操作 WriteOneChar(0x44)。 // 啟動溫度轉(zhuǎn)換 Init_DS18B20()。 WriteOneChar(0xCC)。 // 跳過讀序號列號的操作 WriteOneChar(0xBE)。 // 讀取溫度寄存器 temp_data[0] = ReadOneChar()。 // 溫度低 8 位 temp_data[1] = ReadOneChar()。 // 溫度高 8 位 }}/*********************************************************/void Disp_Temperature()// 顯示溫度{ unsigned char n=0。 if(temp_data[1]7) //當(dāng)溫度高八位中的高五位全為 O { flag_zf=1。 // 所測溫度為負(fù)時，要進(jìn)行轉(zhuǎn)換 temp_data[1]=!( temp_data[1])； temp_data[0]=!( temp_data[0])。temp_data[0]= temp_data[0]+1。長沙學(xué)院畢業(yè)設(shè)計32if(temp_data[0]=0) { temp_data[1]= temp_data[1]+1。}}Else {flag_zf=0} //判斷測得的溫度數(shù)據(jù)是正還是負(fù)，如果為正，不做任何//理 display[4]=temp_data[0]amp。0x0f。display[0]=ditab[display[4]]。 // 查表得小數(shù)位的值display[4]=((temp_data[0]amp。0xf0)4)|((temp_data[1]amp。0x0f)4)。display[3]=display[4]/100。display[1]=display[4]%100。display[2]=display[1]/10。display[1]=display[1]%10。 if(flag_zf=1) {p0=0xbf。 P2=0x02。 Delay(300)。} //溫度為負(fù)數(shù)時第二個數(shù)碼管顯示負(fù)號 if(!display[3]) // 高位為 0，不顯示 { display[3]=0x0a。 if(!display[2]) // 次高位為 0，不顯示 display[2]=0x0a。 }P0 = 0xc6。 // 顯示 CP2 = 0xfe。 // 位選線為 口，LED 為共陽極顯示，當(dāng)位選線為低電平時選通Delay(300)。P0 = 0x9c。 // 顯示 176。 P2 = 0xfd。 // 選中 口Delay(300)。P0 =LEDData[display[0]] 。 // 顯示小數(shù)位P2 = 0xfb。 //Delay(300)。P0 =LEDData1[display[1]]。 // 顯示個位P2 = 0xf7。Delay(300)。長沙學(xué)院畢業(yè)設(shè)計33P0 =LEDData[display[2]]。 // 顯示十位P2 = 0xef。 Delay(300)。P0 =LEDData[display[3]]。 // 顯示百位P2 = 0xdf。Delay(300)。P2 = 0xff。 // 關(guān)閉顯示}/*********************************************************/void beep(void){ unsigned char i。 for (i=0。i100。i++) { Delay(60)。 BEEP=!BEEP。 // BEEP 取反 } BEEP=1。 // 關(guān)閉蜂鳴器}/*********************************************************/void init(void){EA = 1。 // 中斷總允許 TMOD = 0x20。 // 定時器 1 工作于 8 位自動重載模式 , 用于產(chǎn)生波特率TH1=(unsigned char)(256 (XTAL / (32L * 12L * baudrate)))。TL1=(unsigned char)(256 (XTAL / (32L * 12L * baudrate)))。 // 定時器 0 賦初值SCON = 0x50。 // 設(shè)定串行口工作方式PCON amp。= 0x00。 // 波特率不倍增TR1 = 1。 // 啟動定時器 1IE = 0x00。 // 禁止任何中斷}/*********************************************************/void send_char(void)// 傳送十六位的溫度數(shù)據(jù)，低位在前長沙學(xué)院畢業(yè)設(shè)計34{unsigned i=0。while (i 2){SBUF = temp_data[i]。while (!TI)。 // 等特數(shù)據(jù)傳送TI = 0。 // 清除數(shù)據(jù)傳送標(biāo)志i++。}}/*********************************************************/void main(void){uchar receive。 init()。 while(1) { Read_Temperature()。 // 讀取溫度if (flash==0) {Disp_Temperature()。 // 顯示溫度}else {P2 = 0x00 。 // DS18B20 不正常，關(guān)閉顯示}if (RI) // 是否有數(shù)據(jù)到來{RI = 0。receive = SBUF。if (receive == 49) // 是否開始采集溫度{send_char()。 // 傳送采集的溫度}} }}/*********************************************************/長沙學(xué)院畢業(yè)設(shè)計35附錄 2 上位機(jī)程序39。定義窗體級變量39。在顯示、繪圖、報警等過程中使用Dim datatemp(200) As Single 39。 用于存儲溫度采樣值Dim num As Integer 39。 用于存儲采樣值個數(shù)Dim counter As Integer 39。 采樣個數(shù)計數(shù)器Dim mark As Boolean 39。 暫停標(biāo)志Dim strSql As StringPrivate Sub cmd_Search_Click() strSql = select * from Tbl_wD where 1=1 Set Rs = New = adUseClient strSql, Db, adOpenKeyset, adLockReadOnly If 1 Then MsgBox (數(shù)據(jù)庫中沒有數(shù)據(jù)！) Exit Sub End If Set = Rs End Sub39。39。 溫度采集39。長沙學(xué)院畢業(yè)設(shè)計36Private Sub CmdStart_Click() 39。 開始采集 If (Txttimes 200) Or (Txttimes 1) Then 39。 參數(shù)設(shè)置判斷 MsgBox 參數(shù)錯誤！采集次數(shù)應(yīng)取“0~200”之間的數(shù)。, 49, 溫度采集系統(tǒng) Call setAcquiescence 39。 默認(rèn)設(shè)置 Exit Sub End If If (Txttime 60) Or (Txttime ) Then MsgBox 參數(shù)錯誤！間隔時間應(yīng)取“~60”之間的數(shù)。, 49, 溫度采集系統(tǒng) Call setAcquiescence 39。 默認(rèn)設(shè)置 Exit Sub End If If = True Then = False Call setCom 39。 設(shè)置串口 Call tabinit 39。 初始化表格 If = True Then = 1000 * 39。 設(shè)置間隔采樣時間 = 重新采集 = True = 停止采集 = amp。HFFamp。 mark = True Call renew 39。 重新開始