rotabit o kit de 16 bits
el bit recorre cad uno de los 16 leds, de izquierda a derecha o de der a izq, en un ciclo infinito.
;Autor ARES
;URL
INICIO:
MOV A,#01
IZQ: MOV P0,A
ACALL RETARDO
RL A
CJNE A,#80H,IZQ
MOV P0,#00
MOV A,#01
IZQQ: MOV P1,A
ACALL RETARDO
RL A
CJNE A,#80H,IZQQ
DERR: MOV P1,A
ACALL RETARDO
RR A
CJNE A,#01H,DERR
MOV P1,#00
MOV A,#80H
DER: MOV P0,A
ACALL RETARDO
RR A
CJNE A,#01,DER
SJMP IZQ
RETARDO:
MOV R0,#207H
MOV R1,#36H
MOV R2,#02
AQUI: DJNZ R0,AQUI
DJNZ R1,AQUI
DJNZ R2,AQUI
NOP
RET
