lab5-asm-v1

        ORG   0h
        AJMP  START
        ORG   1Bh
        AJMP  TIMER
        ORG   23h
        AJMP  SEND
        ORG   30h


START:
        MOV     DPTR,   #0010h
        MOV     DPTR,   #10h
        MOV     A,      #00000000b
        MOVX    @DPTR,  A
        INC     DPTR

        MOV     A,      #00000001b
        MOVX    @DPTR,  A
        INC     DPTR

        MOV     A,      #00000010b
        MOVX    @DPTR,  A
        INC     DPTR

        MOV     A,      #00000011b
        MOVX    @DPTR,  A
        INC     DPTR

        MOV     A,      #00000100b
        MOVX    @DPTR,  A
        INC     DPTR

        MOV     A,      #00000101b
        MOVX    @DPTR,  A
        INC     DPTR

        MOV     A,      #00000110b
        MOVX    @DPTR,  A
        INC     DPTR

        MOV     A,      #00000111b
        MOVX    @DPTR,  A

        MOV     SCON,   #10010000b
        MOV     PCON,   #10000000b ;SMOD

        MOV     IE,     #10011000b


RESTART:
        MOV     DPTR,   #10h
        MOV     R0,     #08d


LOOP:
        MOVX    A,      @DPTR
        INC     DPTR

        ANL     A,      #0Fh
        ACALL   FUNC

        CLR     ES
        MOV     TMOD,   #00010000b
        MOV     TCON,   #01000001b
        MOV     R6,     #20d

        CLR     18
        JNB     18,     $

        MOV     TCON,   #00000000b
        SETB    ES
        SETB    TI
        CLR     TI
        DJNZ    R0,     LOOP
        JMP     RESTART


SEND:
        MOV     SBUF,   A
        RETI


FUNC:
        MOV     20h,    A
        MOV     C,      01
        CPL     C
        ANL     C,      00
        ORL     C,      /02
        MOV     03,     C

        XRL     A,      20H
        MOV     25h,    A
        MOV     C,      43
        MOV     07,     C

        MOV     A,      20H
        RETI


TIMER:
        DJNZ    R6,     RESTART_TIMER
        SETB    18
        RETI


RESTART_TIMER:
        MOV     TH1,    #00111100b ;15536
        MOV     TL1,    #10110000b ;15536
        RETI
END