myclock.lst

用51单片机实现数字钟 利用数码管、I/O口实现数字钟的计数功能

A51 MACRO ASSEMBLER  MYCLOCK                                                              06/22/2007 04:08:11 PAGE     1


MACRO ASSEMBLER A51 V8.00
OBJECT MODULE PLACED IN MyClock.OBJ
ASSEMBLER INVOKED BY: E:\Keil\C51\BIN\A51.EXE MyClock.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

                       1     ;已使用的内存空间:-----------------------------
                       2     ;80H , 81H ,82H
                       3     ;31H -- 38H
                       4     ;30H
                       5     ;5BH
                       6     ;
                       7     ;
                       8     ;----------------------------------------------
  005B                 9     COUNT EQU 5BH
                      10     
                      11     
                      12     
0000                  13     ORG 0000H
0000 020050           14                     LJMP INIT
                      15     ;-----------------------------------------------
                      16     
000B                  17     ORG 000BH
000B 02009A           18                     LJMP TIME
                      19     
                      20     ;-----------------------------------------------
                      21     
0050                  22     ORG 0050H
0050                  23     INIT:   
0050 758901           24                     MOV TMOD , #01H
0053 D2AF             25                     SETB EA
0055 D2A9             26                     SETB ET0
0057 758CD8           27                     MOV TH0 , #0D8H
005A 758AF0           28                     MOV TL0 , #0F0H
005D D28C             29                     SETB TR0
                      30                     
005F 7831             31                     MOV R0 , #31H
0061 7600             32     AG:             MOV @R0 , #00H
0063 08               33                     INC R0
0064 B839FA           34                     CJNE R0 , #39H , AG
0067 75330A           35                     MOV 33H , #0AH
006A 75360A           36                     MOV 36H , #0AH  
                      37     
006D 755B00           38                     MOV COUNT , #00H
                      39     
0070 9000F1           40                     MOV DPTR , #TABLE
                      41     
0073 D28C             42                     SETB TR0
                      43     ;-----------------------------------------------------
0075                  44     MAIN:   
0075 75B000           45     LP1:    MOV P3 , #00H           
0078 753000           46                     MOV 30H , #00H          ;用30H内存单元保存当前P3的输出
007B 7838             47                     MOV R0 , #38H           
007D E6               48     LP0:    MOV A , @R0
007E 93               49                     MOVC A , @A+DPTR
007F F590             50                     MOV P1 , A
0081 1191             51                     ACALL DELAY
0083 18               52                     DEC R0
0084 E530             53                     MOV A , 30H
0086 2404             54                     ADD A , #04H
0088 F530             55                     MOV 30H , A
008A F5B0             56                     MOV P3 , A 
008C B420EE           57                     CJNE A , #20H,  LP0
008F 0175             58                     AJMP LP1
A51 MACRO ASSEMBLER  MYCLOCK                                                              06/22/2007 04:08:11 PAGE     2

                      59     ;-------------------------------------------------------
                      60     
0091 7A1F             61     DELAY:  MOV R2 , #1FH
0093 7B1F             62     DL1:    MOV R3 , #1FH
0095 DBFE             63                     DJNZ R3 , $
0097 DAFA             64                     DJNZ R2 , DL1
0099 22               65                     RET
                      66     ;------------------------------------------------------
009A C0E0             67     TIME:   PUSH ACC
009C C0D0             68                     PUSH PSW
009E D2D3             69                     SETB RS0
00A0 758CD8           70                     MOV TH0 , #0D8H
00A3 758AF0           71                     MOV TL0 , #0F0H
00A6 055B             72                     INC COUNT
00A8 E55B             73                     MOV A , COUNT
00AA B4643F           74                     CJNE A , #100 , RT
00AD 755B00           75                     MOV COUNT , #00H
00B0 0531             76                     INC 31H
00B2 E531             77                     MOV A , 31H
00B4 B40A35           78                     CJNE A , #10 , RT
00B7 753100           79                     MOV 31H , #00H
00BA 0532             80                     INC 32H
00BC E532             81                     MOV A , 32H
00BE B4062B           82                     CJNE A , #6 , RT
00C1 753200           83                     MOV 32H , #00H
00C4 0534             84                     INC 34H
00C6 E534             85                     MOV A , 34H
00C8 B40921           86                     CJNE A , #9 , RT
00CB 753400           87                     MOV 34H , #00H
00CE 0535             88                     INC 35H
00D0 E535             89                     MOV A , 35H
00D2 B40617           90                     CJNE A , #6 , RT
00D5 753500           91                     MOV 35H , #00H
00D8 0537             92                     INC 37H
00DA E537             93                     MOV A , 37H
00DC B4050D           94                     CJNE A , #5 , RT
00DF 753700           95                     MOV 37H , #00H
00E2 0538             96                     INC     38H
00E4 E538             97                     MOV A , 38H
00E6 B40303           98                     CJNE A ,#3 , RT
00E9 753800           99                     MOV 38H , #00H
                     100     
00EC D0D0            101     RT:             POP PSW
00EE D0E0            102                     POP ACC
00F0 32              103                     RETI
                     104     
00F1 C0F9A4B0        105     TABLE:  DB 0C0H , 0F9H , 0A4H , 0B0H , 99H ,92H ,82H ,0F8H      ;P1口输出到数码管的表值
00F5 999282F8                
00F9 8090BF          106                     DB 80H , 90H , 0BFH
                     107      
                     108                     END
                             
                             
                             
A51 MACRO ASSEMBLER  MYCLOCK                                                              06/22/2007 04:08:11 PAGE     3

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


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

ACC. . . . . . . .  D ADDR   00E0H   A   
AG . . . . . . . .  C ADDR   0061H   A   
COUNT. . . . . . .  N NUMB   005BH   A   
DELAY. . . . . . .  C ADDR   0091H   A   
DL1. . . . . . . .  C ADDR   0093H   A   
EA . . . . . . . .  B ADDR   00A8H.7 A   
ET0. . . . . . . .  B ADDR   00A8H.1 A   
INIT . . . . . . .  C ADDR   0050H   A   
LP0. . . . . . . .  C ADDR   007DH   A   
LP1. . . . . . . .  C ADDR   0075H   A   
MAIN . . . . . . .  C ADDR   0075H   A   
P1 . . . . . . . .  D ADDR   0090H   A   
P3 . . . . . . . .  D ADDR   00B0H   A   
PSW. . . . . . . .  D ADDR   00D0H   A   
RS0. . . . . . . .  B ADDR   00D0H.3 A   
RT . . . . . . . .  C ADDR   00ECH   A   
TABLE. . . . . . .  C ADDR   00F1H   A   
TH0. . . . . . . .  D ADDR   008CH   A   
TIME . . . . . . .  C ADDR   009AH   A   
TL0. . . . . . . .  D ADDR   008AH   A   
TMOD . . . . . . .  D ADDR   0089H   A   
TR0. . . . . . . .  B ADDR   0088H.4 A   


REGISTER BANK(S) USED: 0 


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