【正文】 延時 CLR SETB 。選中第二個數(shù)碼管 MOV A,B_BIT 。取十位數(shù) MOVC A,@A+DPTR 。查十位數(shù)的 7段代碼 MOV P1,A 。送出十位的 7段代碼 LCALL DELAY CLR RET JIA: MOV P2,0FFH MOV A,P2 MOV C, JC OUT INC @R1 LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY OUT: RETI JIAN: MOV P2,0FFH MOV A,P2 MOV C, JC OUT1 DEC @R1 LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY LCALL DELAY OUT1: RETI DELAY: 。延時子程序 MOV R5,120 NOP NOP D1: MOV R6,100 D2: DJNZ R6,D2 DJNZ R5,D1 RET 。**************主程序開始 ************ MAIN: LCALL INIT_18B20 。LCALL RE_CONFIG LCALL GET_TEMPER LJMP CHANGE 。**********DS18B20復(fù)位程序 ***************** INIT_18B20: SETB DQ NOP CLR DQ MOV R0,0FBH TSR1: DJNZ R0,TSR1 。延時 SETB DQ MOV R0,25H TSR2: JNB DQ ,TSR3 DJNZ R0,TSR2 TSR3: SETB FLAG1 。置標志位，表明 DS18B20存在 CLR 。二極管指示 AJMP TSR5 TSR4: CLR FLAG1 LJMP TSR7 TSR5: MOV R0,06BH TSR6: DJNZ R0,TSR6 TSR7:SETB DQ 。表明不存在 RET 。*****************讀轉(zhuǎn)換后的溫度值 **************** GET_TEMPER: SETB DQ LCALL INIT_18B20 JB FLAG1,TSS2 RET 。若不存在則返回 TSS2: MOV A,0CCH 。跳過 ROM LCALL WRITE_18B20 MOV A,44H 。發(fā)出溫度轉(zhuǎn)換命令 LCALL WRITE_18B20 。LCALL DISPLAY 。延時 LCALL INIT_18B20 MOV A,0CCH 。跳過 ROM LCALL WRITE_18B20 MOV A,0BEH 。發(fā)出讀溫度換命令 LCALL WRITE_18B20 LCALL READ2_18B20 。讀兩個字節(jié)的溫度 RET 。***************寫 DS18B20程序 ************ WRITE_18B20: MOV R2,8 CLR C WR1: CLR DQ MOV R3,6 DJNZ R3,$ RRC A MOV DQ,C MOV R3,23 DJNZ R3,$ SETB DQ NOP DJNZ R2,WR1 SETB DQ RET 。***********讀 18B20程序，讀出兩個字節(jié)的溫度 ********* READ2_18B20: MOV R4,2 。低位存在 29 H,高位存在 28H MOV R1,29H RE00: MOV R2,8 RE01: CLR C SETB C NOP NOP CLR DQ NOP NOP NOP SETB DQ MOV R3,7 DJNZ R3,$ MOV C,DQ MOV R3,23 DJNZ R3,$ RRC A DJNZ R2,RE01 MOV @R1,A DEC R1 DJNZ R4,RE00 RET 。************讀出的溫度進行數(shù)據(jù)轉(zhuǎn)換 ************** CHANGE: MOV A,29H MOV C, 。將 28H中的最低位移入 C RRC A MOV C, RRC A MOV C, RRC A MOV C, RRC A MOV 29H,A MOV R1,29H LCALL DISPLAY 。調(diào)用數(shù)碼管顯示子程序 CLR C MOV A,30H SUBB A,29H JC BJ LJMP MAIN BJ:CPL CPL LJMP MAIN 。*********************************** D1MS: MOV R7,80 。1MS延時 (按 12MHZ算 ) DJNZ R7,$ RET 。************************* TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H END