ad574a程序：

sbit ad_status = P3^3;

uchar xdata ad_convert _at_ 0x6000; //開(kāi)始轉(zhuǎn)換

uchar xdata ad_read_hi _at_ 0x6002; //讀取高字節(jié)

uchar xdata ad_read_lo _at_ 0x6003; //讀取低字節(jié)

uint ad_1674 (void)

{

union adc

{

uint adCC;

uchar ad[2];

};

union adc add;

ad_convert=0xff;

while(ad_status);

add.ad[0]=ad_read_hi;

add.ad[1] =ad_read_lo;

add.adcc=add.adcc>>4;

return add.adcc;

}ORG 0000H

AJMP MAIN ;主程序

ORG 0013H

LJMP XAD ;中斷1A/D采樣子程序

;*********************************************

;* 初始化 ad574a程序 *

;*********************************************

ORG 0030H

MAIN: MOV SP,#60H ;設(shè)置堆棧

;SETB EA

clr ie1

SETB IT1

START: LCALL MNLCJ

;*****************************************

;* A/D采樣子程序 初始化 *

;*****************************************

AD1: PUSH DPH

PUSH DPL

PUSH ACC

MOV DPTR,#0C000H;打開(kāi) 0 通道

MOV A,#08H

MOVX @DPTR,A

MOV DPTR,#9000H ;啟動(dòng)A/D轉(zhuǎn)換

MOVX @DPTR,A

SETB EX1

POP ACC

POP DPL

POP DPH

RET

;*****************************

;* A/D 574的中斷子程序 *

;*****************************

XAD: PUSH DPH

PUSH DPL

PUSH ACC

MOV DPTR,#9002H;讀入高8位結(jié)果放入50H

MOVX A,@DPTR

MOV 50H,A

INC DPTR

MOVX A,@DPTR ;讀入低4 位結(jié)果放入51H

MOV 51H,A

CLR EX1

POP ACC

POP DPL

POP DPH

RETI

;*********************************************

;模擬量采集 *

;*********************************************

MNLCJ: MOV R0,#40H

LCALL AD1 ;第一端口模擬量采集

ajmp $

; MOV A,50H

; MOV @R0,A

;INC R0

;MOV A,51H

;MOV @R0,A

END

NOP

NOP

LJMP main