跑马灯 （SDCC编译器）

.AREA HOME(ABS,CODE)
.ORG #0x0000
ljmp start
.ORG #0x0100

start:
    mov a, #0xFE
loop:rl a
    mov p1,a
    lcall delay
    ljmp loop

delay:
    mov r6,#0
loop2:mov r7,#0
    djnz r7, .
    djnz r6, loop2
    ret