單片機(jī)上下限溫度報(bào)警器設(shè)計(jì)--課程設(shè)計(jì)-資料下載頁(yè)
2025-01-18 14:27本頁(yè)面
【正文】 DELAY 。 調(diào)用延時(shí)CLR SETB 。選中第二個(gè)數(shù) 碼管MOV A,B_BIT 。取十位數(shù)MOVC A,@A+DPTR 。查十位數(shù)的 7 段代碼MOV P1,A 。送出十位的 7 段代碼LCALL DELAYCLR RETJIA:MOV P2,0FFHMOV A,P2MOV C,JC OUTINC @R1LCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYOUT:RETIJIAN:MOV P2,0FFHMOV A,P2MOV C,JC OUT1DEC @R1LCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYLCALL DELAYOUT1:RETIDELAY: 。延時(shí)子程序MOV R5,120NOPNOPD1: MOV R6,100D2: DJNZ R6,D2DJNZ R5,D1RET。**************主程序開始 ************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 。延時(shí) SETB DQ MOV R0,25H TSR2: JNB DQ ,TSR3 DJNZ R0,TSR2 TSR3: SETB FLAG1 。置標(biāo)志位，表明 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 。跳過(guò) ROM LCALL WRITE_18B20 MOV A,44H 。發(fā)出溫度轉(zhuǎn)換命令 LCALL WRITE_18B20 。LCALL DISPLAY 。延時(shí) LCALL INIT_18B20 MOV A,0CCH 。跳過(guò) ROM LCALL WRITE_18B20 MOV A,0BEH 。發(fā)出讀溫度換命令 LCALL WRITE_18B20 LCALL READ2_18B20 。讀兩個(gè)字節(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 程序，讀出兩個(gè)字節(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 。************讀出的溫度進(jìn) 行數(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 MAINBJ:CPL CPL LJMP MAIN 。*********************************** D1MS: MOV R7,80 。1MS 延時(shí)(按 12MHZ 算) DJNZ R7,$ RET 。************************* TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90HEND
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1