;8155輸出
       org  0000H
       LJMP START
       ORG  0030H
START:
       mov   a,#3
       mov   dptr,  #7F00H
       movx  @dptr,a
Loop:
       mov   a, #0FEh
       mov   r2, #8
Output:
       mov   dptr,#7F01H
       movx  @dptr, a
       Acall  Delay
       rl    a
       djnz  r2, Output
       ljmp  Loop

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

       end