体验了一把驱动硬件的瘾

PC0 EQU 0FF2AH
    PCTRL EQU 0FF2BH
    ORG 400H
START:
    MOV DPTR,#PCTRL
    MOV A,#80H
    MOVX @DPTR,A
    
LOOP1:
    MOV DTPR,#PC0
    MOV R1,#6
    MOV A,#00000001B
LOOP:
    MOVX @DPTR,A
    LCALL DELAY
    RL A
    DJNZ R1,LOOP
    AJMP LOOP1
    
DELAY:
    MOV R5,R3
DELO:
    MOV R6,#255
DEL1:
    MOV R7,#98
DEL2:
    DJNZ R7,DEL2
    DJNZ R6,DEL1
    DJNZ R5,DEL0
    RET
    END