org 0

start:

mov dptr,#8008h
movx @dptr,#10000000b
mov dpl,#0
mov dph,#250
ljmp opoznienie

mov dptr,#8008h
movx @dptr,#01000000b
mov dpl,#0
mov dph,#250
ljmp opoznienie

mov dptr,#8008h
movx @dptr,#00100000b
mov dpl,#0
mov dph,#250
ljmp opoznienie

mov dptr,#8008h
movx @dptr,#00010000b
mov dpl,#0
mov dph,#250
ljmp opoznienie

mov dptr,#8008h
movx @dptr,#00001000b
mov dpl,#0
mov dph,#250
ljmp opoznienie


mov dptr,#8008h
movx @dptr,#00000100b
mov dpl,#0
mov dph,#250
ljmp opoznienie

mov dptr,#8008h
movx @dptr,#00000010b
mov dpl,#0
mov dph,#250

ljmp opoznienie
mov dptr,#8008h
movx @dptr,#00000001b
mov dpl,#0
mov dph,#250

ljmp opoznienie


mov dptr,#8008h
movx @dptr,#00000000b


mov P1,#0
mov dptr,#8018h
movx @dptr,#00000010b
mov dpl,#0
mov dph,#250
ljmp opoznienie



mov P1,#1
mov dptr,#8018h
movx @dptr,#00000010b
mov dpl,#0
mov dph,#250
ljmp opoznienie
mov dptr,#8018h
movx @dptr,#00000000b


mov P1,#2
mov dptr,#8018h
movx @dptr,#00000010b
mov dpl,#0
mov dph,#250
ljmp opoznienie
mov dptr,#8018h
movx @dptr,#00000000b


mov P1,#3
mov dptr,#8018h
movx @dptr,#00000010b
mov dpl,#0
mov dph,#250
ljmp opoznienie
mov dptr,#8018h
movx @dptr,#00000000b

ljmp start





loop:
inc dptr
mov a,dph
orl a,dpl
jnz opoznienie
ret


end