MOV A,R2 RLC A MOV R2,A MOV A,R3 ADDC A,R3 DA A MOV R3,A DJNZ R7,LOOP MOV A, R3 MOV R4, A
MOV R7,#200
DELAY1: MOV R6,#100 DELAY2: MOV R5,#100 DELAY3: MOV A,R3 MOV R4, A CLR P3.1
MOV R1, #100 DJNZ R1, $ SETB P3.0
MOV R1, #100 DJNZ R1, $ MOV A, #0F0H
ANL A, R4 SWAP A
ADD A, #31 MOVC A, @A+PC MOV P1, A MOV A, R3 MOV R4, A CLR P3.0 MOV R1, #100 DJNZ R1, $ SETB P3.1
MOV R1, #100 DJNZ R1, $ MOV A,#0FH
ANL A,R4 ADD A,#9 MOVC A,@A+PC MOV P1,A
DJNZ R5,DELAY3 DJNZ R6,DELAY2 DJNZ R7,DELAY1 RET
21
DB 0C0H,0F9H,0A4H,0B0H,99H DB 92H,82H,0F8H,80H,90H END
22