;串行通信發送程序清單;
        ORG    0100H    
        MOV    TMOD,#20H
        MOV    TH1, #0F3H
        MOV    TL1, #0F3H
        MOV    SCON,#0D0H
        MOV    PCON,#80H
        MOV    R0,  #30H
        MOV    R1,  #40H
        MOV    R2,  #0AH
        SETB   TR1
S1:     MOV    A,   @R0
        MOV    SBUF, A
S2:     JBC    TI,  S3
        AJMP   S2
S3:     CLR    TI
S4:     JBC    RI,  S5
        AJMP   S4
S5:     MOV    A,   SBUF
        CLR    RI
        MOV    @R1, A
        INC    R0
        INC    R1
        DJNZ   R2,  S1
        SJMP   $
        END