單片機(jī)上下限溫度報(bào)警器課程設(shè)計(jì)(已改無錯(cuò)字)
2023-02-16 11:06:52 本頁面
【正文】 MOV TEMP_TH ,30H 。判斷是否有控制鍵按下 MOV TEMP_TL ,25H KEY1: JNB ,S1 JNB ,S2 LCALL GET_TEMPER LCALL TEMPER_COV LCALL TBCD_DISP LCALL DISPLAY LCALL ALLERT LJMP KEY1S1: LCALL DELAY3 。去抖動(dòng) JB ,KEY1 MOV A,TEMP_TH ADD A,1 DA A MOV TEMP_TH,A CJNE A,99H,J0 MOV TEMP_TH,0S2: LCALL DELAY3 JB ,KEY1 MOV A,TEMP_TL ADD A,1 DA A MOV TEMP_TL,A CJNE A,99H,J1 MOV TEMP_TL,0 LJMP KEY1。等待按鍵抬起J0: JB ,KEY1 LCALL LOOK_ALARM SJMP J0J1: JB ,KEY1 LCALL LOOK_ALARM SJMP J1LOOK_ALARM: MOV A,TEMP_TH 。加載TH數(shù)據(jù) MOV TEMP_TH,A ANL A,0FH MOV 63H,A MOV A,TEMP_TH ANL A,0F0H SWAP A MOV 64H,A MOV A,TEMP_TL 。加載TL數(shù)據(jù) MOV TEMP_TL ANL A,0FH MOV 65H,A MOV A,TEMP_TL ANL A,0F0H SWAP A MOV 66H,A CALL DISPLAY 。顯示數(shù)據(jù) RET。==========================================================。 顯示子程序。========================================================== DISPLAY: MOV R0,66H MOV R2,4 MOV A,@R0 ORL A,20H MOV P1,A DEC R0 LCALL WAIT MOV A,@R0 ORL A,10H MOV P1,A DEC R0 LCALL WAIT MOV A,@R0 ORL A,80H MOV P1,A DEC R0 LCALL WAIT MOV A,@R0 ORL A,40H MOV P1,A LCALL WAIT RET 。====================================。讀出轉(zhuǎn)換后的溫度值。====================================GET_TEMPER: SETB DQBCD:LCALL INIT_1820 JB FLAG,S22 LJMP BCDS22:LCALL DELAY1 MOV A,0CCH LCALL WRITE_1820 MOV A,44H LCALL WRITE_1820 NOP LCALL DELAY LCALL DELAYCBA:LCALL INIT_1820 JB FLAG,ABC LJMP CBAABC:LCALL DELAY1 MOV A,0CCH LCALL WRITE_1820 MOV A,0BEH LCALL WRITE_1820 LCALL READ_1820。READ_1820 RET。寫DS18B20的程序WRITE_1820: MOV R2,8 CLR CWR1: 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 RETREAD_1820: MOV R4,2 。將溫度高地位讀出 MOV R1,36H 。地位存入36H RE00: MOV R2,8 RE01: CLR C SETB DQ 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 。 將ds18b2
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1