【正文】 編譯器編程調(diào)試。（1）上電前的調(diào)試在上電前，必須確保電路中不存在斷路或短路情況，這一工作是整個(gè)調(diào)試工作的第一步，也是非常重要的一個(gè)步驟。利用這些向?qū)?，你可以快速地完成一般性的任?wù)，例如生成其控件不綁定到數(shù)據(jù)控件上的純代碼窗體，建立查詢，添加工具，制作圖表，以及發(fā)布創(chuàng)建的應(yīng)用程序等。它既適用于沒有任何編程經(jīng)驗(yàn)的開發(fā)者學(xué)習(xí)，也適合于開發(fā)各種復(fù)雜的底層應(yīng)用程序。CPU 響應(yīng)中斷，用一條指令（MOV A，SBUF）把接收緩沖器 SBUF（收）的內(nèi)容讀入累加器。所以RS232適合本地設(shè)備之間的通信。RS232被定義為一種在低速率串行通訊中增加通訊距離的單端標(biāo)準(zhǔn)。 本設(shè)計(jì)采用四位一體共陰數(shù)碼管動態(tài)顯示。靜態(tài)顯示的特點(diǎn)是每個(gè)數(shù)碼管的段選必須接一個(gè) 8 位數(shù)據(jù)線來保持顯示的字形碼。系統(tǒng)中，外接電 CC2 的大小會影響振蕩器頻率的穩(wěn)定度、起振時(shí)間及溫度穩(wěn)定性。系統(tǒng)采用上電自動復(fù)位，上電瞬間電容器上的電壓不能突變，RST 上的電壓是 Vcc 上的電壓與電容器上的電壓之差，因而 RST 上的電壓與 Vcc 上的電壓相同。 第二功能：加+5V 備用電源，可以實(shí)現(xiàn)掉電保護(hù) RAM 信息不丟失。 P1 口：I/O 雙向口。主程序負(fù)責(zé)對來自上位機(jī)的命令進(jìn)行解析并執(zhí)行讀溫度值、存儲溫度值、輸出控制等等，中斷服務(wù)程序只負(fù)責(zé)單片機(jī)和上位機(jī)之間的數(shù)據(jù)發(fā)送與接收。利用 VB/VC/DELPHI 編制 PC 示例程序。Intel 公司推出的 MCS – 96 系列單片機(jī)，將一些用于測控系統(tǒng)的模數(shù)轉(zhuǎn)換器、程序運(yùn)行監(jiān)視器、脈寬調(diào)制器等納。Intel 公司在 MCS – 48 基礎(chǔ)上推出了完善的、典型的單片機(jī)系列 MCS –51。因此可見，設(shè)計(jì)出一款測量溫度并自動記錄下數(shù)據(jù)的溫度記錄儀是多么重要。更為欠缺的是測量時(shí)間間隔不夠短，在體溫變化率較高的情況下，容易造成處理不當(dāng)或不足，達(dá)不到最理想的疾病控制與治療效果。本設(shè)計(jì)由硬件和軟件二部分組成。本設(shè)計(jì)充分利用 PC 機(jī) 軟件強(qiáng)大的數(shù)據(jù)處理功能和友好的人機(jī)界面,對溫度進(jìn)行實(shí)時(shí)曲線顯示。這種傳統(tǒng)方式給病人帶來了很多不便，也加大了護(hù)理工作量。無紙溫度記錄儀產(chǎn)生，并因?yàn)槠涓鼫?zhǔn)確地?cái)?shù)據(jù)記錄、更方便的數(shù)據(jù)存儲、更便捷的數(shù)據(jù)分析功能，所占市場份額逐年猛增；近年來推出的帶 usb 接口的無紙記錄儀更是極大的方便了數(shù)據(jù)的下載和保存。（2）第二階段（19781982）單片機(jī)的完善階段。（3）第三階段（19821990）：8 位單片機(jī)的鞏固發(fā)展及 16 位單片機(jī)的推出階段，也是單片機(jī)向微控制器發(fā)展的階段。 ：：研究基于單片機(jī)的低功耗溫度記錄儀，可以以一定的時(shí)間間隔連續(xù)記錄系統(tǒng)溫度，并提供通訊接口將溫度數(shù)據(jù)上傳到 PC 機(jī)。 系統(tǒng)軟件設(shè)計(jì)方案：9 / 40①單片機(jī)軟件設(shè)計(jì)單片機(jī)程序由主程序和中斷子程序組成的。作輸入口時(shí)，應(yīng)先軟件置“ 1” 。 RST/Vpd（9 腳）：復(fù)位信號輸入端（高電平有效） 。外部復(fù)位電路是為內(nèi)部復(fù)位電路提供兩個(gè)機(jī)器周期以上的電平而設(shè)計(jì)的。10uF。 共陰數(shù)碼管碼表? 0x3f , 0x06 , 0x5b , 0x4f , 0x66 , 0x6d ,? 0 1 2 3 4 5? 0x7d , 0x07 , 0x7f , 0x6f , 0x77 , 0x7c ,? 6 7 8 9 A B? 0x39 , 0x5e , 0x79 , 0x71 , 0x00? C D E F 無顯示靜態(tài)顯示方式LED 顯示器工作方式有兩種：靜態(tài)顯示方式和動態(tài)顯示方式。動態(tài)顯示的亮度比靜態(tài)顯示要差一些，所以在選擇限流電阻時(shí)應(yīng)略小于靜態(tài)顯示電路中的。電源供電電路如圖所示：系統(tǒng)供電電源總體電路圖 單片機(jī)與 PC 機(jī)串口連接電路：目前RS232是PC機(jī)與通信工業(yè)中應(yīng)用最廣泛的一種串行接口。RS232是為點(diǎn)對點(diǎn)（即只用一對收、發(fā)設(shè)備）通訊而設(shè)計(jì)的，其驅(qū)動器負(fù)載為3～7k217。接收端 RXD 一位位地接收數(shù)據(jù)，直到收到一個(gè)完整的字符數(shù)據(jù)后，控制電路進(jìn)行最后一次移位，自動去掉啟始位，使接收中斷標(biāo)志 RI 置“1” ，并向 CPU 申請中斷。（2）采用簡單易學(xué)的 Basic 語言。（6）提供了多種向?qū)?。電阻的測量，用萬用表的歐姆檔測量。由于 DS18B20 與單片機(jī)采用串行數(shù)據(jù)傳送，因此，對DS18B20 進(jìn)行讀/寫編程時(shí)必須嚴(yán)格地保證讀/寫時(shí)序，否則將無法讀取測量結(jié)果。最后由于時(shí)間緊迫，本設(shè)計(jì)還有諸多地方需要改進(jìn)，比如改用RS485串行接口或是網(wǎng)線，實(shí)現(xiàn)遠(yuǎn)距離操作。//溫度正負(fù)標(biāo)志sbit DQ=P3^7。dispbuf[0]=a0。 P2=dispbitcode[i]。 // 精確延時(shí) 大于 480usDQ = 1。 i++。}//讀一個(gè)比特unsigned char tmrbyte (void) { unsigned char i,j,dat。unsigned char j。 // 先拉低 i++。 i++。tmpre ()。temp_data[0]=~temp_data[0]+1。 // 初始化 ds18b2033 / 40 while(1){tmstart()。0x0f)4)。i0。}} //負(fù)溫小于55 度時(shí)顯示為}} }35 / 40附錄 3PC 機(jī)程序：Dim n As IntegerDim t As Integer ‘定義全局變量Private Sub Command1_Click() ‘單擊溫度設(shè)置按鈕程序Dim i As Integer If Len(Trim()) 3 Or Val() 100 Or Val() 0 Or Left(Right(, 2), 1) . Then = 設(shè)定輸入錯(cuò)誤，不發(fā)送 Else = Select Case Len(Trim()) Case 5 = Trim() Case 4 = 0 amp。打開串口 Else = False = B37 / 40 = B = 開通信端口 = True = False = 采集數(shù)據(jù) = False = False = False End IfEnd SubPrivate Sub Command7_Click() ‘單擊按鈕保存溫度數(shù)據(jù) = 2Open For Append As 1 Write 1, Now Write 1, Close 1End SubPrivate Sub Form_Load() COM1 COM2 COM3 COM4End SubPrivate Sub MSComm1_OnComm() ‘串口接收到數(shù)據(jù)時(shí)讀出數(shù)據(jù) Select Case Case EvReceive = amp。 = Time$n = n + 1End IfIf n = 100 Then n = 0 = End IfEnd SubPrivate Sub Text5_Change() ‘改變讀數(shù)據(jù)的時(shí)間 = Val() * 1000End SubPrivate Sub Timer1_Timer() ‘采集數(shù)據(jù)后進(jìn)行繪圖 = ADim a As SingleDim a1 As StringDim a2 As StringDim a3 As StringDim k As IntegerStatic b(200) As Integer = Time For k = 1 To 199 b(k) = b(k + 1) Next k b(200) = Val()With MSChart1For i = 1 To 200a = Val(Mid(, 1, 2)) * 3600 + Val(Mid(, 4, 2)) * 60 + Val(Mid(, 39 / 407, 2)) 200 * Val() + i * Val() + 1If a 0 Thena = a + 86400ElseIf a 86400 Thena = a 86400End IfIf a \ 3600 10 Thena1 = 0