824uart.lst

ADI公司的产品aduc824单片机的ADC转换程序

824UART                                                                                                       PAGE 1

                       1    ;********************************************************************
                       2    ;
                       3    ; Author        : ADI - Apps            www.analog.com/MicroConverter
                       4    ;
                       5    ; Date          : 22 September 1999
                       6    ;
                       7    ; File          : 824uart.asm
                       8    ;
                       9    ; Hardware      : ADuC824
                      10    ;
                      11    ; Description   : sample program that performs ADC conversions in
                      12    ;                 continuous mode and sends results to a PC via the
                      13    ;                 UART.
                      14    ;               
                      15    ;********************************************************************
                      16    
                      17    $MOD824                         ; Use 8052&ADuC824 predefined symbols
                      18    
  00B4                19    LED       EQU     P3.4          ; P3.4 drives red LED on eval board
                      20    
                      21    ;____________________________________________________________________
                      22                                                      ; BEGINNING OF CODE
----                  23    CSEG
                      24    
0000                  25    ORG 0000h
                      26    
0000 020100           27            JMP     MAIN
                      28    
                      29    ;____________________________________________________________________
                      30                                                 ; INTERRUPT VECTOR SPACE
                      31    
0033                  32    ORG 0033h ; (ADC ISR)
                      33    
0033 B2B4             34            CPL     LED
                      35    
0035 9001BF           36            MOV     DPTR,#SEPERATOR         ; send linefeed+CR out UART
0038 120124           37            CALL    SENDSTRING
                      38    
003B E5DB             39            MOV     A,ADC0H                  ; send ADC data via UART
003D 120144           40            CALL    SENDVAL
0040 E5DA             41            MOV     A,ADC0M
0042 120144           42            CALL    SENDVAL
0045 E5D9             43            MOV     A,ADC0L
0047 120144           44            CALL    SENDVAL
                      45    
004A C2DF             46            CLR     RDY0
004C 32               47            RETI
                      48    
                      49    ;====================================================================
                      50                                                           ; MAIN PROGRAM
0100                  51    ORG 0100h
                      52    
0100                  53    MAIN:
0100 75817F           54            MOV     SP,#127
                      55    
                      56    ; CONFIGURE UART....
                      57    
0103 75CBFF           58            MOV     RCAP2H,#0FFh            ; config UART for 9830baud
824UART                                                                                                       PAGE 2

0106 75CAFB           59            MOV     RCAP2L,#-5              ; (close enough to 9600baud)
0109 75CDFF           60            MOV     TH2,#0FFh
010C 75CCFB           61            MOV     TL2,#-5
010F 759852           62            MOV     SCON,#01010010b
0112 75C834           63            MOV     T2CON,#00110100b
                      64    
                      65    ; CONFIGURE ADC AND START CONVERTING....
                      66    
0115 75D4C8           67            MOV     SF,#200          ; 6.8266667Hz ADC data rate
0118 75D245           68            MOV     ADC0CON,#045h    ; externalVref, bipolar,