DL50: CLR A MOV B,#40H DJNZ B,＄ DJNZ ACC,＄-3 RET KEYIN2: MOV R0,#50H LA0: MOV R3,#0 MOV P2,#LEDH LA1: MOV A,R3 MOV DPTR,#TABLE MOVC A,@A+DPTR CPL A MOVX @R0,A JB P1.7,NXA1 RECL: ACALL DL50 XA2: JB P1.6,XA0 ACALL DL50 JNB P1.6,＄ JNB P1.7,＄-3 ACALL DL50 JNB P1.6,＄ JNB P1.7,＄-3 SJMP NXA4 XA0: JNB P1.7,XA2 ACALL DL50 JNB P1.7,＄ XA1: INC R3 CJNE R3,#10,＄+3 JCN XA1 MOV R3,#0 NXA1: JB P1.6,LA1 ACALL DL50 NXA2: JB P1.7,NXA3 ACALL DL50 JNB P1.7,＄ JNB P1.6,＄-3 ACALL DL50 JNB P1.7,＄ JNB P1.6,＄-3 SJMP KEYIN2 NXA3: JNB P1.6,NXA2 ACALL DL50 JNB P1.6,＄ MOV A,R3 MOV @R0,A MOV A,#255 MOVX @R0,A ACALL DL50 INC R0 CJNE R0,#5FH,LA0 NXA4: MOV A,#255 MOVX @R0,A RET