gooda

START:
MOV P0,#11100111B
MOV P1,#11011011B
MOV P2,#10111101B
CALL DELAY
MOV P0,#11011011B
MOV P1,#10111101B
MOV P2,#01111110B
CALL DELAY
MOV P0,#10111101B
MOV P1,#01111110B
MOV P2,#10111101B
CALL DELAY
MOV P0,#01111110B
MOV P1,#10111101B
MOV P2,#11011011B
CALL DELAY
MOV P0,#10111101B
MOV P1,#11011011B
MOV P2,#11100111B
CALL DELAY
MOV P0,#11011011B
MOV P1,#11100111B
MOV P2,#11011011B
CALL DELAY
JMP START


DELAY: MOV R0,#120
D1: MOV R1,#120
D2: DJNZ R1,D2
DJNZ R0,D1
RET
END