pad.asm

MCS-51单片机实验 39个实用实验和源码

;FOR    EAT598
A_DPORT EQU     0F230H  		;0809通道0地址
        ORG     0000H
        LJMP    START
        ORG     0003H
        LJMP    INT_0
        ORG     0040H
START:
        MOV     SP,#60H
        MOV     R7,#0FFH        ;初始化
        SETB    IT0
        SETB    EA
        SETB    EX0       		;INT0 允许
A_D:       
        MOV     DPTR,#A_DPORT
        MOVX    @DPTR,A         ;启动 A_D
        CJNE    R7,#00H,$       ;等待 A_D 转换结束
        CPL     A
        MOV     P1,A            ;数据输出
        MOV     R7,#0FFH        ;清读数标志
        SJMP    A_D
INT_0:
        MOVX    A,@DPTR         ;读 A_D 数据
        MOV     R7,#00H         ;置读数标志
        RETI
        END