MOV     R0,#020H
        MOV     B,#16
        MOV     C,07FH
LOOP:   MOV     A,@R0
        RLC     A
        MOV     @R0,A
        INC     R0
        DJNZ    B,LOOP