📄 main.lst
字号:
A51 MACRO ASSEMBLER MAIN 11/20/2007 19:07:23 PAGE 1
MACRO ASSEMBLER A51 V7.07
OBJECT MODULE PLACED IN main.OBJ
ASSEMBLER INVOKED BY: C:\Program Files\Keil\C51\BIN\A51.EXE main.asm SET(SMALL) DEBUG EP
LOC OBJ LINE SOURCE
0000 1 ORG 0000H
0000 2100 2 AJMP START
0100 3 ORG 0100H
4
0100 5 START:
0100 759000 6 MOV P1, #0 ;消隐
0103 7808 7 MOV R0, #8
0105 7900 8 MOV R1, #0
0107 12010E 9 LOOP: LCALL DISPLAY
010A D8FB 10 DJNZ R0, LOOP ;判断8位数字是否送完
010C 2100 11 AJMP START
12
010E 13 DISPLAY:
010E 900152 14 MOV DPTR, #YOUNUMBER ;寻找显示的数字
0111 E9 15 MOV A, R1
0112 93 16 MOVC A, @A+DPTR
0113 900140 17 MOV DPTR, #TABSEG ;寻找显示数字的码值
0116 93 18 MOVC A, @A+DPTR
0117 F4 19 CPL A
0118 F580 20 MOV P0, A
011A D293 21 SETB P1.3 ;锁存码值信号
011C 00 22 NOP
011D C293 23 CLR P1.3
011F 90014A 24 MOV DPTR, #TABBIT ;送位选信号
0122 E9 25 MOV A, R1
0123 93 26 MOVC A, @A+DPTR
0124 F580 27 MOV P0, A
0126 D292 28 SETB P1.2 ;锁存位选信号
0128 00 29 NOP
0129 C292 30 CLR P1.2
012B 3137 31 CALL DELAY
012D 758000 32 MOV P0, #0 ;送消隐信号
0130 D292 33 SETB P1.2
0132 00 34 NOP
0133 C292 35 CLR P1.2
0135 09 36 INC R1
0136 22 37 RET
38
0137 39 DELAY:
0137 7B19 40 MOV R3, #25
0139 7C0A 41 LL1: MOV R4, #10
013B DCFE 42 DJNZ R4, $
013D DBFA 43 DJNZ R3, LL1
013F 22 44 RET
45
0140 46 TABSEG: ;共阴数码管码表
0140 3F065B4F 47 DB 0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,0x7F,0x6F
0144 666D7D07
0148 7F6F
48
014A 49 TABBIT: ;共阳数码管位选信号
014A 80402010 50 DB 0x80,0x40,0x20,0x10,0x08,0x04,0x02,0x01
014E 08040201
51
0152 52 YOUNUMBER: ;要显示的数字
0152 02000007 53 DB 2,0,0,7,1,1,1,3
0156 01010103
54
A51 MACRO ASSEMBLER MAIN 11/20/2007 19:07:23 PAGE 2
55 END
A51 MACRO ASSEMBLER MAIN 11/20/2007 19:07:23 PAGE 3
SYMBOL TABLE LISTING
------ ----- -------
N A M E T Y P E V A L U E ATTRIBUTES
DELAY. . . . . . . C ADDR 0137H A
DISPLAY. . . . . . C ADDR 010EH A
LL1. . . . . . . . C ADDR 0139H A
LOOP . . . . . . . C ADDR 0107H A
P0 . . . . . . . . D ADDR 0080H A
P1 . . . . . . . . D ADDR 0090H A
START. . . . . . . C ADDR 0100H A
TABBIT . . . . . . C ADDR 014AH A
TABSEG . . . . . . C ADDR 0140H A
YOUNUMBER. . . . . C ADDR 0152H A
REGISTER BANK(S) USED: 0
ASSEMBLY COMPLETE. 0 WARNING(S), 0 ERROR(S)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -