s2.lst

S2试验板 AT89C51 晶振12M 1-S12控制的数码显示

A51 MACRO ASSEMBLER  S2                                                                   10/11/2004 15:15:37 PAGE     1


MACRO ASSEMBLER A51 V7.00a
OBJECT MODULE PLACED IN S2.OBJ
ASSEMBLER INVOKED BY: C:\Keil\C51\BIN\A51.EXE S2.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

                       1     ;2003年《电子制作》第3期  P24 S2
                       2     ;籗2试验板  AT89C51   晶振12M
                       3     ;挥肧1-S12控制的数码显示           Hantianpei 2004-10-11
                       4     ;**********************************************************************************
                       5     
0000                   6             ORG 0000H
0000 020030            7             LJMP MAIN
0030                   8             ORG 030H
0030 75B0C0            9        MAIN:MOV P3,#0C0H       ;P3口送0C0H，数码管显示"0"。
0033 116E             10             ACALL DEL4MS       ;调用4mS延时子程序维持数码管点亮。
0035 75B0F0           11             MOV P3,#0F0H       ;向P3口送F0H，准备读P3口输入状态。
0038 E5B0             12             MOV A,P3           ; P3口状态送入累加器A。
003A B4F002           13             CJNE A,#0F0H,F1    ;判P3口有无键按下，有键按下转F1，无键按下顺序执行。
003D 0130             14             AJMP MAIN          ;无键按下跳到MAIN处循环。
003F 75B0F9           15          F1:MOV P3,#0F9H       ;数码管显示"1"。
0042 1177             16             ACALL DEL1S        ;调用1S延时子程序维持数码管点亮。
0044 75B0A4           17             MOV P3,#0A4H       ;数码管显示"2"。
0047 1177             18             ACALL DEL1S        ;调用1S延时子程序维持数码管点亮。
0049 75B0B0           19             MOV P3,#0B0H       ;数码管显示"3"。
004C 1177             20             ACALL DEL1S        ;调用1S延时子程序维持数码管点亮。
004E 75B099           21             MOV P3,#099H       ;数码管显示"4"。
0051 1177             22             ACALL DEL1S        ;调用1S延时子程序维持数码管点亮。
0053 75B092           23             MOV P3,#092H       ;数码管显示"5"。
0056 1177             24             ACALL DEL1S        ;调用1S延时子程序维持数码管点亮。
0058 75B082           25             MOV P3,#082H       ;数码管显示"6"。
005B 1177             26             ACALL DEL1S        ;调用1S延时子程序维持数码管点亮。
005D 75B0F8           27             MOV P3,#0F8H       ;数码管显示"7"。
0060 1177             28             ACALL DEL1S        ;调用1S延时子程序维持数码管点亮。
0062 75B080           29             MOV P3,#080H       ;数码管显示"8"。
0065 1177             30             ACALL DEL1S        ;调用1S延时子程序维持数码管点亮。
0067 75B090           31             MOV P3,#090H       ;数码管显示"9"。
006A 1177             32             ACALL DEL1S        ;调用1S延时子程序维持数码管点亮。;
006C 0130             33             AJMP MAIN          ;跳转到主程序处循环。
006E 7F04             34      DEL4MS:MOV R7,#04H        ;延时4mS子程序。
0070 7EFF             35         DL0:MOV R6,#0FFH
0072 DEFE             36         DL1:DJNZ R6,DL1
0074 DFFA             37             DJNZ R7,DL0
0076 22               38             RET
0077 ADFF             39       DEL1S:MOV R5,0FFH        ;延时1S子程序。
0079 116E             40          F2:ACALL DEL4MS           
007B DDFC             41             DJNZ R5,F2
007D 22               42             RET
                      43             END
A51 MACRO ASSEMBLER  S2                                                                   10/11/2004 15:15:37 PAGE     2

SYMBOL TABLE LISTING
------ ----- -------


N A M E             T Y P E  V A L U E   ATTRIBUTES

DEL1S. . . . . . .  C ADDR   0077H   A   
DEL4MS . . . . . .  C ADDR   006EH   A   
DL0. . . . . . . .  C ADDR   0070H   A   
DL1. . . . . . . .  C ADDR   0072H   A   
F1 . . . . . . . .  C ADDR   003FH   A   
F2 . . . . . . . .  C ADDR   0079H   A   
MAIN . . . . . . .  C ADDR   0030H   A   
P3 . . . . . . . .  D ADDR   00B0H   A   


REGISTER BANK(S) USED: 0 


ASSEMBLY COMPLETE.  0 WARNING(S), 0 ERROR(S)