8051至pc.lst

刚学时编的小程序

A51 MACRO ASSEMBLER  8051至PC                                                             04/21/2007 20:14:34 PAGE     1


MACRO ASSEMBLER A51 V8.00
OBJECT MODULE PLACED IN 8051至PC.OBJ
ASSEMBLER INVOKED BY: d:\Keil 8\C51\BIN\A51.EXE 8051至PC.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

  000A                 1     LF EQU 0AH
  000D                 2     CR EQU 0DH
                       3     
0000                   4     ORG 0H
0000 8000              5     JMP BEGIN
                       6     
0002 758160            7     BEGIN:MOV SP,#60H
0005 112A              8             CALL INIT_RS232
                       9     
0007 1120             10             CALL LED_BL
0009 900060           11             MOV DPTR,#MESS
000C 1149             12             CALL TX_STR
                      13     
000E                  14     SCAN:
000E 20A402           15             JB P2.4,CH1
0011 1140             16             CALL TEST_TX
                      17     
0013 20A508           18     CH1:JB P2.5,CH2
0016 30A5FD           19             JNB P2.5,$
0019 900060           20             MOV DPTR,#MESS
001C 1149             21             CALL TX_STR
001E 80EE             22     CH2:JMP SCAN
                      23     
0020                  24     LED_BL:
0020 7C06             25             MOV R4,#6
0022 B2B7             26     ASD:CPL P3.7
0024 7D08             27             MOV R5,#8
0026 1155             28             CALL DELAY
0028 DCF8             29             DJNZ R4,ASD
                      30     
002A                  31     INIT_RS232:
002A 759850           32             MOV SCON,#50H
002D 758920           33             MOV TMOD,#20H
0030 758DFD           34             MOV TH1,#0FDH
0033 D28E             35             SETB TR1
0035 D299             36             SETB TI
0037 22               37             RET
                      38     
0038                  39     TX_CHAR:
0038 3099FD           40             JNB TI,$
003B C299             41             CLR TI
003D F599             42             MOV SBUF,A
003F 22               43             RET
                      44     
0040                  45     TEST_TX:
0040 7C64             46             MOV R4,#100
0042 7441             47     FGH:MOV A,#'A'
0044 1138             48             CALL TX_CHAR
0046 DCFA             49             DJNZ R4,FGH
0048 22               50             RET
                      51     
0049                  52     TX_STR:
0049 E4               53             CLR A
004A 93               54             MOVC A,@A+DPTR
004B B42401           55             CJNE A,#'$',JKL
004E 22               56             RET
                      57     
004F                  58     JKL:
A51 MACRO ASSEMBLER  8051至PC                                                             04/21/2007 20:14:34 PAGE     2

004F 1138             59             CALL TX_CHAR
0051 A3               60             INC DPTR
0052 80F5             61             JMP TX_STR
0054 22               62             RET
                      63     
0055                  64     DELAY:
0055 7E32             65             MOV R6,#50
0057 7F64             66     QWE:MOV R7,#100
0059 DFFE             67     RTY:DJNZ R7,RTY
005B DEFA             68             DJNZ R6,QWE
005D DDF6             69             DJNZ R5,DELAY
005F 22               70             RET
0060 54455354         71     MESS:DB "TEST 8051 RS232 TX...",LF,CR,"$"
0064 20383035                
0068 31205253                
006C 32333220                
0070 54582E2E                
0074 2E0A0D24                
                      72     
                      73     END     
A51 MACRO ASSEMBLER  8051至PC                                                             04/21/2007 20:14:34 PAGE     3

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


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

ASD. . . . . . . .  C ADDR   0022H   A   
BEGIN. . . . . . .  C ADDR   0002H   A   
CH1. . . . . . . .  C ADDR   0013H   A   
CH2. . . . . . . .  C ADDR   001EH   A   
CR . . . . . . . .  N NUMB   000DH   A   
DELAY. . . . . . .  C ADDR   0055H   A   
FGH. . . . . . . .  C ADDR   0042H   A   
INIT_RS232 . . . .  C ADDR   002AH   A   
JKL. . . . . . . .  C ADDR   004FH   A   
LED_BL . . . . . .  C ADDR   0020H   A   
LF . . . . . . . .  N NUMB   000AH   A   
MESS . . . . . . .  C ADDR   0060H   A   
P2 . . . . . . . .  D ADDR   00A0H   A   
P3 . . . . . . . .  D ADDR   00B0H   A   
QWE. . . . . . . .  C ADDR   0057H   A   
RTY. . . . . . . .  C ADDR   0059H   A   
SBUF . . . . . . .  D ADDR   0099H   A   
SCAN . . . . . . .  C ADDR   000EH   A   
SCON . . . . . . .  D ADDR   0098H   A   
SP . . . . . . . .  D ADDR   0081H   A   
TEST_TX. . . . . .  C ADDR   0040H   A   
TH1. . . . . . . .  D ADDR   008DH   A   
TI . . . . . . . .  B ADDR   0098H.1 A   
TMOD . . . . . . .  D ADDR   0089H   A   
TR1. . . . . . . .  B ADDR   0088H.6 A   
TX_CHAR. . . . . .  C ADDR   0038H   A   
TX_STR . . . . . .  C ADDR   0049H   A   


REGISTER BANK(S) USED: 0 


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