【文章內(nèi)容簡(jiǎn)介】 入DS18B20內(nèi) ACALL WRITE_E2 。調(diào)用報(bào)警值拷貝E2ROM子程序PK2: ACALL XS_S 。顯示OK信息子程序PK3: RETTA1: 。菜單表 DB SET ALERT DATA,0H。********************************設(shè)定報(bào)警值TH、TL子程序**************************SET_ALARM:A0: JB K1, A2 。按下K1程序向下運(yùn)行 ACALL SPK_BZ 。蜂鳴器響一聲 JNB K1, $ 。等待放開(kāi) CPL KEY_UD 。UP/DOWN標(biāo)記反向A2: JB KEY_UD, A3 。=1,UP,跳轉(zhuǎn)到A3 JMP A8 。=0,DOWN,跳轉(zhuǎn)到A8。TH值調(diào)整（增加）A3: JB K2, A5 。按下K2鍵，程序向下運(yùn)行 ACALL SPK_BZ 。蜂鳴器響一聲 INC TEMP_TH 。TH值調(diào)整（增加） MOV A, TEMP_TH 。TH值送入A CJNE A, 120, A4 。TH值增到120，程序向下運(yùn)行 MOV TEMP_TH, 0 。TH值清0A4: ACALL LOOK_ALARM 。調(diào)用顯示信息區(qū)子程序 MOV R5, 10 ACALL DELAY 。調(diào)用延時(shí)程序 JMP A3 。循環(huán)。TL值調(diào)整（增加）A5: JB K3, A7 。按下K3鍵程序向下運(yùn)行 ACALL SPK_BZ 。蜂鳴器響一聲 INC TEMP_TL 。TL值增加1 MOV A, TEMP_TL 。TL值送入A CJNE A, 119, A6 。比較，若A=99,程序向下運(yùn)行 MOV TEMP_TL, 00H 。TL值清0A6: ACALL LOOK_ALARM 。調(diào)用顯示信息區(qū)子程序 MOV R5, 10 ACALL DELAY 。調(diào)用延時(shí)程序 JMP A5 。程序跳轉(zhuǎn)到A5,循環(huán)。確定調(diào)整OKA7: JB K4, A0 。按下K4鍵,程序向下運(yùn)行 ACALL SPK_BZ 。蜂鳴器響一聲 JNB K4, $ 。等放開(kāi) RET。TH值調(diào)整（減少）A8: JB K2, A10 。按下K2鍵，程序向下運(yùn)行 ACALL SPK_BZ 。蜂鳴器響一聲 DEC TEMP_TH 。TH值減1 MOV A, TEMP_TH 。TH值送入A CJNE A, 0FFH,A9 。比較，若A=0FF,程序向下運(yùn)行 JMP A12 。跳轉(zhuǎn)到A12A9: ACALL LOOK_ALARM 。調(diào)用顯示信息區(qū)子程序 MOV R5, 10 ACALL DELAY 。調(diào)用延時(shí)子程序 JMP A0 。跳轉(zhuǎn)到A0。TL值調(diào)整（減少）A10: JB K3, A13 。按K3鍵，程序向下運(yùn)行 ACALL SPK_BZ 。蜂鳴器響一聲 DEC TEMP_TL 。TL值減1 MOV A, TEMP_TL 。TH值送入A CJNE A, 0FFH,A11 。比較，若A=0FFH,程序向下運(yùn)行 JMP A12 。轉(zhuǎn)移到A12A11: ACALL LOOK_ALARM 。調(diào)用顯示信息區(qū)子程序 MOV R5, 10 ACALL DELAY 。調(diào)用延時(shí)子程序 JMP A0 。轉(zhuǎn)移到A0A12: CPL 。UP/DOWN標(biāo)記反向 JMP A3 。跳轉(zhuǎn)到A3,TH值調(diào)整（增加）A13: JMP A7 。跳轉(zhuǎn)到A7,確定調(diào)整OK RET 。子程序返回。********************************************菜單顯示子程序******************* 。在LCD的第一行或第二行顯示字符LCD_PRINT: CJNE A,1,LINE2 。判斷是否為第一行LINE1: ACALL CLR_LINE 。清除該行字符數(shù)據(jù) MOV A,80H 。設(shè)置LCD的第一行地址 ACALL WR_COMM 。寫(xiě)入命令 JMP FILLLINE2: ACALL CLR_LINE 。清除該行字符數(shù)據(jù) MOV A,0C0H 。設(shè)置LCD的第二行地址 ACALL WR_COMM 。寫(xiě)入命令FILL: CLR A MOVC A,@A+DPTR 。由消息區(qū)取出字符 CJNE A,0,LC1 。判斷是否為結(jié)束碼 RETLC1: ACALL WR_DATA 。寫(xiě)入數(shù)據(jù) INC DPTR 。指針加1 JMP FILL 。繼續(xù)填入字符。*****************************顯示信息區(qū)子程序************************LOOK_ALARM: MOV DPTR,M_ALAX2 。存表 MOV A, 2 。顯示在第二行 ACALL LCD_PRINT 。調(diào)用顯示字符子程序 MOV A,0C6H 。顯示起始地址第二行第7位 ACALL TEMP_BJ 。調(diào)用顯示溫度標(biāo)記子程序 MOV A, TEMP_TH 。加載TH數(shù)據(jù) MOV X, 3 。設(shè)置位置 ACALL SHOW_LINE2H 。顯示數(shù)據(jù)。。。。 MOV A, 0CEH 。設(shè)定顯示起始地址為第二行第15位 ACALL TEMP_BJ 。調(diào)用顯示溫度標(biāo)記子程序 MOV A,TEMP_TL 。加載TL數(shù)據(jù) MOV X, 12 。設(shè)置位置 ACALL SHOW_LINE2L 。顯示數(shù)據(jù) RETM_ALAX1: DBLOOK TH,amp。,TL DATA,0HM_ALAX2: DBTH: TL: ,0H。*******************************在LCD的第二行顯示高溫?cái)?shù)字********************SHOW_LINE2H: MOV B, 100 。設(shè)置被除數(shù)，B為百位數(shù) DIV AB 。除法運(yùn)算，結(jié)果A存商數(shù)，B存余數(shù) ADD A,30H 。低半字節(jié)加30得到ASCII碼 PUSH B 。B放入堆棧暫存起來(lái) MOV B,X 。設(shè)置LCD顯示的位置 ACALL LCDP2 。由LCD顯示出來(lái)。。。。 POP B 。B由堆棧取出來(lái) MOV A, 0AH 。A賦值10 XCH A,B 。A,B數(shù)據(jù)互換，B為十位數(shù) DIV AB 。除法運(yùn)算，結(jié)果A存入商數(shù)，B存余數(shù) ADD A, 30H 。轉(zhuǎn)換為字符 INC X 。LCD顯示位位置加1 PUSH B 。B放入堆棧暫存起來(lái) MOV B,X 。設(shè)置LCD顯示的位置 ACALL LCDP2 。由LCD顯示出來(lái)。。。。。 POP B 。B由堆棧取出來(lái) INC X 。LCD顯示位位置加1 MOV A,B 。B為個(gè)位數(shù) MOV B,X 。設(shè)置LCD顯示的位置 ADD A, 30H 。轉(zhuǎn)換為字符 ACALL LCDP2 。由LCD顯示出來(lái) RET 。************************************在LCD的第二行顯示低溫?cái)?shù)字***************SHOW_LINE2L: MOV B, 100 。設(shè)置被除數(shù) DIV AB 。除法運(yùn)算，結(jié)果A存商數(shù)，B存余數(shù) MOV A, 0AH 。A賦值10 XCH A, B 。A、B數(shù)據(jù)互換，B為十位數(shù) DIV AB 。除法運(yùn)算，結(jié)果A存商數(shù)，B存余數(shù) ADD A, 30H 。轉(zhuǎn)換為字符 PUSH B 。B壓入堆棧暫存起來(lái) MOV B, X 。設(shè)置LCD顯示的位置 ACALL LCDP2 。由LCD顯示出來(lái)。。。。 POP B 。B由堆棧取出來(lái) INC X 。LCD顯示位位置加1 MOV A, B 。B為個(gè)位數(shù) MOV B, X 。設(shè)置LCD顯示的位置 ADD A, 30H 。轉(zhuǎn)換為字符 ACALL LCDP2 。由LCD顯示出來(lái) RET。**************************溫度值比較子程序***********************。實(shí)際溫度值與標(biāo)記溫度值比較TEMP_COMP: MOV A,TEMP_TH 。高溫報(bào)警值送入A SUBB A,TEMP_ZH 。減數(shù)被減數(shù)，則 JC TCL1 。借位標(biāo)志位C=1,轉(zhuǎn)到TCL1 MOV A,TEMP_ZH 。實(shí)時(shí)溫度送入A SUBB A,TEMP_TL 。減數(shù)被減數(shù)，則 JC TCL2 。借位標(biāo)志位C=1,轉(zhuǎn)到TCL2 MOV DPTR,BJ5 。存表BJ5 ACALL TEMP_BJ3 。調(diào)用顯示高，低溫度及加熱標(biāo)記子程序 RET。**************************實(shí)時(shí)溫度高溫報(bào)警值的處理程序******************TCL1: MOV DPTR,BJ3 。存入BJ3表 ACALL TEMP_BJ3 。調(diào)用顯示高、低溫度及加熱標(biāo)記子程序 ACALL SPK_BZ 。調(diào)用鳴響子程序 RETTCL2: 。實(shí)時(shí)溫度高溫報(bào)警值的處理程序 MOV DPTR,BJ4 。存入BJ4表 ACALL TEMP_BJ3 。調(diào)用顯示高、低溫度及標(biāo)記子程序 ACALL SPK_BZ 。調(diào)用鳴響子程序 RET。*************************顯示高、低溫度及加熱標(biāo)記程序***************TEMP_BJ3: MOV A, 0CEH 。設(shè)定顯示位置 ACALL WR_COMM 。調(diào)用寫(xiě)指令子程序 MOV R1, 0 。使指針指到表中第一個(gè)碼 MOV R0, 2 。取碼次數(shù)BJJ: MOV A, R1 。A位0 MOVC A, @A+DPTR 。讀取碼 ACALL WR_DATA 。調(diào)用寫(xiě)數(shù)據(jù)子程序 INC R1 。R1增加1 DJNZ R0,BJJ 。判斷是否將代碼讀取完？ RETBJ3: DB HBJ4: DB LBJ5: DB !。*********************報(bào)警上下線寫(xiě)入暫存器子程序***************WR_THL: JB FLAG,WR_T 。 FLA