【正文】 = Time$n = n + 1End IfIf n = 100 Then n = 0 = End IfEnd SubPrivate Sub Text5_Change() ‘改變讀數(shù)據(jù)的時間 = 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 amp。}} //負(fù)溫小于55 度時顯示為}} }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è)定輸入錯誤，不發(fā)送 Else = Select Case Len(Trim()) Case 5 = Trim() Case 4 = 0 amp。0x0f)4)。temp_data[0]=~temp_data[0]+1。 i++。unsigned char j。 i++。 P2=dispbitcode[i]。//溫度正負(fù)標(biāo)志sbit DQ=P3^7。由于 DS18B20 與單片機(jī)采用串行數(shù)據(jù)傳送，因此，對DS18B20 進(jìn)行讀/寫編程時必須嚴(yán)格地保證讀/寫時序，否則將無法讀取測量結(jié)果。（6）提供了多種向?qū)?。接收?RXD 一位位地接收數(shù)據(jù)，直到收到一個完整的字符數(shù)據(jù)后，控制電路進(jìn)行最后一次移位，自動去掉啟始位，使接收中斷標(biāo)志 RI 置“1” ，并向 CPU 申請中斷。電源供電電路如圖所示：系統(tǒng)供電電源總體電路圖 單片機(jī)與 PC 機(jī)串口連接電路：目前RS232是PC機(jī)與通信工業(yè)中應(yīng)用最廣泛的一種串行接口。 共陰數(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)顯示方式。外部復(fù)位電路是為內(nèi)部復(fù)位電路提供兩個機(jī)器周期以上的電平而設(shè)計的。作輸入口時，應(yīng)先軟件置“ 1” 。 ：：研究基于單片機(jī)的低功耗溫度記錄儀，可以以一定的時間間隔連續(xù)記錄系統(tǒng)溫度，并提供通訊接口將溫度數(shù)據(jù)上傳到 PC 機(jī)。（2）第二階段（19781982）單片機(jī)的完善階段。這種傳統(tǒng)方式給病人帶來了很多不便，也加大了護(hù)理工作量。本設(shè)計由硬件和軟件二部分組成。因此可見，設(shè)計出一款測量溫度并自動記錄下數(shù)據(jù)的溫度記錄儀是多么重要。Intel 公司推出的 MCS – 96 系列單片機(jī)，將一些用于測控系統(tǒng)的模數(shù)轉(zhuǎn)換器、程序運行監(jiān)視器、脈寬調(diào)制器等納。主程序負(fù)責(zé)對來自上位機(jī)的命令進(jìn)行解析并執(zhí)行讀溫度值、存儲溫度值、輸出控制等等，中斷服務(wù)程序只負(fù)責(zé)單片機(jī)和上位機(jī)之間的數(shù)據(jù)發(fā)送與接收。 第二功能：加+5V 備用電源，可以實現(xiàn)掉電保護(hù) RAM 信息不丟失。系統(tǒng)中，外接電 CC2 的大小會影響振蕩器頻率的穩(wěn)定度、起振時間及溫度穩(wěn)定性。 本設(shè)計采用四位一體共陰數(shù)碼管動態(tài)顯示。所以RS232適合本地設(shè)備之間的通信。它既適用于沒有任何編程經(jīng)驗的開發(fā)者學(xué)習(xí)，也適合于開發(fā)各種復(fù)雜的底層應(yīng)用程序。（1）上電前的調(diào)試在上電前，必須確保電路中不存在斷路或短路情況，這一工作是整個調(diào)試工作的第一步，也是非常重要的一個步驟。致謝在我論文即將完成之際，我首先要向在論文寫作中給予我悉心關(guān)懷、鼓勵和指導(dǎo)的陳松嶺老師致以深深的敬意和謝意！老師一絲不茍的鉆研精神，嚴(yán)謹(jǐn)求實的治學(xué)態(tài)度，執(zhí)著忘我的工作作風(fēng)，獨樹一幟的思維方式，使學(xué)生受益匪淺，并終身難忘。 dispbuf[1]=a1。Delay(4)。dat = 0。 i++。dmsec (1)。 // ds1820 開始轉(zhuǎn)換dmsec(2)。i){if(Tflag==1) //正溫 if(dispbuf[4]126) { if(dispbuf[4]100) {digitalshow(10,dispbuf[2],dispbuf[1],dispbuf[0])。 Case Else End SelectEnd Sub38 / 40Private Sub Text1_Change() ‘對讀出的數(shù)據(jù)進(jìn)行處理If (Len() Mod 4 = 0) And (Len() 0) Then = Right$(, 4) amp。 a3Next iEnd WithEnd SubPrivate Sub Timer2_Timer() ‘設(shè)置溫度時間隔開發(fā)送數(shù)據(jù)的時間，以使If t = 0 Then ‘單片機(jī)能正常處理 = Mid(, 1, 1) t = t + 1 ElseIf t = 1 Then = Mid(, 2, 1)40 / 40 t = t + 1 ElseIf t = 2 Then = Mid(, 3, 1) t = t + 1 ElseIf t = 3 Then = Mid(, 4, 1) t = t + 1 ElseIf t = 4 Then = Mid(, 5, 1) t = 0 = FalseEnd IfEnd Sub 羅袃羋蚅蚅膈膄蚅螇羈蒃蚄衿膇荿蚃羂羀芅螂蟻膅膁螁螄羈蒀螀袆膃蒆蝿肈羆莂蝿螈節(jié)羋蒞袀肄膄莄羃芀蒂莃螞肅莈蒂螅羋芄蒂袇肁膀蒁罿襖蕿蒀蝿聿蒅葿袁羂莁蒈羃膈芇蕆蚃羀膃蕆螅膆蒁薆袈罿莇薅羀膄芃薄蝕羇艿薃袂節(jié)膅薂羄肅蒄薁蚄芁莀薁螆肄芆薀衿艿膂蠆羈肂蒀蚈蟻裊莆蚇螃肀莂蚆羅袃羋蚅蚅膈膄蚅螇羈蒃蚄衿膇荿蚃羂羀芅螂蟻膅膁螁螄羈蒀螀袆膃蒆蝿肈羆莂蝿螈節(jié)羋蒞袀肄膄莄羃芀蒂莃螞肅莈蒂螅羋芄蒂袇肁膀蒁罿襖蕿蒀蝿聿蒅葿袁羂莁蒈羃膈芇蕆蚃羀膃蕆螅膆蒁薆袈罿莇薅羀膄芃薄蝕羇艿薃袂節(jié)膅薂羄肅蒄薁蚄芁莀薁螆肄芆薀衿艿膂蠆羈肂蒀蚈蟻裊莆蚇螃肀莂蚆羅袃羋蚅蚅膈膄蚅螇羈蒃蚄衿膇荿蚃羂羀芅螂蟻膅膁螁螄羈蒀螀袆膃蒆蝿肈羆莂蝿螈節(jié)羋蒞袀肄膄莄羃。每接收到 1 個字符，發(fā)生 1 次事件 = True 39。for(i=255。dmsec(450)。 // 轉(zhuǎn)換}//讀取溫度read_temp(){ tmreset ()。 // 從低位開始?if (testb) {// Write 1DQ = 0。 return (dat)。Delay(90)。 void digitalshow(unsigned char a3,unsigned char a2,unsigned char a1,unsigned char a0){unsigne