Menyalakan LED di P2 Geser ke Kiri

$mod51
org 0h
mov A,#01111111b
mulai: mov P2,A
call delay
RR A
sjmp mulai
delay: mov r0,#5
del1: mov r1,#200
del2: mov r2,#100
djnz r2,$
djnz r1,del2
djnz r0,del1
ret
end