ORG   0000H
       LJMP  START
       ORG   0030H
START:
       mov   a, #0FEh
       mov   r5, #8
Output:
       mov   P1, a
       rl    a
       Acall Delay
       djnz  r5, Output
       Sjmp  START

Delay:
       mov   r6, #0
A1:    mov   r7, #0
DelayLoop:
       NOP
       NOP
       djnz  r7, DelayLoop
       djnz  r6, A1
       ret

       end