t7.asm

来自「一些单片机的51实例」· 汇编 代码 · 共 22 行

NAME    T7                ;8255A实验一
CSEG AT 0000H
        LJMP START
CSEG AT 4100H
PA   EQU  0CFA0H
PB   EQU  0CFA1H
PCTL EQU  0CFA3H
START:  MOV    DPTR,#PCTL ;置8255A控制字，A、B、C口均工作
                          ;方式0，A、C口为输出，B口为输入
        MOV    A,#82H
        MOVX   @DPTR,A
LOOP:   MOV    DPTR,#PB   ;从B口读入开关状态值
        MOVX   A,@DPTR
        MOV    DPTR,#PA   ;从A口将状态值输出显示
        MOVX   @DPTR,A
        MOV    R7,#10H    ;延时
DEL0:   MOV    R6,#0FFH
DEL1:   DJNZ   R6,DEL1
        DJNZ   R7,DEL0
        JMP    LOOP
END