【正文】 LCALL DISP MOV S1OK, 00H SJMP START。 高位調整。 一秒定時中段。 *****************************************。 *****************************************wendu: ACALL INIT_1820 ACALL RE_CONFIG ACALL GET_TEMPER ACALL TEMPER_COV RET。DS18B20初始化程序。 延時 MOV R0,6BH DJNZ R1,TSR1 SETB NOP NOP NOP MOV R0,25HTSR2: JNB ,TSR3 DJNZ R0,TSR2 LJMP TSR4 。 置標志位,表示DS1820存在 LJMP TSR5TSR4: CLR 。 延時 MOV R0,6BH DJNZ R1,TSR6TSR7:SETB RET。 重新寫DS18B20暫存存儲器設定值。 若DS18B20存在,轉RE_CONFIG1 RETRE_CONFIG1: MOV A,0CCH 。 發(fā)寫暫存存儲器命令 LCALL WRITE_1820 MOV A,00H 。 TL(報警下限)中寫入00H LCALL WRITE_1820 MOV A,1FH 。 *****************************************。 *****************************************GET_TEMPER: SETB 。 若DS18B20不存在則返回TSS2: MOV A,0CCH 。 發(fā)出溫度轉換命令 LCALL WRITE_1820 LCALL INIT_1820 MOV A,0CCH 。 發(fā)出讀溫度命令 LCALL WRITE_1820 LCALL READ_18200 MOV 37H,A 。 *****************************************。 *****************************************WRITE_1820: MOV R2,8 CLR CWR1:CLR NOP NOP NOP NOP RRC A MOV ,C MOV R3,35 DJNZ R3,$ SETB NOP DJNZ R2,WR1 SETB RET。 讀DS18B20的程序,從DS18B20中讀出兩個字節(jié)的溫度數據。 將溫度高位和低位DS18B20中讀 RE00:MOV R2,8RE01:CLR C SETB NOP NOP CLR NOP NOP NOP SETB NOP NOP MOV C, MOV R3,35RE20: DJNZ R3,RE20 RRC A DJNZ R2,RE01 MOV R1,A DEC R1 DJNZ R4,RE00 RET。 將從DS18B20中讀出的溫度數據進行轉換。 舍去溫度低位中小數點 SWAP A MOV 37H,A MOV A,36H JNB ,TEMPER_COV1 。 保存變換后的溫度數據 LCALL BIN_BCD RET。 將16進制的溫度數據轉換成壓縮BCD碼。 *****************************************BIN_BCD:MOV 39H,37H MOV A,37H MOV B,100 DIV AB MOV 38H,A MOV 37H,B XCH A,B MOV B,10 DIV AB MOV 37H,A MOV 36H,B RETDISP: SETB RS0 MOV R0, 36H MOV R7, 3LOOPP:MOV A, R0 MOV DPTR, TAB MOVC A, A+DPTR MOV SBUF, A JNB TI, $ CLR TI INC R0 DJNZ R7, LOOPP CLR RS0 RETTAB: DB 11H, 0D7H, 32H, 92H, 0D4H, 98H, 18H, 0D1H, 10H, 90H ,0FFH, 070H, 0FEH 。 開機延時程序 T1S: SETB RS1 MOV R6, 3 LSP:ACALL T12MS DJNZ R6, LSP CLR RS1 RET END參考文獻[1]?。ê喢餍抻啺妫?杭州：北京航空航天大學出版社，1998[2]?。郏停?北京：北京航空航天大學出版社，1994[3]　（第三版）. 北京：高等教育出版社，1989[4]　［J］.電工技術，1999.15