ad convert.lst

Proteus在MCS-51％26ARM7系统中的应用百例 Proteus在MCS-51％26ARM7系统中的应用百例

A51 MACRO ASSEMBLER  AD_CONVERT                                                           08/01/2006 16:16:51 PAGE     1


MACRO ASSEMBLER A51 V8.00
OBJECT MODULE PLACED IN AD Convert.OBJ
ASSEMBLER INVOKED BY: e:\Program Files\Keil\C51\BIN\A51.EXE AD Convert.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

  0030                 1     DBUF0   EQU     30H
  0040                 2     TEMP    EQU     40H
  00B0                 3     DIN     BIT     0B0H
  00B1                 4     CLK     BIT     0B1H
0000                   5     ORG     0000H
0000 7830              6     START:  MOV     R0,#DBUF0               ;显示缓冲器存放0AH，0DH，—，0XH，0XH
0002 760A              7             MOV     @R0,#0AH                ;串行静态显示“AD XX”XX表示0--F
0004 08                8             INC     R0
0005 760D              9             MOV     @R0,#0DH
0007 08               10             INC     R0
0008 7610             11             MOV     @R0,#10H
000A 08               12             INC     R0
000B 90FEF3           13             MOV     DPTR,#0FEF3H            ;A/D地址
000E 7400             14             MOV     A,#0                    ;清零
0010 F0               15             MOVX    @DPTR,A                 ;启动A/D
0011 30B3FD           16             JNB     P3.3,$                  ;等待转换结果
0014 E0               17             MOVX    A,@DPTR                 ;读入结果
0015 F590             18             MOV     P1,A                    ;转换结果送入发光二极管
0017 F5F0             19             MOV     B,A                     ;累加器内容存入B中
0019 C4               20             SWAP    A                       ;A的内容高四位与低四位交换
001A 540F             21             ANL     A,#0FH                  ;A的内容高四位清零
001C D6               22             XCHD    A,@R0                   ;A/D转换结果高四位送入DBUF3
001D 08               23             INC     R0
001E E5F0             24             MOV     A,B                     ;取出A/D转换后的结果
0020 540F             25             ANL     A,#0FH                  ;A的内容高四位清零
0022 D6               26             XCHD    A,@R0                   ;结果低位送入DBF4中
0023 1129             27             ACALL   DISP1                   ;串行静态显示“AD XX”
0025 115F             28             ACALL   DELAY                   ;延时
0027 0100             29             AJMP    START
0029                  30     DISP1:                                  ;静态显示子程序
0029 7830             31             MOV     R0,#DBUF0                               
002B 7944             32             MOV     R1,#TEMP+4
002D 7A05             33             MOV     R2,#5
002F 90004D           34     DP10:   MOV     DPTR,#SEGTAB            ;表头地址
0032 E6               35             MOV     A,@R0
0033 93               36             MOVC    A,@A+DPTR               ;取段码
0034 F7               37             MOV     @R1,A                   ;到TEMP中
0035 08               38             INC     R0
0036 19               39             DEC     R1
0037 DAF6             40             DJNZ    R2,DP10
0039 7840             41             MOV     R0,#TEMP                ;段码地址指针
003B 7905             42             MOV     R1,#5                   ;段码字节数
003D 7A08             43     DP12:   MOV     R2,#8                   ;移位次数
003F E6               44             MOV     A,@R0                   ;取段码
0040 33               45     DP13:   RLC     A                       ;断码左移
0041 92B0             46             MOV     DIN,C                   ;输出一位段码
0043 C2B1             47             CLR     CLK                     ;发送一个位移脉冲
0045 D2B1             48             SETB    CLK
0047 DAF7             49             DJNZ    R2,DP13
0049 08               50             INC     R0
004A D9F1             51             DJNZ    R1,DP12
004C 22               52             RET
004D                  53     SEGTAB:
004D 3F065B4F         54             DB      3FH,6,5BH,4FH,66H,6DH
0051 666D                    
0053 7D077F6F         55             DB      7DH,7,7FH,6FH,77H,7CH
0057 777C                    
0059 585E7971         56             DB      58H,5EH,79H,71H,0,40H
A51 MACRO ASSEMBLER  AD_CONVERT                                                           08/01/2006 16:16:51 PAGE     2

005D 0040                    
005F                  57     DELAY:                                  ;延时
005F 7CAF             58             MOV     R4,#0AFH
0061 7DFF             59     AA1:    MOV     R5,#0FFH
0063 00               60     AA:     NOP
0064 00               61             NOP
0065 00               62             NOP
0066 DDFB             63             DJNZ    R5,AA
0068 DCF7             64             DJNZ    R4,AA1
006A 22               65             RET
                      66             END
A51 MACRO ASSEMBLER  AD_CONVERT                                                           08/01/2006 16:16:51 PAGE     3

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


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

AA . . . . . . . .  C ADDR   0063H   A   
AA1. . . . . . . .  C ADDR   0061H   A   
B. . . . . . . . .  D ADDR   00F0H   A   
CLK. . . . . . . .  B ADDR   00B0H.1 A   
DBUF0. . . . . . .  N NUMB   0030H   A   
DELAY. . . . . . .  C ADDR   005FH   A   
DIN. . . . . . . .  B ADDR   00B0H.0 A   
DISP1. . . . . . .  C ADDR   0029H   A   
DP10 . . . . . . .  C ADDR   002FH   A   
DP12 . . . . . . .  C ADDR   003DH   A   
DP13 . . . . . . .  C ADDR   0040H   A   
P1 . . . . . . . .  D ADDR   0090H   A   
P3 . . . . . . . .  D ADDR   00B0H   A   
SEGTAB . . . . . .  C ADDR   004DH   A   
START. . . . . . .  C ADDR   0000H   A   
TEMP . . . . . . .  N NUMB   0040H   A   


REGISTER BANK(S) USED: 0 


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