$mod51
org 00h

mov p1,#3fh
acall delay
mov p1,#06h
acall delay
mov p1,#5bh
acall delay
mov p1,#4fh
acall delay
mov p1,#66h
acall delay
mov p1,#6dh
acall delay
mov p1,#7dh
acall delay
mov p1,#47h
acall delay
mov p1,#7fh
acall delay
mov p1,#6fh
acall delay


delay:

    mov r0,#255
L3: mov r1,#255
L2: mov r2,#50
L1: djnz r2,L1
    djnz r1,L2
    djnz r0,L3

ret
end