單片機(jī)原理及應(yīng)用課程設(shè)計(jì)溫度報(bào)警的設(shè)計(jì)-在線瀏覽
2025-03-05 11:06本頁面
【正文】 LCALL WRITE_E2PROC_K2: LCALL MENU_OK LCALL TEMP_BJPROC_END:RET。UP/DOWN 標(biāo)記AS00: JB ,ASZ01 。=0，減小ASZ01: JB K2,ASZ02 。TL值調(diào)整(增加) LCALL BEEP_BL INC TEMP_TL MOV A,TEMP_TL CJNE A,99,ASZ021 MOV TEMP_TL,00HASZ021: LCALL LOOK_ALARM MOV R5,10 LCALL DELAY JMP ASZ02ASZ03: JB K4,AS0 。TH值調(diào)整（減少） LCALL BEEP_BL DEC TEMP_TH MOV A,TEMP_TH CJNE A,0FFH,ASJ011 JMP ASJ022ASJ011: LCALL LOOK_ALARM MOV R5,10 LCALL DELAY JMP AS0ASJ02: JB K3,ASJ03 。 MOV R5,10 LCALL DELAY JMP AS0ASJ022: CPL JMP ASZ01ASJ03: JMP ASZ03 RETRST_A1: DB SET ALERT TEMP: ,0。減數(shù)被減數(shù)，則 JC CHULI1 。減數(shù)被減數(shù)，則 JC CHULI2 。點(diǎn)亮指示燈 RET CHULI1: MOV DPTR,BJ3 。熄滅指示燈 LCALL BEEP_BL 。小于設(shè)定最低溫度 LCALL TEMP_BJ3 cpl cpl RELAY 。蜂鳴器響 RET。 。指針指到顯示消息 MOV R1,0 MOV R0,2BBJJ1: MOV A,R1 MOVC A,A+DPTR LCALL WDATA INC R1 DJNZ R0,BBJJ1 RETBJ1: DB 00H,C。指針指到顯示消息 MOV A,1 。指針指到顯示消息 MOV A,2 。******************************** 顯示出錯(cuò)信息子程序 ***************************MENU_ERROR:MOV DPTR,M_ERROR1 。顯示在第一行 LCALL LCD_PRINT MOV DPTR,M_ERROR2 。顯示在第一行 LCALL LCD_PRINT RETM_ERROR1: DB DS18B20 ERROR ,0M_ERROR2: DB temp: ,0。主機(jī)發(fā)出延時(shí)復(fù)位低脈沖 MOV R1,04HTSR1: DJNZ R0,$ MOV R0,6BH DJNZ R1,TSR1 SETB DQ 。等待DS18B20回應(yīng) DJNZ R0,TSR2 JMP TSR4 。 置1標(biāo)志位,表示DS1820存在 JMP TSR5TSR4: CLR FLAG1 。 時(shí)序要求延時(shí)一段時(shí)間TSR7: SETB DQ RET。跳過ROM匹配 LCALL WRITEWR_SCRAPD: MOV A,4EH 。TH(報(bào)警上限） LCALL WRITE MOV A,TEMP_TL 。12位精度 LCALL WRITE RET。跳過ROM匹配 LCALL WRITE MOV A,48H 。*********************** 重讀EEROM子程序 ********************************READ_E2:LCALL RST MOV A,0CCH 。把EEROM里的溫度報(bào)警值拷貝回暫存器 LCALL WRITE RET。寫入數(shù)據(jù) INC R3 DJNZ R2,S_DATA RETD_DATA: DB 0CH,12H,12H,0CH,00H,00H,00H,00H。一共8位數(shù)據(jù) CLR CWR1: CLR DQ ?？偩€復(fù)位保持16微妙以上 RRC A 。寫入一位 MOV R3,3CH DJNZ R3,$ 。重新釋放總線 NOP DJNZ R2,WR1 。********************** DS18B20數(shù)據(jù)讀取操作子程序 **************************READ: MOV R4,4 。存入25H、26H、27H、28H單元RE00: MOV R2,8RE01: CLR CY SETB DQ NOP NOP CLR DQ 。開始讀總線釋放 MOV R3,09 。從DS18B20總線讀得一位 MOV R3,3CH DJNZ R3,$ 。把讀得的位值環(huán)移給A DJNZ R2,RE01 。************************ 溫度值 BCD 碼處理子程序 *************************CONVTEMP: MOV A,TEMPH 。溫度零上轉(zhuǎn) CLR C MOV A,TEMPL 。取反加1 ADD A,01H MOV TEMPL,A MOV A,TEMPH CPL A ADDC A,00H MOV TEMPH,A MOV TEMPHC,0BH 。正溫度標(biāo)志 MOV TEMPFC,0AHTEMPC11: MOV A,TEMPHC SWAP A MOV TEMPHC,A MOV A,TEMPL ANL A,0FH 。TEMPLC LOW=小數(shù)部分 BCD MOV A,TEMPL 。取出高四位 SWAP A MOV TEMPL,A MOV A,TEMPH 。重新組合 MOV TEMP_ZH,A LCALL HEX2BCD1 MOV TEMPL,A ANL A,0F0H SWAP A ORL A,TEMPHC 。TEMPLC HI = 個(gè)位數(shù) BCD ORL A,TEMPLC MOV TEMPLC,A MOV A,R4 JZ TEMPC12 ANL A,0FH SWAP A MOV R4,A MOV A,TEMPHC 。************************ 二十進(jìn)制轉(zhuǎn)換子程序 *****************************HEX2BCD1: MOV B,064H DIV AB MOV R4,A MOV
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1