水溫控制程序

1、ORG 0000HLJMP MAIN1ORG 0003HLJMP ZINT0ORG 0013HLJMP ZINT1TMPL EQU 29HTMPH EQU 28HFLAG1 EQU 38HDA TAIN BIT P3.7MAIN1: S ETB IT0SETB EASETB EX0SETB IT1SETB EX1SETB P3.6SETB P3.2MOV 74H,#0MOV 75H,#0MOV 76H,#9MOV 77,#0MAIN: LCALL GET_TEMPER LCALL CVTTMPLCALL DISP1AJMP MAININIT_1820: SETB DA TAINNOPCLR D

2、A TAINMOV R1,#3TSR1: MOV R0,#107DJNZ R0,$DJNZ R1,TSR1SETB DA TAINNOPNOPNOPMOV R0,#25HTSR2: JNB DA TAIN,TSR3DJNZ R0,TSR2CLR FLAG1SJMP TSR7TSR3: SETB FLAG1CLR P1.7MOV R0,#117TSR6: DJNZ R0,$TSR7: SETB DA TAIN RETGET_TEMPER:SETB DA TAINLCALL INIT_1820JB FLAG1,TSS2NOPRETTSS2: MOV A,#0CCH LCALL WRITE_1820

3、MOV A,#44HLCALL WRITE_1820ACALL DISP1LCALL INIT_1820MOV A,#0CCHLCALL WRITE_1820MOV A,#0BEHLCALL WRITE_1820LCALL READ_18200RETWRITE_1820:MOV R2,#8CLR CWR1: CLR DA TAINMOV R3,#6DJNZ R3,$RRC AMOV DA TAIN,CMOV R3,#23DJNZ R3,$SETB DA TAINNOPDJNZ R2,WR1SETB DA TAINRETREAD_18200:MOV R4,#2MOV R1,#29HRE00: M

4、OV R2,#8RE01: CLR CSETB DA TAIN NOPNOPCLR DA TAINNOPNOPNOPSETB DA TAINMOV R3,#9RE10: DJNZ R3,RE10MOV C,DA TAINMOV R3,#23RE20: DJNZ R3,RE20RRC ADJNZ R2,RE01MOV R1,ADEC R1DJNZ R4,RE00RETCVTTMP: MOV A,TMPH ANL A,#80HJZ TMPC1CLR CMOV A,TMPLCPL AADD A,#1MOV TMPL,AMOV A,TMPHCPL AADDC A,#0MOV TMPH,AMOV 73H

5、,#0BHSJMP TMPC11TMPC1: MOV 73H,#0AH TMPC11: MOV A,TMPLANL A,#0FHMOV DPTR,#TMPTABMOVC A,A+DPTRMOV 70H,AMOV A,TMPLANL A,#0F0HSW AP AMOV TMPL,AMOV A,TMPHANL A,#0FHSW AP AORL A,TMPLH2BCD: MOV B,#100DIV ABJZ B2BCD1MOV 73H,AB2BCD1: MOV A,#10XCH A,BDIV ABMOV 72H,AMOV 71H,BTMPC12:NOPDISBCD: MOV A,73HANL A,#

6、0FHCJNE A,#1,DISBCD0SJMP DISBCD1DISBCD0: MOV A,72HANL A,#0FHJNZ DISBCD1MOV A,73HMOV 72H,AMOV 73H,#0AHDISBCD1: RETTMPTAB:DB 0,1,1,2,3,3,4,4,5,6,6,7,8,8,9,9 DISP1: MOV R1,#70HMOV R0,#74HMOV R5,#0FEHPLA Y: MOV P1,#0FFHMOV A,R5MOV P2,AMOV A,R1MOV DPTR,#TABMOVC A,A+DPTRMOV P1,AMOV A,R0MOVC A,A+DPTRMOV P0

7、,AMOV A,R5JB ACC.1,LOOP1CLR P1.7CLR P0.7LOOP1: LCALL DL1MSINC R1INC R0MOV A,R5JNB ACC.3,ENDOUTRL AMOV R5,AMOV A,73HCJNE A,#1,DD2SJMP LEDHDD2: MOV A,72HCJNE A,#0AH,DD3MOV 72H,#0DD3: MOV A,76HCJNE A,72H,DDHSJMP DDLDDH: JNC PLAY1SJMP LEDHDDL: MOV A,75HCJNE A,71H,DDL1SJMP LEDHDDL1: JNC PLAY1LEDH: CLR P3.6SJMP PLAYPLA Y1: SETB P3.6SJMP PLAYENDOUT: MOV P1,#0FFHMOV P2,#0FFHRETTAB: DB 0C0H,0F9H,0A4H,0B0H,99HDB 92H,82H,0F8H,80H,90H,0FFH,0BFH DL1MS: MOV R6,#14HDL1: MOV R7,#100DJNZ R7,$DJNZ R6,DL1RETZINT0: PUSH ACCINC 75HMOV A,75HCJNE A,#10,ZINT01MOV 75H,#0ZINT01: POP ACCRETIZINT1