acall del3
(1) MOV R7, #100
SETB P2.1
LOOP4: CLR P2.0
ACALL DEL2
SETB P2.0
ACALL DEL1
DJNZ R7, LOOP4
acall del3
MOV R5,#100
CLR P0.1
ACALL DEL1
LOOP: CLR P0.0
ACALL DEL2
SETB P0.0
ACALL DEL1
DJNZ R5,LOOP
acall del3
MOV R4,#100
CLR P2.1
ACALL DEL1
LOOP6: CLR P2.0
ACALL DEL2
SETB P2.0
ACALL DEL1
DJNZ R4,LOOP6
acall del3
DEL1: MOV A,#82
LOOP2: DEC A
JNZ LOOP2
RET
DEL2: MOV A,#249
LOOP3: DEC A
JNZ LOOP3
RET
del3: mov r3,#20
mov r2,#253
mov r1,#219
loop5: djnz r1,$
djnz r2,loop5
djnz r3,loop5
nop
ret
END
DEL1: MOV A,#82
它们之间加一个 RET