org 0000h

llai:mov p0, # 00000000b

mov p1, # 00000000b

mov p2, # 00000000b

mov p3, # 00000000b

mov p0, # 10000000b

call delay

mov p0, # 11000000b

call delay

mov p0, # 11100000b

call delay

mov p0, # 11110000b

call delay

mov p0, # 11111000b

call delay

mov p0, # 11111100b

call delay

mov p0, # 11111110b

call delay

mov p0, # 11111111b

mov p2, # 10000000b

call delay

mov p2, # 11000000b

call delay

mov p2, # 11100000b

call delay

mov p2, # 11110000b

call delay

mov p2, # 11111000b

call delay

mov p2, # 11111100b

call delay

mov p2, # 11111110b

call delay

mov p2, # 11111111b

mov p1, # 10000000b

call delay

mov p1, # 11000000b

call delay

mov p1, # 11100000b

call delay

mov p1, # 11110000b

call delay

mov p1, # 11111000b

call delay

mov p1, # 11111100b

call delay

mov p1, # 11111110b

call delay

mov p1, # 11111111b

mov p3, # 10000000b

call delay

mov p3, # 11000000b

call delay

mov p3, # 11100000b

call delay

mov p3, # 11110000b

call delay

mov p3, # 11111000b

call delay

mov p3, # 11111100b

call delay

mov p3, # 11111110b

call delay

mov p3, # 11111111b

call delay

mov p0, # 00000000b

mov p1, # 00000000b

mov p2, # 00000000b

mov p3, # 00000000b

mov p1, # 10000000b

mov p2, # 00000001b

call delay

mov p1, # 11000000b

mov p2, # 00000011b

call delay

mov p1, # 11100000b

mov p2, # 00000111b

call delay

mov p1, # 11110000b

mov p2, # 00001111b

call delay

mov p1, # 11111000b

mov p2, # 00011111b

call delay

mov p1, # 11111100b

mov p2, # 00111111b

call delay

mov p1, # 11111110b

mov p2, # 01111111b

call delay

mov p1, # 11111111b

mov p2, # 11111111b

call delay

mov p0, # 00000001b

mov p3, # 10000000b

call delay

mov p0, # 00000011b

mov p3, # 11000000b

call delay

mov p0, # 00000111b

mov p3, # 11100000b

call delay

mov p0, # 00001111b

mov p3, # 11110000b

call delay

mov p0, # 00011111b

mov p3, # 11111000b

call delay

mov p0, # 00111111b

mov p3, # 11111100b

call delay

mov p0, # 01111111b

mov p3, # 11111110b

call delay

mov p0, # 11111111b

mov p3, # 11111111b

call delay

jmp llai

delay:

mov r3, #10

vong1:mov r4, #50

vong2:mov r5, #250

djnz r5,  $

djnz r4, vong2

djnz r3, vong1

end