【正文】 若否，則以藍(lán)色繪線 39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。激活錯(cuò)誤檢測(cè)機(jī)制 On Error GoTo Err = 9600,n,8,1 39。39。39。39。單擊【打開通信端口】按鈕后激活此事件39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。 for (i = 0 。 nrf905_Delay(1)。i3。 // Init AM for input CD=1。=~BYTE_BIT0。sbit CSN=P1^4。/* 從機(jī)NRF接口定義*//*//NRF905工作模式控制端口sbit TXEN=P3^1。 TxRxBuf[1]=d2=(temp/10)%10。 break。} case 1:{SetTxMode()。 if(esw3){msta=2。 //數(shù)據(jù)收發(fā)測(cè)試模塊void Temperature_work()。 d1=TxRxBuf[2]。 } if(esw0){wsta=0。 d1=TxRxBuf[0]%100/10。} break。 while(1) { while(!TF0)。5 結(jié)論本系統(tǒng)的重要作用在于數(shù)據(jù)的無線傳輸和實(shí)時(shí)監(jiān)控。程序員可以輕松的使用VB提供的組件快速建立一個(gè)應(yīng)用程序[6]。DS18B20的一線工作協(xié)議流程是：初始化→ROM操作指令→存儲(chǔ)器操作指令→數(shù)據(jù)傳輸。 方案二：采用RS485標(biāo)準(zhǔn)。圖11 系統(tǒng)設(shè)計(jì)總體結(jié)構(gòu)框圖 方案設(shè)計(jì)與論證 溫度傳感器方案論證方案一：采用數(shù)字溫度傳感器DS18B20。 目錄中英文摘要 I引言 11 系統(tǒng)設(shè)計(jì) 1 設(shè)計(jì)指標(biāo) 1 設(shè)計(jì)任務(wù) 1 設(shè)計(jì)思路 1 方案設(shè)計(jì)與論證 2 溫度傳感器方案論證 2 顯示模塊方案論證 2 通信標(biāo)準(zhǔn)及收發(fā)器方案論證 22 單元電路設(shè)計(jì) 3 電源模塊 3 電源模塊原理圖 3 工作原理 3 溫度采集原理圖 3 溫度采集工作原理 3 無線通信模塊 4 無線通信模塊原理圖 4 無線通信模塊工作原理 4 單片機(jī)與ＰＣ機(jī)通信模塊 5 5 5 VB上位機(jī) 53 主模塊程序流程圖 6 主程序流程圖 6 6 7 無線收發(fā)模塊流程圖 8 8 9 溫度采集流程圖 10 DS18B20讀操作程序流程圖 10 DS18B20寫操作程序流程圖 114 系統(tǒng)測(cè)試 12 系統(tǒng)性能 12 測(cè)試結(jié)果 135 結(jié)論 136 改進(jìn)意見 137 參考文獻(xiàn) 13致謝 14附錄 i引言溫度是一個(gè)重要的物理量，在工、農(nóng)業(yè)生產(chǎn)和日常生活中，各個(gè)環(huán)節(jié)都與溫度緊密相聯(lián)，溫度的測(cè)量及控制占據(jù)著極其重要的地位。在一些大型倉庫中，如大型糧庫、油庫，都需要進(jìn)行實(shí)時(shí)多溫度點(diǎn)的檢測(cè)及預(yù)警，以消除安全隱患[1]。DS18B20是一線式數(shù)字溫度傳感器，具有3引腳TO－92小體積封裝形式；溫度測(cè)量范圍為－55℃～＋125℃,可編程為9位～12位A/D轉(zhuǎn)換精度[2]，℃.DS18B20可以直接讀出被測(cè)的溫度值，而且采用3線制與單片機(jī)相連，減少了外部的硬件電路，每個(gè)DS18B20具有唯一的64位長序列號(hào)，存放于DS18B20內(nèi)部ROM只讀存儲(chǔ)器中。RS485接口的最大傳輸距離標(biāo)準(zhǔn)值為1200米（9600bps時(shí)），實(shí)際上可達(dá)3000米，RS485接口在總線上是允許連接多達(dá)128個(gè)收發(fā)器.，RS485總線, 在要求通信距離為幾十米到上千米時(shí)，廣泛采用RS485串行總線標(biāo)準(zhǔn)。DS18B20中的溫度傳感器完成對(duì)溫度的測(cè)量，用16位二進(jìn)制形式提供，其中S為符號(hào)位（如圖四所示）。MSCOMM控件介紹：MSComm控件提供下列兩種處理通訊的方式：事件驅(qū)動(dòng)方式和查詢方式。經(jīng)過對(duì)系統(tǒng)的現(xiàn)場(chǎng)測(cè)試，基本達(dá)到了預(yù)期設(shè)計(jì)指標(biāo)。 //10ms？ TF0=0。 default:break。 d0=TxRxBuf[0]%100%10。dot=0。dot2flag=1。 // 溫度檢測(cè)模塊/* 主函數(shù)*/void main(){ //uchar i。d3=d2=d1=d0=wsta=dot=0。 TxPacket(TxRxBuf)。} case 3:{if(secflag) {secflag=0。 TxRxBuf[2]=d1=temp%10。sbit TRX_CE=P1^0。//nrf905狀態(tài)端口sbit AM=P1^2。 } SCK=0。 // Init CD for input PWR=1。i++) { SpiWrite(TxRxBuf[i])。 // nrf905_Delay for mode change(=650us)}//設(shè)置接收初始化void SetRxMode(void){ TXEN=0。i 3。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。將MSComm控件的參數(shù)設(shè)置好，并打開39。39。39。39。設(shè)定通信參數(shù) = True 39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。If ValueStr PreValue + Then (NowX, ValueStr), RGB(255, 0, 0) 39。以下判斷現(xiàn)在的讀值是否大于前一次的讀值，若是，則以紅色繪線 39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。Private Sub cmdStart_Click() = Not If Then = 停止檢測(cè) Else = 開始檢測(cè) = 已停止檢測(cè) End IfEnd Sub39。39。39。39。39。39。39。39。判斷端口號(hào)碼是否落在116之間 If = 0 And = 16 Then = + 1 Else MsgBox 指定通信端口時(shí)發(fā)生錯(cuò)誤！, vbCritical + vbOKOnly, 系統(tǒng)信息 Exit Sub End If 39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。 SpiWrite(RRP)。 TXEN=1。 // Write payload mand for (i=0。 // Init DR for input AM=1。 } else { DATA_BUFamp。sbit SCK=P1^7。char tf。//得到轉(zhuǎn)換溫度值 TxRxBuf[0]=d3=temp/100。 wsta=3。 } break。 case 1:Temperature_work()。 }}（2） 從機(jī)部分/* 名稱：基于NRF905的無線數(shù)據(jù)采集系統(tǒng)的設(shè)計(jì)——從機(jī) 編寫：lyd 日期：~09 內(nèi)容：數(shù)據(jù)處理與發(fā)送等 晶振：*/includeincludeinclude/* 函數(shù)聲明*/void TRtest_work()。 d2=TxRxBuf[1]。 d0=TxRxBuf[0]%100%10。 d2=TxRxBuf[0]/100。d3=d2=d1=d0=wsta=dot=0。 Config905()。系統(tǒng)整體上滿足了設(shè)計(jì)要求，能夠?qū)崟r(shí)的進(jìn)行對(duì)環(huán)境溫度的監(jiān)控。VB擁有圖形用戶界面（GUI）和快速應(yīng)用程序開發(fā)（RAD）系統(tǒng)，可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫，或者輕松的創(chuàng)建ActiveX控件。其采用單總線的接口方式與微處理器連接時(shí)僅需要一條口線即可實(shí)現(xiàn)微處理器與DS18B20的雙向通訊。傳輸距離短的另一原因是RS232屬單端信號(hào)傳送，存在共地噪聲和不能抑制共模干擾等問題，所以抗噪聲干擾性能弱，因此一般用于20m以內(nèi)的通信，而且RS232接口適合點(diǎn)對(duì)點(diǎn)通信，常用于PC機(jī)的連接。系統(tǒng)設(shè)計(jì)總體結(jié)構(gòu)框圖如圖1所示。 Epistemic machine。溫室里實(shí)行溫度檢測(cè)可以確?；ɑ芑蜣r(nóng)作物的成活率，從而提高經(jīng)濟(jì)效益，由此可知溫度檢測(cè)系統(tǒng)應(yīng)用十分廣闊。這樣一條總線上可以掛多個(gè)DS18B20，大大節(jié)省了資源，因而使系統(tǒng)結(jié)構(gòu)更趨簡(jiǎn)單。RS485采用平衡發(fā)送和差分接收，抗噪聲干擾性好，具有抑制共模干擾的能力[3]。例如＋125℃的數(shù)字輸出為07D0H（正溫度直接把16進(jìn)制數(shù)轉(zhuǎn)成10進(jìn)制即得到溫度值）55℃的數(shù)字輸出為FC90H。屬性設(shè)置：CommPort 設(shè)置并返回通訊端口號(hào)。系統(tǒng)設(shè)計(jì)的難點(diǎn)在于軟件部分，由于對(duì)溫度的讀取，無線收發(fā)模塊的操作都需要較長的時(shí)間，一般都在幾百毫秒以上，系統(tǒng)又采用數(shù)碼管動(dòng)態(tài)顯示，對(duì)時(shí)間要求比較高，需采用定時(shí)器中斷解決時(shí)間上的沖突。 TH0=0xdc。 } }}/* 數(shù)據(jù)收發(fā)測(cè)試模