📄 dyn scan led.lst
字号:
A51 MACRO ASSEMBLER DYN_SCAN_LED 07/25/2006 22:38:52 PAGE 1
MACRO ASSEMBLER A51 V8.00
OBJECT MODULE PLACED IN Dyn Scan LED.OBJ
ASSEMBLER INVOKED BY: e:\Program Files\Keil\C51\BIN\A51.EXE Dyn Scan LED.asm SET(SMALL) DEBUG EP
LOC OBJ LINE SOURCE
0030 1 DBUF EQU 30H ;置存储区首址
0040 2 TEMP EQU 40H ;置缓冲区首址
0000 3 ORG 00H
0000 753001 4 MOV 30H,#1 ;存入数据
0003 753106 5 MOV 31H,#6
0006 753208 6 MOV 32H,#8
0009 753301 7 MOV 33H,#1
000C 753406 8 MOV 34H,#6
000F 753508 9 MOV 35H,#8
0012 7830 10 MOV R0,#DBUF
0014 7940 11 MOV R1,#TEMP
0016 7A06 12 MOV R2,#6 ;6位显示器
0018 900038 13 MOV DPTR,#SEGTAB ;置段码表首址
001B E6 14 DP00: MOV A,@R0 ;取要显示的数据
001C 93 15 MOVC A,@A+DPTR ;查表取段码
001D F7 16 MOV @R1,A ;段码存入暂存器
001E 09 17 INC R1
001F 08 18 INC R0
0020 DAF9 19 DJNZ R2,DP00
0022 7840 20 DISP0: MOV R0,#TEMP ;显示子程序
0024 7906 21 MOV R1,#6 ;扫描6次
0026 7A01 22 MOV R2,#01H ;决定数据动态显示方向
0028 E6 23 DP01: MOV A,@R0
0029 F580 24 MOV P0,A ;段码输出
002B EA 25 MOV A,R2 ;取位码
002C F590 26 MOV P1,A ;位码输出
002E 1142 27 ACALL DELAY ;调用延时
0030 EA 28 MOV A,R2
0031 23 29 RL A
0032 FA 30 MOV R2,A
0033 08 31 INC R0
0034 D9F2 32 DJNZ R1,DP01
0036 80EA 33 SJMP DISP0
0038 3F065B4F 34 SEGTAB: DB 3FH,06H,5BH,4FH,66H
003C 66
003D 6D7D077F 35 DB 6DH,7DH,07H,7FH,6FH
0041 6F
0042 7C03 36 DELAY: MOV R4,#03H ;延时子程序
0044 7DFF 37 AA1: MOV R5,#0FFH
0046 DDFE 38 AA: DJNZ R5,AA
0048 DCFA 39 DJNZ R4,AA1
004A 22 40 RET
41 END
A51 MACRO ASSEMBLER DYN_SCAN_LED 07/25/2006 22:38:52 PAGE 2
SYMBOL TABLE LISTING
------ ----- -------
N A M E T Y P E V A L U E ATTRIBUTES
AA . . . . . . . . C ADDR 0046H A
AA1. . . . . . . . C ADDR 0044H A
DBUF . . . . . . . N NUMB 0030H A
DELAY. . . . . . . C ADDR 0042H A
DISP0. . . . . . . C ADDR 0022H A
DP00 . . . . . . . C ADDR 001BH A
DP01 . . . . . . . C ADDR 0028H A
P0 . . . . . . . . D ADDR 0080H A
P1 . . . . . . . . D ADDR 0090H A
SEGTAB . . . . . . C ADDR 0038H A
TEMP . . . . . . . N NUMB 0040H A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -