📄 text1.lst
字号:
147
00D1 8847 148 JJ2: MOV 47H, R0
00D3 D0F0 149 POP B
00D5 D0D0 150 POP PSW
00D7 D0E0 151 POP ACC
152
00D9 22 153 RET
154
155 ;************************************
156 ;* 两字节无符号数乘法程序 *
157 ;************************************
158 ;R7R6R5R4<=R3R2*R1R0
159 ;16次叠加R3R2运算，主要是移位
00DA E4 160 MUL2BY2: CLR A
00DB FF 161 MOV R7, A
00DC FE 162 MOV R6, A
00DD FD 163 MOV R5, A
00DE FC 164 MOV R4, A
00DF 754C10 165 MOV 4CH, #10H
00E2 C3 166 MULLOOP1:CLR C
00E3 EC 167 MOV A, R4
00E4 33 168 RLC A
00E5 FC 169 MOV R4, A
00E6 ED 170 MOV A, R5
00E7 33 171 RLC A
00E8 FD 172 MOV R5, A
00E9 EE 173 MOV A, R6
00EA 33 174 RLC A
00EB FE 175 MOV R6, A
00EC EF 176 MOV A, R7
00ED 33 177 RLC A
00EE FF 178 MOV R7, A
00EF E8 179 MOV A, R0
00F0 33 180 RLC A
00F1 F8 181 MOV R0, A
00F2 E9 182 MOV A, R1
00F3 33 183 RLC A
00F4 F9 184 MOV R1, A
00F5 500E 185 JNC MULLOOP2
00F7 EC 186 MOV A, R4
00F8 2A 187 ADD A, R2
A51 MACRO ASSEMBLER TEXT1 05/17/2008 11:42:36 PAGE 4
00F9 FC 188 MOV R4, A
00FA ED 189 MOV A, R5
00FB 3B 190 ADDC A, R3
00FC FD 191 MOV R5, A
00FD EE 192 MOV A, R6
00FE 3400 193 ADDC A, #00H
0100 FE 194 MOV R6, A
0101 EF 195 MOV A, R7
0102 3400 196 ADDC A, #00H
0104 FF 197 MOV R7, A
0105 D54CDA 198 MULLOOP2:DJNZ 4CH, MULLOOP1
199
0108 22 200 RET
201
202
203 ;**************************************
204 ;* 四字节/两字节无符号数除法程序 *
205 ;**************************************
206 ;R7R6R5R4/R3R2=R7R6R5R4(商)......R1R0(余数)
207
0109 754C20 208 DIV4BY2: MOV 4CH, #20H
010C 7800 209 MOV R0, #00H
010E 7900 210 MOV R1, #00H
211
0110 EC 212 DIVLOOP1:MOV A, R4
0111 33 213 RLC A
0112 FC 214 MOV R4, A
0113 ED 215 MOV A, R5
0114 33 216 RLC A
0115 FD 217 MOV R5, A
0116 EE 218 MOV A, R6
0117 33 219 RLC A
0118 FE 220 MOV R6, A
0119 EF 221 MOV A, R7
011A 33 222 RLC A
011B FF 223 MOV R7, A
011C E8 224 MOV A, R0
011D 33 225 RLC A
011E F8 226 MOV R0, A
011F E9 227 MOV A, R1
0120 33 228 RLC A
0121 F9 229 MOV R1, A
0122 C3 230 CLR C
0123 E8 231 MOV A, R0
0124 9A 232 SUBB A, R2
0125 F5F0 233 MOV B, A
0127 E9 234 MOV A, R1
0128 9B 235 SUBB A, R3
0129 4003 236 JC DIVLOOP2
012B A8F0 237 MOV R0, B
012D F9 238 MOV R1, A
239
012E B3 240 DIVLOOP2:CPL C
012F D54CDE 241 DJNZ 4CH, DIVLOOP1
0132 EC 242 MOV A, R4
0133 33 243 RLC A
0134 FC 244 MOV R4, A
0135 ED 245 MOV A, R5
0136 33 246 RLC A
0137 FD 247 MOV R5, A
0138 EE 248 MOV A, R6
0139 33 249 RLC A
013A FE 250 MOV R6, A
013B EF 251 MOV A, R7
013C 33 252 RLC A
013D FF 253 MOV R7, A
A51 MACRO ASSEMBLER TEXT1 05/17/2008 11:42:36 PAGE 5
254
013E 22 255 RET
256 END
A51 MACRO ASSEMBLER TEXT1 05/17/2008 11:42:36 PAGE 6
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
CLEARDISP. . . . . C ADDR 000DH A
DISPLAY. . . . . . C ADDR 003FH A
DIV4BY2. . . . . . C ADDR 0109H A
DIVLOOP1 . . . . . C ADDR 0110H A
DIVLOOP2 . . . . . C ADDR 012EH A
DL1. . . . . . . . C ADDR 006FH A
DL1MS. . . . . . . C ADDR 006DH A
DL2. . . . . . . . C ADDR 0071H A
EA . . . . . . . . B ADDR 00A8H.7 A
ENDOUT . . . . . . C ADDR 005BH A
EX0. . . . . . . . B ADDR 00A8H.0 A
JJ0. . . . . . . . C ADDR 009DH A
JJ1. . . . . . . . C ADDR 00B7H A
JJ2. . . . . . . . C ADDR 00D1H A
MUL2BY2. . . . . . C ADDR 00DAH A
MULLOOP1 . . . . . C ADDR 00E2H A
MULLOOP2 . . . . . C ADDR 0105H A
P0 . . . . . . . . D ADDR 0080H A
P1 . . . . . . . . D ADDR 0090H A
P2 . . . . . . . . D ADDR 00A0H A
P3 . . . . . . . . D ADDR 00B0H A
PINT0. . . . . . . C ADDR 0032H A
PLAY . . . . . . . C ADDR 0043H A
PSW. . . . . . . . D ADDR 00D0H A
PX0. . . . . . . . B ADDR 00B8H.0 A
SP . . . . . . . . D ADDR 0081H A
START. . . . . . . C ADDR 0006H A
START1 . . . . . . C ADDR 0027H A
TABLE. . . . . . . C ADDR 0062H A
VOUT . . . . . . . B ADDR 00B0H.0 A
WORK . . . . . . . C ADDR 0076H A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -