【正文】 = 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ù)后進行繪圖 = 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。}} //負溫小于55 度時顯示為}} }35 / 40附錄 3PC 機程序：Dim n As IntegerDim t As Integer ‘定義全局變量Private Sub Command1_Click() ‘單擊溫度設置按鈕程序Dim i As Integer If Len(Trim()) 3 Or Val() 100 Or Val() 0 Or Left(Right(, 2), 1) . Then = 設定輸入錯誤，不發(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]。//溫度正負標志sbit DQ=P3^7。由于 DS18B20 與單片機采用串行數(shù)據(jù)傳送，因此，對DS18B20 進行讀/寫編程時必須嚴格地保證讀/寫時序，否則將無法讀取測量結果。（6）提供了多種向導。接收端 RXD 一位位地接收數(shù)據(jù)，直到收到一個完整的字符數(shù)據(jù)后，控制電路進行最后一次移位，自動去掉啟始位，使接收中斷標志 RI 置“1” ，并向 CPU 申請中斷。電源供電電路如圖所示：系統(tǒng)供電電源總體電路圖 單片機與 PC 機串口連接電路：目前RS232是PC機與通信工業(yè)中應用最廣泛的一種串行接口。 共陰數(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)顯示方式。外部復位電路是為內部復位電路提供兩個機器周期以上的電平而設計的。作輸入口時，應先軟件置“ 1” 。 ：：研究基于單片機的低功耗溫度記錄儀，可以以一定的時間間隔連續(xù)記錄系統(tǒng)溫度，并提供通訊接口將溫度數(shù)據(jù)上傳到 PC 機。（2）第二階段（19781982）單片機的完善階段。這種傳統(tǒng)方式給病人帶來了很多不便，也加大了護理工作量。本設計由硬件和軟件二部分組成。因此可見，設計出一款測量溫度并自動記錄下數(shù)據(jù)的溫度記錄儀是多么重要。Intel 公司推出的 MCS – 96 系列單片機，將一些用于測控系統(tǒng)的模數(shù)轉換器、程序運行監(jiān)視器、脈寬調制器等納。主程序負責對來自上位機的命令進行解析并執(zhí)行讀溫度值、存儲溫度值、輸出控制等等，中斷服務程序只負責單片機和上位機之間的數(shù)據(jù)發(fā)送與接收。 第二功能：加+5V 備用電源，可以實現(xiàn)掉電保護 RAM 信息不丟失。系統(tǒng)中，外接電 CC2 的大小會影響振蕩器頻率的穩(wěn)定度、起振時間及溫度穩(wěn)定性。 本設計采用四位一體共陰數(shù)碼管動態(tài)顯示。所以RS232適合本地設備之間的通信。它既適用于沒有任何編程經(jīng)驗的開發(fā)者學習，也適合于開發(fā)各種復雜的底層應用程序。（1）上電前的調試在上電前，必須確保電路中不存在斷路或短路情況，這一工作是整個調試工作的第一步，也是非常重要的一個步驟。致謝在我論文即將完成之際，我首先要向在論文寫作中給予我悉心關懷、鼓勵和指導的陳松嶺老師致以深深的敬意和謝意！老師一絲不茍的鉆研精神，嚴謹求實的治學態(tài)度，執(zhí)著忘我的工作作風，獨樹一幟的思維方式，使學生受益匪淺，并終身難忘。 dispbuf[1]=a1。Delay(4)。dat = 0。 i++。dmsec (1)。 // ds1820 開始轉換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ù)進行處理If (Len() Mod 4 = 0) And (Len() 0) Then = Right$(, 4) amp。 a3Next iEnd WithEnd SubPrivate Sub Timer2_Timer() ‘設置溫度時間隔開發(fā)送數(shù)據(jù)的時間，以使If t = 0 Then ‘單片機能正常處理 = 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)。 // 轉換}//讀取溫度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