📄 water heater.lst
字号:
A51 MACRO ASSEMBLER WATER_HEATER 12/08/2008 13:25:11 PAGE 1
MACRO ASSEMBLER A51 V7.07
OBJECT MODULE PLACED IN water heater.OBJ
ASSEMBLER INVOKED BY: D:\Program Files\keil\C51\BIN\A51.EXE water heater.a SET(SMALL) DEBUG EP
LOC OBJ LINE SOURCE
0000 1 ORG 0000H
0000 020016 2 LJMP MAIN1
0003 3 ORG 0003H
0003 0201A2 4 LJMP ZINT0
0013 5 ORG 0013H
0013 0201B1 6 LJMP ZINT1
0029 7 TMPL EQU 29H
0028 8 TMPH EQU 28H
0038 9 FLAG1 EQU 38H
00B7 10 DATAIN BIT P3.7
0016 D288 11 MAIN1: SETB IT0
0018 D2AF 12 SETB EA
001A D2A8 13 SETB EX0
001C D28A 14 SETB IT1
001E D2AA 15 SETB EX1
0020 D2B6 16 SETB P3.6
0022 D2B2 17 SETB P3.2
0024 757400 18 MOV 74H,#0
0027 757500 19 MOV 75H,#0
002A 757609 20 MOV 76H,#9
002D 757700 21 MOV 77H,#0
0030 120063 22 MAIN: LCALL GET_TEMPER
0033 1200C6 23 LCALL CVTTMP
0036 120133 24 LCALL DISP1
0039 0130 25 AJMP MAIN
003B 26 INIT_1820:
003B D2B7 27 SETB DATAIN
003D 00 28 NOP
003E C2B7 29 CLR DATAIN
0040 7903 30 MOV R1,#3
0042 786B 31 TSR1: MOV R0,#107
0044 D8FE 32 DJNZ R0,$
0046 D9FA 33 DJNZ R1,TSR1
0048 D2B7 34 SETB DATAIN
004A 00 35 NOP
004B 00 36 NOP
004C 00 37 NOP
004D 7825 38 MOV R0,#25H
004F 30B706 39 TSR2: JNB DATAIN,TSR3
0052 D8FB 40 DJNZ R0,TSR2
0054 C238 41 CLR FLAG1
0056 8008 42 SJMP TSR7
0058 D238 43 TSR3: SETB FLAG1
005A C297 44 CLR P1.7
005C 7875 45 MOV R0,#117
005E D8FE 46 TSR6: DJNZ R0,$
0060 D2B7 47 TSR7: SETB DATAIN
0062 22 48 RET
0063 49 GET_TEMPER:
0063 D2B7 50 SETB DATAIN
0065 12003B 51 LCALL INIT_1820
0068 203802 52 JB FLAG1,TSS2
006B 00 53 NOP
006C 22 54 RET
006D 74CC 55 TSS2: MOV A,#0CCH
006F 12008A 56 LCALL WRITE_1820
0072 7444 57 MOV A,#44H
0074 12008A 58 LCALL WRITE_1820
A51 MACRO ASSEMBLER WATER_HEATER 12/08/2008 13:25:11 PAGE 2
0077 3133 59 ACALL DISP1
0079 12003B 60 LCALL INIT_1820
007C 74CC 61 MOV A,#0CCH
007E 12008A 62 LCALL WRITE_1820
0081 74BE 63 MOV A,#0BEH
0083 12008A 64 LCALL WRITE_1820
0086 1200A2 65 LCALL READ_18200
0089 22 66 RET
008A 67 WRITE_1820:
008A 7A08 68 MOV R2,#8
008C C3 69 CLR C
008D C2B7 70 WR1: CLR DATAIN
008F 7B06 71 MOV R3,#6
0091 DBFE 72 DJNZ R3,$
0093 13 73 RRC A
0094 92B7 74 MOV DATAIN,C
0096 7B17 75 MOV R3,#23
0098 DBFE 76 DJNZ R3,$
009A D2B7 77 SETB DATAIN
009C 00 78 NOP
009D DAEE 79 DJNZ R2,WR1
009F D2B7 80 SETB DATAIN
00A1 22 81 RET
00A2 82 READ_18200:
00A2 7C02 83 MOV R4,#2
00A4 7929 84 MOV R1,#29H
00A6 7A08 85 RE00: MOV R2,#8H
00A8 C3 86 RE01: CLR C
00A9 D2B7 87 SETB DATAIN
00AB 00 88 NOP
00AC 00 89 NOP
00AD C2B7 90 CLR DATAIN
00AF 00 91 NOP
00B0 00 92 NOP
00B1 00 93 NOP
00B2 D2B7 94 SETB DATAIN
00B4 7B09 95 MOV R3,#9
00B6 DBFE 96 RE10: DJNZ R3,RE10
00B8 A2B7 97 MOV C,DATAIN
00BA 7B17 98 MOV R3,#23
00BC DBFE 99 RE20: DJNZ R3,RE20
00BE 13 100 RRC A
00BF DAE7 101 DJNZ R2,RE01
00C1 F7 102 MOV @R1,A
00C2 19 103 DEC R1
00C3 DCE1 104 DJNZ R4,RE00
00C5 22 105 RET
00C6 106 CVTTMP:
00C6 E528 107 MOV A,TMPH
00C8 5480 108 ANL A,#80H
00CA 6012 109 JZ TMPC1
00CC C3 110 CLR C
00CD E529 111 MOV A,TMPL
00CF F4 112 CPL A
00D0 2401 113 ADD A,#1
00D2 F529 114 MOV TMPL,A
00D4 E528 115 MOV A,TMPH
00D6 F4 116 CPL A
00D7 3400 117 ADDC A,#0
00D9 75730B 118 MOV 73H,#0BH
00DC 8003 119 SJMP TMPC11
00DE 75730A 120 TMPC1: MOV 73H,#0AH
00E1 E529 121 TMPC11:MOV A,TMPL
00E3 540F 122 ANL A,#0FH
00E5 900123 123 MOV DPTR,#TMPTAB
00E8 93 124 MOVC A,@A+DPTR
A51 MACRO ASSEMBLER WATER_HEATER 12/08/2008 13:25:11 PAGE 3
00E9 F570 125 MOV 70H,A
00EB E529 126 MOV A,TMPL
00ED 54F0 127 ANL A,#0F0H
00EF C4 128 SWAP A
00F0 F529 129 MOV TMPL,A
00F2 E528 130 MOV A,TMPH
00F4 540F 131 ANL A,#0FH
00F6 C4 132 SWAP A
00F7 4529 133 ORL A,TMPL
00F9 75F064 134 H2BCD: MOV B,#100
00FC 84 135 DIV AB
00FD 6002 136 JZ B2BCD1
00FF F573 137 MOV 73H,A
0101 740A 138 B2BCD1:MOV A,#10
0103 C5F0 139 XCH A,B
0105 84 140 DIV AB
0106 F572 141 MOV 72H,A
0108 85F071 142 MOV 71H,B
010B 00 143 TMPC12:NOP
010C E573 144 DISBCD:MOV A,73H
010E 540F 145 ANL A,#0FH
0110 B40102 146 CJNE A,#1,DISBCD0
0113 800D 147 SJMP DISBCD1
0115 E572 148 DISBCD0:MOV A,72H
0117 540F 149 ANL A,#0FH
0119 7007 150 JNZ DISBCD1
011B E573 151 MOV A,73H
011D F572 152 MOV 72H,A
011F 75730A 153 MOV 73H,#0AH
0122 22 154 DISBCD1:RET
0123 155 TMPTAB:
0123 00010102 156 DB 0,1,1,2,3,3,4,4,5,6,6,7,8,8,9,9
0127 03030404
012B 05060607
012F 08080909
0133 7970 157 DISP1: MOV R1,#70H
0135 7874 158 MOV R0,#74H
0137 7DFE 159 MOV R5,#0FEH
0139 7590FF 160 PLAY: MOV P1,#0FFH
013C ED 161 MOV A,R5
013D F5A0 162 MOV P2,A
013F E7 163 MOV A,@R1
0140 90018D 164 MOV DPTR,#TAB
0143 93 165 MOVC A,@A+DPTR
0144 F590 166 MOV P1,A
0146 E6 167 MOV A,@R0
0147 93 168 MOVC A,@A+DPTR
0148 F580 169 MOV P0,A
014A ED 170 MOV A,R5
014B 20E104 171 JB ACC.1,LOOP1
014E C297 172 CLR P1.7
0150 C287 173 CLR P0.7
0152 120199 174 LOOP1: LCALL DL1MS
0155 09 175 INC R1
0156 08 176 INC R0
0157 ED 177 MOV A,R5
0158 30E32B 178 JNB ACC.3,ENDOUT
015B 23 179 RL A
015C FD 180 MOV R5,A
015D E573 181 MOV A,73H
015F B40102 182 CJNE A,#1,DD2
0162 801A 183 SJMP LEDH
0164 E572 184 DD2: MOV A,72H
0166 B40A03 185 CJNE A,#0AH,DD3
0169 757200 186 MOV 72H,#0
016C E576 187 DD3: MOV A,76H
A51 MACRO ASSEMBLER WATER_HEATER 12/08/2008 13:25:11 PAGE 4
016E B57202 188 CJNE A,72H,DDH
0171 8004 189 SJMP DDL
0173 500D 190 DDH: JNC PLAY1
0175 8007 191 SJMP LEDH
0177 E575 192 DDL: MOV A,75H
0179 B57100 193 CJNE A,71H,DDL1
017C 5004 194 DDL1: JNC PLAY1
017E C2B6 195 LEDH: CLR P3.6
0180 80B7 196 SJMP PLAY
0182 D2B6 197 PLAY1: SETB P3.6
0184 80B3 198 SJMP PLAY
0186 7590FF 199 ENDOUT:MOV P1,#0FFH
0189 75A0FF 200 MOV P2,#0FFH
018C 22 201 RET
018D C0F9A4B0 202 TAB: DB 0C0H,0F9H,0A4H,0B0H,99H
0191 99
0192 9282F880 203 DB 92H,82H,0F8H,80H,90H,0FFH,0BFH
0196 90FFBF
0199 7E14 204 DL1MS: MOV R6,#14H
019B 7F64 205 DL1: MOV R7,#100
019D DFFE 206 DJNZ R7,$
019F DEFA 207 DJNZ R6,DL1
01A1 22 208 RET
01A2 C0E0 209 ZINT0: PUSH ACC
01A4 0575 210 INC 75H
01A6 E575 211 MOV A,75H
01A8 B40A03 212 CJNE A,#10,ZINT01
01AB 757500 213 MOV 75H,#0
01AE D0E0 214 ZINT01:POP ACC
01B0 32 215 RETI
01B1 C0E0 216 ZINT1: PUSH ACC
01B3 0576 217 INC 76H
01B5 E576 218 MOV A,76H
01B7 B40A03 219 CJNE A,#10,ZINT11
01BA 757600 220 MOV 76H,#0
01BD D0E0 221 ZINT11:POP ACC
01BF 32 222 RETI
01C0 90018D 223 ZZZ1: MOV DPTR,#TAB
01C3 93 224 MOVC A,@A+DPTR
01C4 F580 225 MOV P0,A
01C6 32 226 RETI
227 END
A51 MACRO ASSEMBLER WATER_HEATER 12/08/2008 13:25:11 PAGE 5
SYMBOL TABLE LISTING
------ ----- -------
N A M E T Y P E V A L U E ATTRIBUTES
ACC. . . . . . . . D ADDR 00E0H A
B. . . . . . . . . D ADDR 00F0H A
B2BCD1 . . . . . . C ADDR 0101H A
CVTTMP . . . . . . C ADDR 00C6H A
DATAIN . . . . . . B ADDR 00B0H.7 A
DD2. . . . . . . . C ADDR 0164H A
DD3. . . . . . . . C ADDR 016CH A
DDH. . . . . . . . C ADDR 0173H A
DDL. . . . . . . . C ADDR 0177H A
DDL1 . . . . . . . C ADDR 017CH A
DISBCD . . . . . . C ADDR 010CH A
DISBCD0. . . . . . C ADDR 0115H A
DISBCD1. . . . . . C ADDR 0122H A
DISP1. . . . . . . C ADDR 0133H A
DL1. . . . . . . . C ADDR 019BH A
DL1MS. . . . . . . C ADDR 0199H A
EA . . . . . . . . B ADDR 00A8H.7 A
ENDOUT . . . . . . C ADDR 0186H A
EX0. . . . . . . . B ADDR 00A8H.0 A
EX1. . . . . . . . B ADDR 00A8H.2 A
FLAG1. . . . . . . N NUMB 0038H A
GET_TEMPER . . . . C ADDR 0063H A
H2BCD. . . . . . . C ADDR 00F9H A
INIT_1820. . . . . C ADDR 003BH A
IT0. . . . . . . . B ADDR 0088H.0 A
IT1. . . . . . . . B ADDR 0088H.2 A
LEDH . . . . . . . C ADDR 017EH A
LOOP1. . . . . . . C ADDR 0152H A
MAIN . . . . . . . C ADDR 0030H A
MAIN1. . . . . . . C ADDR 0016H A
P0 . . . . . . . . D ADDR 0080H A
P1 . . . . . . . . D ADDR 0090H A
P2 . . . . . . . . D ADDR 00A0H A
P3 . . . . . . . . D ADDR 00B0H A
PLAY . . . . . . . C ADDR 0139H A
PLAY1. . . . . . . C ADDR 0182H A
RE00 . . . . . . . C ADDR 00A6H A
RE01 . . . . . . . C ADDR 00A8H A
RE10 . . . . . . . C ADDR 00B6H A
RE20 . . . . . . . C ADDR 00BCH A
READ_18200 . . . . C ADDR 00A2H A
TAB. . . . . . . . C ADDR 018DH A
TMPC1. . . . . . . C ADDR 00DEH A
TMPC11 . . . . . . C ADDR 00E1H A
TMPC12 . . . . . . C ADDR 010BH A
TMPH . . . . . . . N NUMB 0028H A
TMPL . . . . . . . N NUMB 0029H A
TMPTAB . . . . . . C ADDR 0123H A
TSR1 . . . . . . . C ADDR 0042H A
TSR2 . . . . . . . C ADDR 004FH A
TSR3 . . . . . . . C ADDR 0058H A
TSR6 . . . . . . . C ADDR 005EH A
TSR7 . . . . . . . C ADDR 0060H A
TSS2 . . . . . . . C ADDR 006DH A
WR1. . . . . . . . C ADDR 008DH A
WRITE_1820 . . . . C ADDR 008AH A
ZINT0. . . . . . . C ADDR 01A2H A
ZINT01 . . . . . . C ADDR 01AEH A
ZINT1. . . . . . . C ADDR 01B1H A
ZINT11 . . . . . . C ADDR 01BDH A
A51 MACRO ASSEMBLER WATER_HEATER 12/08/2008 13:25:11 PAGE 6
ZZZ1 . . . . . . . C ADDR 01C0H A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -