📄 led2.lst
字号:
A51 MACRO ASSEMBLER LED2 06/23/2007 09:35:01 PAGE 1
MACRO ASSEMBLER A51 V7.10
OBJECT MODULE PLACED IN LED2.OBJ
ASSEMBLER INVOKED BY: C:\Keil\C51\BIN\A51.EXE LED2.asm SET(SMALL) DEBUG EP
LOC OBJ LINE SOURCE
1 ;-----------------------------------
2 ; 流水灯实例
3 ;功能:点亮发光管LED并闪烁
4 ;-----------------------------------
0000 5 ORG 0000H ;伪指令,指定程序从0000H开始存放
0000 020100 6 LJMP MAIN ;跳转指令,程序跳转到MAIN处
7
0100 8 ORG 0100H ;伪指令,指定以下程序从0100H开始存放
0100 9 MAIN:
0100 758160 10 MOV SP,#60H ;给堆栈指针赋初值
0103 7590FF 11 MOV P1,#0FFH ;给P1赋初值,LED全灭
12 ;以下为查表程序
0106 900125 13 MOV DPTR,#LED_TABLE
0109 14 LIGHT:
0109 7F2A 15 MOV R7,#42
010B 16 LOOP:
010B 742A 17 MOV A,#42
010D 9F 18 SUBB A,R7
010E 93 19 MOVC A,@A+DPTR
010F F590 20 MOV P1,A ;输出显示
0111 120118 21 LCALL DELAY ;调延时子程序
0114 DFF5 22 DJNZ R7,LOOP
0116 80F1 23 SJMP LIGHT ;跳转,程序继续
24
25 ;延时子程序
0118 26 DELAY:
0118 7F10 27 MOV R7,#10H
011A 28 DELAY0:
011A 7E7F 29 MOV R6,#7FH
011C 30 DELAY1:
011C 7D7F 31 MOV R5,#7FH
011E DDFE 32 DJNZ R5,$
0120 DEFA 33 DJNZ R6,DELAY1
0122 DFF6 34 DJNZ R7,DELAY0
0124 22 35 RET
36
37 ;表格数据
0125 38 LED_TABLE:
0125 FF 39 DB 0FFH ;全部熄灭
0126 FEFDFBF7 40 DB 0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,07FH ;依次逐个点亮
012A EFDFBF7F
012E FEFCF8F0 41 DB 0FEH,0FCH,0F8H,0F0H,0E0H,0C0H,080H,000H ;依次逐个叠加
0132 E0C08000
0136 80C0E0F0 42 DB 080H,0C0H,0E0H,0F0H,0F8H,0FCH,0FEH,0FFH ;依次逐个递减
013A F8FCFEFF
013E 7EBDDBE7 43 DB 07EH,0BDH,0DBH,0E7H,0E7H,0DBH,0BDH,07EH ;两边靠拢后分开
0142 E7DBBD7E
0146 7E3C1800 44 DB 07EH,03CH,018H,000H,000H,018H,03CH,07EH ;从两边叠加后递减
014A 00183C7E
014E 00 45 DB 000H ;全
部点亮
46
47 END
A51 MACRO ASSEMBLER LED2 06/23/2007 09:35:01 PAGE 2
SYMBOL TABLE LISTING
------ ----- -------
N A M E T Y P E V A L U E ATTRIBUTES
DELAY. . . . . . . C ADDR 0118H A
DELAY0 . . . . . . C ADDR 011AH A
DELAY1 . . . . . . C ADDR 011CH A
LED_TABLE. . . . . C ADDR 0125H A
LIGHT. . . . . . . C ADDR 0109H A
LOOP . . . . . . . C ADDR 010BH A
MAIN . . . . . . . C ADDR 0100H A
P1 . . . . . . . . D ADDR 0090H A
SP . . . . . . . . D ADDR 0081H A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -