📄 demo_led_0809.lst
字号:
033C 753900 264 MOV MIN,#00H
033F D297 265 SETB BEEP
0341 1203A7 266 LCALL DEL
0344 C297 267 CLR BEEP
0346 2157 268 JMP WAIT_KEYL1
0348 0539 269 SW3_OVER:INC MIN ;分加1
034A D297 270 SETB BEEP
034C 1203A7 271 LCALL DEL
034F C297 272 CLR BEEP
0351 2157 273 JMP WAIT_KEYL1
274
0353 E539 275 SW4_OK: MOV A,MIN
0355 B4000C 276 CJNE A,#00,SW4_OVER
0358 75393B 277 MOV MIN,#59
035B D297 278 SETB BEEP
035D 1203A7 279 LCALL DEL
0360 C297 280 CLR BEEP
0362 2157 281 JMP WAIT_KEYL1
0364 1539 282 SW4_OVER:DEC MIN ;分减1
0366 D297 283 SETB BEEP
0368 1203A7 284 LCALL DEL
036B C297 285 CLR BEEP
036D 2157 286 JMP WAIT_KEYL1
287
036F E53A 288 SW5_OK: MOV A,SEC
0371 B43B0C 289 CJNE A,#59,SW5_OVER
0374 753A00 290 MOV SEC,#00H
0377 D297 291 SETB BEEP
0379 1203A7 292 LCALL DEL
037C C297 293 CLR BEEP
037E 2157 294 JMP WAIT_KEYL1
0380 053A 295 SW5_OVER:INC SEC ;秒加1
0382 D297 296 SETB BEEP
0384 1203A7 297 LCALL DEL
0387 C297 298 CLR BEEP
0389 2157 299 JMP WAIT_KEYL1
300
038B E53A 301 SW6_OK: MOV A,SEC
038D B4000C 302 CJNE A,#00,SW6_OVER
0390 75383B 303 MOV HOR,#59
0393 D297 304 SETB BEEP
0395 1203A7 305 LCALL DEL
0398 C297 306 CLR BEEP
039A 2157 307 JMP WAIT_KEYL1
039C 153A 308 SW6_OVER:DEC SEC ;时减1
039E D297 309 SETB BEEP
03A0 1203A7 310 LCALL DEL
03A3 C297 311 CLR BEEP
03A5 2157 312 JMP WAIT_KEYL1
313
03A7 7DFF 314 DEL: MOV R5,#0FFH
03A9 DDFE 315 DJNZ R5,$
03AB 7DFF 316 MOV R5,#0FFH
03AD DDFE 317 DJNZ R5,$
03AF 22 318 RET
319
03B0 7F04 320 DEL1S: MOV R7,#04
03B2 7EC8 321 DEL1S0: MOV R6,#200
03B4 7DFF 322 DEL1S1: MOV R5,#0FFH
A51 MACRO ASSEMBLER DEMO_LED_0809 05/30/2006 11:28:13 PAGE 6
03B6 DDFE 323 DJNZ R5,$
03B8 DEFA 324 DJNZ R6,DEL1S1
03BA DFF6 325 DJNZ R7,DEL1S0
03BC 22 326 RET
327
328
329 ;------------- T0 INTRRUPT 数码管扫描定时中断---------------------------
03BD C0E0 330 T0_INT: PUSH ACC
03BF C0D0 331 PUSH PSW
03C1 C083 332 PUSH DPH
03C3 C082 333 PUSH DPL
03C5 758CF6 334 MOV TH0,#HIGH(65536-2500) ;T0=2.5MS
03C8 758A3C 335 MOV TL0,#LOW(65536-2500)
03CB 052A 336 INC BUFF_LED_LP
03CD E52A 337 MOV A,BUFF_LED_LP
03CF B40803 338 CJNE A,#08,CON_INT0
03D2 752A00 339 MOV BUFF_LED_LP,#00H
03D5 E52A 340 CON_INT0: MOV A,BUFF_LED_LP
03D7 23 341 RL A
03D8 9003DC 342 MOV DPTR,#TAB_SCAN
03DB 73 343 JMP @A+DPTR
03DC 61EC 344 TAB_SCAN: AJMP SCAN_L1
03DE 61F7 345 AJMP SCAN_L2
03E0 8102 346 AJMP SCAN_L3
03E2 810D 347 AJMP SCAN_L4
03E4 8118 348 AJMP SCAN_L5
03E6 8123 349 AJMP SCAN_L6
03E8 812E 350 AJMP SCAN_L7
03EA 8139 351 AJMP SCAN_L8
03EC C292 352 SCAN_L1: CLR DIG_A
03EE C293 353 CLR DIG_B
03F0 C294 354 CLR DIG_C
03F2 E522 355 MOV A,BUFF_LED1 ;(000)
03F4 020441 356 JMP END_SCAN
03F7 D292 357 SCAN_L2: SETB DIG_A
03F9 C293 358 CLR DIG_B
03FB C294 359 CLR DIG_C
03FD E523 360 MOV A,BUFF_LED2 ;(100)
03FF 020441 361 JMP END_SCAN
0402 D292 362 SCAN_L3: SETB DIG_A
0404 D293 363 SETB DIG_B
0406 C294 364 CLR DIG_C
0408 E525 365 MOV A,BUFF_LED4 ;(110)
040A 020441 366 JMP END_SCAN
040D D292 367 SCAN_L4: SETB DIG_A
040F D293 368 SETB DIG_B
0411 D294 369 SETB DIG_C
0413 E529 370 MOV A,BUFF_LED8 ;(111)
0415 020441 371 JMP END_SCAN
0418 D292 372 SCAN_L5: SETB DIG_A
041A C293 373 CLR DIG_B
041C D294 374 SETB DIG_C
041E E527 375 MOV A,BUFF_LED6 ;(101)
0420 020441 376 JMP END_SCAN
0423 C292 377 SCAN_L6: CLR DIG_A
0425 C293 378 CLR DIG_B
0427 D294 379 SETB DIG_C
0429 E526 380 MOV A,BUFF_LED5 ;(001)
042B 020441 381 JMP END_SCAN
042E C292 382 SCAN_L7: CLR DIG_A
0430 D293 383 SETB DIG_B
0432 D294 384 SETB DIG_C
0434 E528 385 MOV A,BUFF_LED7 ;(011)
0436 020441 386 JMP END_SCAN
0439 C292 387 SCAN_L8: CLR DIG_A
043B D293 388 SETB DIG_B
A51 MACRO ASSEMBLER DEMO_LED_0809 05/30/2006 11:28:13 PAGE 7
043D C294 389 CLR DIG_C
043F E524 390 MOV A,BUFF_LED3 ;(010)
391
0441 900451 392 END_SCAN: MOV DPTR,#TAB_LED
0444 93 393 MOVC A,@A+DPTR
0445 120463 394 LCALL SEND164
0448 D082 395 EXIT_T0: POP DPL
044A D083 396 POP DPH
044C D0D0 397 POP PSW
044E D0E0 398 POP ACC
0450 32 399 RETI
400
0451 C0F9A4B0 401 TAB_LED: DB 0C0H,0F9H,0A4H,0B0H,99H,92H ;数码管显示字型表
0455 9992
0457 82F88090 402 DB 82H,0F8H,80H,90H,88H,83H,0A7H
045B 8883A7
045E A1868EBF 403 DB 0A1H,86H,8EH,0BFH,0FFH
0462 FF
404
0463 752B08 405 SEND164: MOV BUFF_164,#08 ;发送数据到74164
0466 C0E0 406 PUSH ACC
0468 C291 407 SND164_LP:CLR CLK164
046A 33 408 RLC A
046B 9290 409 MOV DAT164,C
046D D291 410 SETB CLK164
046F D52BF6 411 DJNZ BUFF_164,SND164_LP
0472 D0E0 412 POP ACC
0474 22 413 RET
414
415 END
A51 MACRO ASSEMBLER DEMO_LED_0809 05/30/2006 11:28:13 PAGE 8
SYMBOL TABLE LISTING
------ ----- -------
N A M E T Y P E V A L U E ATTRIBUTES
ACC. . . . . . . . D ADDR 00E0H A
ADD_0809 . . . . . N NUMB 9000H A
B. . . . . . . . . D ADDR 00F0H A
BEEP . . . . . . . B ADDR 0090H.7 A
BUFF_164 . . . . . N NUMB 002BH A
BUFF_GRN . . . . . N NUMB 0032H A
BUFF_KEY . . . . . N NUMB 0021H A
BUFF_LED1. . . . . N NUMB 0022H A
BUFF_LED2. . . . . N NUMB 0023H A
BUFF_LED3. . . . . N NUMB 0024H A
BUFF_LED4. . . . . N NUMB 0025H A
BUFF_LED5. . . . . N NUMB 0026H A
BUFF_LED6. . . . . N NUMB 0027H A
BUFF_LED7. . . . . N NUMB 0028H A
BUFF_LED8. . . . . N NUMB 0029H A
BUFF_LED_LP. . . . N NUMB 002AH A
BUFF_RED . . . . . N NUMB 0030H A
BUFF_STEP. . . . . N NUMB 0033H A
BUFF_T0. . . . . . N NUMB 002CH A
BUFF_YEL . . . . . N NUMB 0031H A
CLK164 . . . . . . B ADDR 0090H.1 A
CLR_RAM. . . . . . C ADDR 0108H A
CON_INT0 . . . . . C ADDR 03D5H A
CS_0809. . . . . . N NUMB 9000H A
DAT164 . . . . . . B ADDR 0090H.0 A
DEL. . . . . . . . C ADDR 03A7H A
DEL1S. . . . . . . C ADDR 03B0H A
DEL1S0 . . . . . . C ADDR 03B2H A
DEL1S1 . . . . . . C ADDR 03B4H A
DIG_A. . . . . . . B ADDR 0090H.2 A
DIG_B. . . . . . . B ADDR 0090H.3 A
DIG_C. . . . . . . B ADDR 0090H.4 A
DPH. . . . . . . . D ADDR 0083H A
DPL. . . . . . . . D ADDR 0082H A
EA . . . . . . . . B ADDR 00A8H.7 A
END_SCAN . . . . . C ADDR 0441H A
ET0. . . . . . . . B ADDR 00A8H.1 A
EXIT_T0. . . . . . C ADDR 0448H A
GRN_VAL. . . . . . N NUMB 001EH A
HOR. . . . . . . . N NUMB 0038H A
KEYL1. . . . . . . B ADDR 0090H.5 A
KEYL2. . . . . . . B ADDR 0090H.6 A
KS1. . . . . . . . C ADDR 0195H A
KS10 . . . . . . . C ADDR 0264H A
KS11 . . . . . . . C ADDR 026FH A
KS12 . . . . . . . C ADDR 0286H A
KS13 . . . . . . . C ADDR 029DH A
KS14 . . . . . . . C ADDR 02B4H A
KS15 . . . . . . . C ADDR 02CBH A
KS16 . . . . . . . C ADDR 02E2H A
KS2. . . . . . . . C ADDR 01ACH A
KS3. . . . . . . . C ADDR 01C3H A
KS4. . . . . . . . C ADDR 01DAH A
KS5. . . . . . . . C ADDR 01F1H A
KS6. . . . . . . . C ADDR 0208H A
KS7. . . . . . . . C ADDR 021FH A
KS8. . . . . . . . C ADDR 0236H A
KS9. . . . . . . . C ADDR 024DH A
MAIN . . . . . . . C ADDR 0100H A
MIN. . . . . . . . N NUMB 0039H A
A51 MACRO ASSEMBLER DEMO_LED_0809 05/30/2006 11:28:13 PAGE 9
MLOOP. . . . . . . C ADDR 0137H A
P0 . . . . . . . . D ADDR 0080H A
P1 . . . . . . . . D ADDR 0090H A
P2 . . . . . . . . D ADDR 00A0H A
P3 . . . . . . . . D ADDR 00B0H A
PSW. . . . . . . . D ADDR 00D0H A
RED_VAL. . . . . . N NUMB 003CH A
SCAN_L1. . . . . . C ADDR 03ECH A
SCAN_L2. . . . . . C ADDR 03F7H A
SCAN_L3. . . . . . C ADDR 0402H A
SCAN_L4. . . . . . C ADDR 040DH A
SCAN_L5. . . . . . C ADDR 0418H A
SCAN_L6. . . . . . C ADDR 0423H A
SCAN_L7. . . . . . C ADDR 042EH A
SCAN_L8. . . . . . C ADDR 0439H A
SEC. . . . . . . . N NUMB 003AH A
SEND164. . . . . . C ADDR 0463H A
SND164_LP. . . . . C ADDR 0468H A
SP . . . . . . . . D ADDR 0081H A
SW1_OK . . . . . . C ADDR 02FFH A
SW1_OVER . . . . . C ADDR 0310H A
SW2_OK . . . . . . C ADDR 031BH A
SW2_OVER . . . . . C ADDR 032CH A
SW3_OK . . . . . . C ADDR 0337H A
SW3_OVER . . . . . C ADDR 0348H A
SW4_OK . . . . . . C ADDR 0353H A
SW4_OVER . . . . . C ADDR 0364H A
SW5_OK . . . . . . C ADDR 036FH A
SW5_OKA. . . . . . C ADDR 02F9H A
SW5_OVER . . . . . C ADDR 0380H A
SW6_OK . . . . . . C ADDR 038BH A
SW6_OKA. . . . . . C ADDR 02FCH A
SW6_OVER . . . . . C ADDR 039CH A
T0_INT . . . . . . C ADDR 03BDH A
TAB_KL1. . . . . . C ADDR 0166H A
TAB_KL2. . . . . . C ADDR 0185H A
TAB_LED. . . . . . C ADDR 0451H A
TAB_SCAN . . . . . C ADDR 03DCH A
TH0. . . . . . . . D ADDR 008CH A
TL0. . . . . . . . D ADDR 008AH A
TMOD . . . . . . . D ADDR 0089H A
TR0. . . . . . . . B ADDR 0088H.4 A
WAIT_KEYL1 . . . . C ADDR 0157H A
WAIT_KEYL2 . . . . C ADDR 0176H A
YEL_VAL. . . . . . N NUMB 0005H A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -