📄 sz613.lst
字号:
0294 12038F 274 LCALL GET_LED234
0297 120178 275 LCALL Send74LS164
029A 120386 276 LCALL SELECT_LED4
029D 12039B 277 LCALL DELAY10MS
278
02A0 782A 279 MOV R0,#DISPBUF+0AH
02A2 12038F 280 LCALL GET_LED234
02A5 120178 281 LCALL Send74LS164
02A8 12037D 282 LCALL SELECT_LED3
02AB 12039B 283 LCALL DELAY10MS
02AE 6132 284 AJMP KFRET
285 ;显示 "月"
02B0 B7031E 286 KF3: CJNE @R1,#3,KF6
287
02B3 7827 288 MOV R0,#DISPBUF+7
02B5 12038F 289 LCALL GET_LED234
02B8 120178 290 LCALL Send74LS164
02BB 120374 291 LCALL SELECT_LED2
02BE 12039B 292 LCALL DELAY10MS
293
02C1 7828 294 MOV R0,#DISPBUF+8
02C3 120395 295 LCALL GET_LED1
02C6 120178 296 LCALL Send74LS164
02C9 12036B 297 LCALL SELECT_LED1
02CC 12039B 298 LCALL DELAY10MS
02CF 6132 299 AJMP KFRET
300 ;显示 "日"
02D1 B7061E 301 KF6: CJNE @R1,#6,KF9
302
02D4 7825 303 MOV R0,#DISPBUF+5
02D6 12038F 304 LCALL GET_LED234
02D9 120178 305 LCALL Send74LS164
02DC 120386 306 LCALL SELECT_LED4
02DF 12039B 307 LCALL DELAY10MS
308
02E2 7826 309 MOV R0,#DISPBUF+6
02E4 12038F 310 LCALL GET_LED234
02E7 120178 311 LCALL Send74LS164
02EA 12037D 312 LCALL SELECT_LED3
02ED 12039B 313 LCALL DELAY10MS
02F0 6132 314 AJMP KFRET
315 ;显示 "小时"
02F2 B7091E 316 KF9: CJNE @R1,#9,KFC
317
02F5 7823 318 MOV R0,#DISPBUF+3
02F7 12038F 319 LCALL GET_LED234
02FA 120178 320 LCALL Send74LS164
02FD 120374 321 LCALL SELECT_LED2
0300 12039B 322 LCALL DELAY10MS
A51 MACRO ASSEMBLER SZ613 06/16/2008 10:39:23 PAGE 6
323
0303 7824 324 MOV R0,#DISPBUF+4
0305 120395 325 LCALL GET_LED1
0308 120178 326 LCALL Send74LS164
030B 12036B 327 LCALL SELECT_LED1
030E 12039B 328 LCALL DELAY10MS
0311 6132 329 AJMP KFRET
330 ;显示 "分"
0313 B70C1C 331 KFC: CJNE @R1,#0CH,KFRET
332
0316 7821 333 MOV R0,#DISPBUF+1
0318 12038F 334 LCALL GET_LED234
031B 120178 335 LCALL Send74LS164
031E 120386 336 LCALL SELECT_LED4
0321 12039B 337 LCALL DELAY10MS
338
339
0324 7822 340 MOV R0,#DISPBUF+2
0326 12038F 341 LCALL GET_LED234
0329 120178 342 LCALL Send74LS164
032C 12037D 343 LCALL SELECT_LED3
032F 12039B 344 LCALL DELAY10MS
0332 345 KFRET:
0332 22 346 RET
347
0333 348 UPDATEDISPBUF: ;1秒钟重新为 "秒，分，小时" 重新填显示缓冲
0333 E531 349 MOV A, SECONDBUF
0335 75F00A 350 MOV B, #10
0338 84 351 DIV AB
0339 85F029 352 MOV DISPBUF+9, B
033C F52A 353 MOV DISPBUF+0AH, A
354
033E E532 355 MOV A, MINUTEBUF
0340 75F00A 356 MOV B, #10
0343 84 357 DIV AB
0344 85F021 358 MOV DISPBUF+1, B
0347 F522 359 MOV DISPBUF+2, A
360
0349 E533 361 MOV A, HOURBUF
034B 75F00A 362 MOV B, #10
034E 84 363 DIV AB
034F 85F023 364 MOV DISPBUF+3, B
0352 F524 365 MOV DISPBUF+4, A
366
0354 E534 367 MOV A, MONTHBUF
0356 75F00A 368 MOV B, #10
0359 84 369 DIV AB
035A 85F027 370 MOV DISPBUF+7, B
035D F528 371 MOV DISPBUF+8, A
372
035F E535 373 MOV A, DAYBUF
0361 75F00A 374 MOV B, #10
0364 84 375 DIV AB
0365 85F025 376 MOV DISPBUF+5, B
0368 F526 377 MOV DISPBUF+6, A
036A 22 378 RET
379
036B 380 SELECT_LED1:;选通数码管1
036B C293 381 CLR LED1
036D D294 382 SETB LED2
036F D296 383 SETB LED3
0371 D297 384 SETB LED4
0373 22 385 RET
386
0374 387 SELECT_LED2:;选通数码管1
0374 C294 388 CLR LED2
A51 MACRO ASSEMBLER SZ613 06/16/2008 10:39:23 PAGE 7
0376 D293 389 SETB LED1
0378 D296 390 SETB LED3
037A D297 391 SETB LED4
037C 22 392 RET
393
037D 394 SELECT_LED3:;选通数码管1
037D C296 395 CLR LED3
037F D293 396 SETB LED1
0381 D294 397 SETB LED2
0383 D297 398 SETB LED4
0385 22 399 RET
400
0386 401 SELECT_LED4:;选通数码管1
0386 C297 402 CLR LED4
0388 D293 403 SETB LED1
038A D294 404 SETB LED2
038C D296 405 SETB LED3
038E 22 406 RET
407
038F 408 GET_LED234:
038F 9003B9 409 MOV DPTR,#SAG_LED234
0392 E6 410 MOV A,@R0
0393 93 411 MOVC A,@A+DPTR
0394 22 412 RET
0395 413 GET_LED1:
0395 9003AE 414 MOV DPTR,#SAG_LED1
0398 E6 415 MOV A,@R0
0399 93 416 MOVC A,@A+DPTR
039A 22 417 RET
418
419
420
039B 421 DELAY10MS: ;延时10毫秒
039B 7F0A 422 MOV R7,#10
039D 7EC8 423 D53: MOV R6,#200
039F 424 D54:
039F 00 425 NOP
03A0 00 426 NOP
03A1 00 427 NOP
03A2 00 428 NOP
03A3 00 429 NOP
430
03A4 DEF9 431 DJNZ R6,D54
03A6 DFF5 432 DJNZ R7,D53
03A8 22 433 RET
434
435
03A9 436 DELAY10US:
03A9 7F05 437 MOV R7,#5
03AB DFFE 438 DJNZ R7,$
03AD 22 439 RET
440
03AE 441 SAG_LED1: ;LED1段码
03AE 50F934B0 442 DB 01010000b,11111001b,00110100b,10110000b,10011001b,10010010b,00010010b,11111000b,0001000
0b,10010000b,0ffh
03B2 999212F8
03B6 1090FF
03B9 443 SAG_LED234: ;LED234段码
03B9 C0F9A4B0 444 DB 11000000b,11111001b,10100100b,10110000b,10011001b,10010010b,10000010b,11111000b,1000000
0b,10010000b,0ffh
03BD 999282F8
03C1 8090FF
445 ; 0 1 2 3 4 5 6 7 8
9
03C4 446 TABLE_extra:
03C4 FEFDFBF7 447 DB 11111110B,11111101B,11111011B,11110111B,11101111B,11011111B,10111111B,0h,0ffh,0ffh,0ffh
A51 MACRO ASSEMBLER SZ613 06/16/2008 10:39:23 PAGE 8
03C8 EFDFBF00
03CC FFFFFF
448 END
A51 MACRO ASSEMBLER SZ613 06/16/2008 10:39:23 PAGE 9
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
BEEP . . . . . . . B ADDR 0090H.0 A
CLRDISPBUF . . . . C ADDR 0105H A
CLRDISPBUFLOOP . . C ADDR 0109H A
CLRSECONDBUF . . . C ADDR 019DH A
D53. . . . . . . . C ADDR 039DH A
D54. . . . . . . . C ADDR 039FH A
DAYADD . . . . . . C ADDR 01DFH A
DAYADD1. . . . . . C ADDR 01D2H A
DAYBUF . . . . . . N NUMB 0035H A
DELAY10MS. . . . . C ADDR 039BH A
DELAY10US. . . . . C ADDR 03A9H A
DISP . . . . . . . C ADDR 0210H A
DISPBUF. . . . . . N NUMB 0020H A
DISPFLAG . . . . . N NUMB 0040H A
DISPFLAGADD. . . . C ADDR 01A0H A
EA . . . . . . . . B ADDR 00A8H.7 A
ET0. . . . . . . . B ADDR 00A8H.1 A
F0 . . . . . . . . B ADDR 00D0H.5 A
GET_LED1 . . . . . C ADDR 0395H A
GET_LED234 . . . . C ADDR 038FH A
HADD1. . . . . . . C ADDR 016EH A
HOURADD. . . . . . C ADDR 01F0H A
HOURADD1 . . . . . C ADDR 01E3H A
HOURBUF. . . . . . N NUMB 0033H A
K1 . . . . . . . . C ADDR 0187H A
K1RET. . . . . . . C ADDR 01B1H A
K2 . . . . . . . . C ADDR 01B3H A
K2X. . . . . . . . C ADDR 0205H A
KEY1 . . . . . . . B ADDR 00B0H.5 A
KEY2 . . . . . . . B ADDR 00B0H.7 A
KEYINPUT . . . . . C ADDR 0184H A
KEYRET . . . . . . C ADDR 020FH A
KF0. . . . . . . . C ADDR 0215H A
KF1. . . . . . . . C ADDR 0252H A
KF2. . . . . . . . C ADDR 028FH A
KF3. . . . . . . . C ADDR 02B0H A
KF6. . . . . . . . C ADDR 02D1H A
KF9. . . . . . . . C ADDR 02F2H A
KFC. . . . . . . . C ADDR 0313H A
KFRET. . . . . . . C ADDR 0332H A
LED1 . . . . . . . B ADDR 0090H.3 A
LED2 . . . . . . . B ADDR 0090H.4 A
LED2DZ . . . . . . B ADDR 0090H.5 A
LED3 . . . . . . . B ADDR 0090H.6 A
LED4 . . . . . . . B ADDR 0090H.7 A
LOOP . . . . . . . C ADDR 0127H A
LS164_AB . . . . . B ADDR 00B0H.0 A
LS164_CLK. . . . . B ADDR 00B0H.1 A
MADD1. . . . . . . C ADDR 016AH A
MINADD . . . . . . C ADDR 0201H A
MINADD1. . . . . . C ADDR 01F4H A
MINUTEBUF. . . . . N NUMB 0032H A
MONADD . . . . . . C ADDR 01CEH A
MONADD1. . . . . . C ADDR 01C1H A
MONTHBUF . . . . . N NUMB 0034H A
MSCNT. . . . . . . N NUMB 0030H A
P1 . . . . . . . . D ADDR 0090H A
P3 . . . . . . . . D ADDR 00B0H A
A51 MACRO ASSEMBLER SZ613 06/16/2008 10:39:23 PAGE 10
PSW. . . . . . . . D ADDR 00D0H A
RET1 . . . . . . . C ADDR 0170H A
SADD1. . . . . . . C ADDR 0166H A
SAG_LED1 . . . . . C ADDR 03AEH A
SAG_LED234 . . . . C ADDR 03B9H A
SECONDBUF. . . . . N NUMB 0031H A
SELECT_LED1. . . . C ADDR 036BH A
SELECT_LED2. . . . C ADDR 0374H A
SELECT_LED3. . . . C ADDR 037DH A
SELECT_LED4. . . . C ADDR 0386H A
SEND2LS164_LOOP. . C ADDR 017AH A
SEND74LS164. . . . C ADDR 0178H A
SP . . . . . . . . D ADDR 0081H A
START. . . . . . . C ADDR 0100H A
TABLE_EXTRA. . . . C ADDR 03C4H A
TH0. . . . . . . . D ADDR 008CH A
TIMER0 . . . . . . C ADDR 012CH A
TL0. . . . . . . . D ADDR 008AH A
TMOD . . . . . . . D ADDR 0089H A
TR0. . . . . . . . B ADDR 0088H.4 A
UPDATEDISPBUF. . . C ADDR 0333H A
WAIT . . . . . . . C ADDR 01A6H A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -