super1.asm

限电器硬件板应用

        ORG     0000H
        JMP     START
        ORG     001BH
        LJMP    ZD
 START: MOV     R1,#30H
        MOV     R7,#08H
        MOV     DPTR,#0FEF8H
        SETB    IT1
        SETB    EX1
        SETB    EA
 XX:    MOVX    @DPTR,A
       
 WW:    SJMP    WW
        DJNZ    R7,XX
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

ZD:     MOVX    A,@DPTR
        MOVX    @R1,A
         
        LCALL   LS02
XJ:     MOV     R6,#
        INC R1
        INC DPTR
        RETI
        END
;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\        
        ORG     0000H
        MOV     5EH,#0A0H
        MOV     5DH,#09H
        MOV     30H,#00H
        LCALL   LS02
        AJMP    $
LS02:   MOVX    30H,@R1
        MOV     A,5EH
        LCALL   WBIT
        LCALL   CACK
        JB      F0,LS02
        MOV     R0,#30H
        MOV     R5,5DH
 WRDA:  MOV     A,@R0
        LCALL   WBIT
        LCALL   CACK
        JB      F0,LS02 
        INC     R0
        DJNZ    R5,WRDA
        LCALL   STOP
        RET
 WBIT:  MOV     R7,#8
 WAA:   RLC     A
        JC      WBB
        CLR     P1.4
        SETB    P1,2
        NOP
        NOP
        CLR     P1.2
        DJNZ    R7,WAA
        RET
  WBB:  SETB    P1.4
        SETB    P1.2
        NOP
        NOP
        CLR     P1.2
        CLR     P1.4
        DJNZ    R7,WAA
        RET
  STA:  SETB    P1.4
        SETB    P1.2
        NOP     
        NOP
        NOP
        CLR     P1.4
        NOP
        NOP
        CLR     P1.2
        RET
  STOP: CLR     P1.4
        SETB    P1.2
        NOP
        NOP
        SETB    P1.2
        NOP
        NOP
        SETB    P1.4
        NOP
        NOP
        CLR     P1.2
        RET
  MACK: CLR     P1.4
        SETB    P1.2
        NOP
        NOP
        CLR     P1.2
        SETB    P1.4
        RET
  MNACK:SETB    P1.4
        SETB    P1.2
        NOP
        NOP
        CLR     P1.2
        CLR     P1.4
        RET
 CACK:  SETB    P1.4
        SETB    P1.2
        NOP
        MOV     C,P1.4
        MOV     F0,C
        CLR     P1.2
        NOP
        
        RET
    
        END