📄 s5.lst
字号:
A51 MACRO ASSEMBLER S5 10/12/2004 10:44:57 PAGE 1
MACRO ASSEMBLER A51 V7.00a
OBJECT MODULE PLACED IN S5.OBJ
ASSEMBLER INVOKED BY: C:\Keil\C51\BIN\A51.EXE S5.ASM SET(SMALL) DEBUG EP
LOC OBJ LINE SOURCE
1 ;2003年《电子制作》第4期 P22 S5
2 ;S2实验板 AT89C51 12M晶振
3 ;实验2-10进制调整指令:数码管从00-FF显示 Hantianpei 2004-10-12
4 ;***********************************************************************************
5
0000 6 ORG 0000H
0000 020030 7 LJMP MAIN
0030 8 ORG 030H
0030 752000 9 MAIN:MOV 20H,#00H ;20H单元清0。
0033 E520 10 GOON:MOV A,20H ;20H单元中内容送A。
0035 540F 11 ANL A,#0FH ;A内容与立即数0FH相"与",A中高4位置0,保留低4位(屏蔽高4位)。
0037 900100 12 MOV DPTR,#TAB ;将数据表格首地址(0100H)存入16位数据地址指针DPTR中。
003A 93 13 MOVC A,@A+DPTR ;A内容+DPTR内容,得一固定地址内容取出送A。(变址寻址,也叫查表)。
003B F580 14 MOV P0,A ;A中内容送P0,点亮"个"位数码管。
003D E520 15 MOV A,20H ;20H内容送A。
003F C4 16 SWAP A ;A中高4位和低4位交换。
0040 540F 17 ANL A,#0FH ;屏蔽A中高4位。
0042 93 18 MOVC A,@A+DPTR ;查表。
0043 F590 19 MOV P1,A ; A中内容送P1,点亮"十"位数码管。
0045 114B 20 ACALL DEL ;调用延时子程序,便于观察。
0047 0520 21 INC 20H ;20H单元内容加1。
0049 0133 22 AJMP GOON ;跳到标号GOON处继续执行。
004B 7FFF 23 DEL:MOV R7,#0FFH ;延时子程序。
004D 7EFF 24 DEL1:MOV R6,#0FFH
004F 7D1F 25 DEL2:MOV R5,#01FH
0051 DDFE 26 DEL3:DJNZ R5,DEL3
0053 DEFA 27 DJNZ R6,DEL2
0055 DFF6 28 DJNZ R7,DEL1
0057 22 29 RET
0100 30 ORG 0100H ;数据表格首地址。
0100 C0F9A4B0 31 TAB:DB 0C0H,0F9H,0A4H,0B0H,099H,092H,082H,0F8H ;数据表格内容。
0104 999282F8
0108 80908883 32 DB 080H,090H,088H,083H,0C6H,0A1H,086H,08EH ;数据表格内容。
010C C6A1868E
33 END
A51 MACRO ASSEMBLER S5 10/12/2004 10:44:57 PAGE 2
SYMBOL TABLE LISTING
------ ----- -------
N A M E T Y P E V A L U E ATTRIBUTES
DEL. . . . . . . . C ADDR 004BH A
DEL1 . . . . . . . C ADDR 004DH A
DEL2 . . . . . . . C ADDR 004FH A
DEL3 . . . . . . . C ADDR 0051H A
GOON . . . . . . . C ADDR 0033H A
MAIN . . . . . . . C ADDR 0030H A
P0 . . . . . . . . D ADDR 0080H A
P1 . . . . . . . . D ADDR 0090H A
TAB. . . . . . . . C ADDR 0100H A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -