【正文】 PAN2 LJMP PANDUAN1 PAN2: LJMP PANDUAN2 PANDUAN1: MOV R0,30H LOOP4: MOV A,@R0 JZ LOOP5 MOV A,@R0 CJNE A,21H,LOOP7 INC 21H LJMP MAIN LOOP5: MOV @R0,21H MOV A,R0 ADD A,16 MOV R1,A MOV @R1,12H MOV A,R1 ADD A,16 MOV R1,A MOV @R1,11H LCALL LOOP INC 21H LJMP MAIN 46 LOOP7: INC R0 MOV A,R0 CJNE A,40H,LOOP4 INC 21H LJMP MAIN PANDUAN2: MOV R0,30H LOOP6: MOV A,@R0 JNZ LOOP8 INC 21H LJMP MAIN LOOP8: MOV A,@R0 CJNE A,21H,LOOP10 LOOP9: MOV A,R0 INC A MOV R1,A MOV A,@R1 MOV @R0,A MOV A,R0 ADD A,16 MOV 22H,A INC A 47 MOV R1,A MOV A,@R1 MOV R1,22H MOV @R1,A MOV A,R0 ADD A,32 MOV 22H,A INC A MOV R1,A MOV A,@R1 MOV R1,22H MOV @R1,A INC R0 CJNE R0,40H,LOOP9 MOV 3FH,0 MOV 4FH,0 MOV 5FH,0 INC 21H LJMP MAIN LOOP10: INC R0 CJNE R0,40H,LOOP6 INC 21H LJMP MAIN 48 LOOP: MOV SCON,0 MOV A,R0 ADD A,32 MOV R1,A MOV A,@R1 ANL A,07FH MOV B,16 DIV AB MOV 17H,B MOV B,10 MUL AB ADD A,17H MOV B,10 DIV AB MOV 17H,A MOV A,B MOV DPTR,TAB MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI MOV A,17H MOV DPTR,TAB 49 MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI MOV A,R0 ADD A,16 MOV R1,A MOV A,@R1 ANL A,07FH MOV B,16 DIV AB MOV 17H,B MOV B,10 MUL AB ADD A,17H MOV B,10 DIV AB MOV 17H,A MOV A,B MOV DPTR,TAB MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ 50 CLR TI MOV A,17H MOV DPTR,TAB MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI MOV B,10 MOV A,@R0 DIV AB MOV 17H,A MOV A,B MOV DPTR,TAB MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI MOV A,17H MOV DPTR,TAB MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI 51 RET LOOPTIME: MOV SCON,0 MOV A,10H ANL A,07FH MOV B,16 DIV AB MOV 17H,B MOV B,10 MUL AB ADD A,17H MOV B,10 DIV AB MOV 17H,A MOV A,B MOV DPTR,TAB MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI MOV A,17H MOV DPTR,TAB MOVC A,@A+DPTR 52 MOV SBUF,A JNB TI,$ CLR TI MOV A,11H ANL A,07FH MOV B,16 DIV AB MOV 17H,B MOV B,10 MUL AB ADD A,17H MOV B,10 DIV AB MOV 17H,A MOV A,B MOV DPTR,TAB MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI MOV A,17H MOV DPTR,TAB MOVC A,@A+DPTR 53 MOV SBUF,A JNB TI,$ CLR TI MOV B,16 MOV A,12H DIV AB MOV 17H,A MOV A,B MOV DPTR,TAB MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI MOV A,17H MOV DPTR,TAB MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ CLR TI RET DIS_DELAY: PUSH PSW MOV R3,10 54 D1: MOV R6,248 D2: MOV r5,200 DJNZ r5,$ DJNZ R6,d2 DJNZ R3,D1 POP PSW RET