ORG 0000H
BEGIN:  LJMP START
        ;
        ORG 0030H
START:  MOV B,#01
LOOP:   MOV DPTR,#0A000H
        MOVX A,@DPTR
        CJNE A,#00,OUT
        MOV A,B
        RL A
        MOV B,A
        MOV R6,#0FFH
DE:     MOV R7,#0FFH
        DJNZ R7,$
        DJNZ R6,DE
OUT:    MOV DPTR,#0B000H
        MOVX @DPTR,A
        SJMP LOOP
        END