水溫控制程序

1、ORG 0000HLJMP MAIN1ORG 0003HLJMP ZINT0ORG 0013HLJMP ZINT1TMPL EQU 29HTMPH EQU 28HFLAG1 EQU 38HMAIN1: S ETB IT0SETB EASETB EX0SETB IT1SETB EX1MOV 74H,#0MOV 75H,#0MOV 76H,#9MOV 77,#0MAIN: LCALL GET_TEMPER LCALL CVTTMPLCALL DISP1AJMP MAININIT_1820: SETB DA TAINNOPCLR DA TAINMOV R1,#3TSR1: MOV R0,#107DJ

2、NZ R0,$DJNZ R1,TSR1SETB DA TAINNOPNOPNOPMOV R0,#25HTSR2: JNB DA TAIN,TSR3DJNZ R0,TSR2CLR FLAG1SJMP TSR7TSR3: SETB FLAG1MOV R0,#117TSR6: DJNZ R0,$TSR7: SETB DA TAIN RETGET_TEMPER:SETB DA TAINLCALL INIT_1820JB FLAG1,TSS2NOPRETTSS2: MOV A,#0CCH LCALL WRITE_1820MOV A,#44HLCALL WRITE_1820ACALL DISP1LCALL

3、 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: MOV R2,#8RE01: CLR CSETB DA TAIN NOPNOPCLR

4、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,#0BHSJMP TMPC11TMPC1: MOV 73H,#0AH TMPC11

5、: 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,#0FHCJNE A,#1,DISBCD0SJMP DISBCD1DISBCD0: M

6、OV 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,AMOV A,R5JB ACC.1,LOOP1LOOP1: LCALL DL1MS

7、INC 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 PLAY1SJMP PLAYSJMP 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: PUS