CLR P1.1
LCALL DELAY
SETB P1.1
CLR P1.2
LCALL DELAY
SETB P1.2
CLR P1.3
LCALL DELAY
SETB P1.3
CLR P1.4
LCALL DELAY
SETB P1.4
CLR P1.5
LCALL DELAY
SETB P1.5
CLR P1.6
LCALL DELAY
SETB P1.6
CLR P1.7
LCALL DELAY
SETB P1.7
CLR P1.6
LCALL DELAY
SETB P1.6
CLR P1.5
LCALL DELAY
SETB P1.5
CLR P1.4
LCALL DELAY
SETB P1.4
CLR P1.3
LCALL DELAY
SETB P1.3
CLR P1.2
LCALL DELAY
SETB P1.2
CLR P1.1
LCALL DELAY
SETB P1.1
CLR P1.0
LCALL DELAY
SETB P1.0
LJMP MAIN
DELAY: MOV R5,#20 ;
D1: MOV R6,#20
D2: MOV R7,#248
DJNZ R7,$
DJNZ R6,D2
DJNZ R5,D1
RET
END