【正文】 MOV TL0,00H 29 CLR IT0 SETB ET0 SETB PX0 START2: SETB EA MOV R4,04H CLR TF0 SETB TR0 。測(cè)量間隔控制 （ 約 2*200=200MS） LOOP1:LCALL DISPLAY DJNZ R2,LOOP1 LJMP START2 SS2:CJNE A,02H,START1 LCALL WORK 。測(cè)量間隔控制 （ 約 2*200=200MS） LOOP: LCALL DISPLAY DJNZ R2,LOOP LJMP START2 。**************************************************** 。**************************************************** 。關(guān)計(jì)數(shù)器 MOV TH0,00H MOV TL0,00H MOV 40H,0BH MOV 41H,0BH MOV 42H,0BH MOV 43H,0BH SETB 00H 32 POP PSW POP ACC RETI 。關(guān)計(jì)數(shù)器 CLR EA CLR EX0 JNB ,$ MOV 44H,TL0 。 MOV TH0,00H MOV TL0,00H SETB 01H POP PSW POP ACC RETI 。* 顯示程序 * 。 40H為最高位 ， 43H為最低位 ， DISPLAY: MOV DPTR,TAB MOV A,40H MOVC A,A+DPTR MOV 50H,A MOV A,41H MOVC A,A+DPTR MOV 51H,A MOV A,42H MOVC A,A+DPTR MOV 52H,A MOV A,43H 33 MOVC A,A+DPTR MOV 53H,A SETB SETB SETB MOV SBUF,50H JNB TI,$ CLR CLR TI LCALL DSSJ SETB MOV SBUF,51H JNB TI,$ CLR CLR TI LCALL DSSJ SETB MOV SBUF,52H JNB TI,$ CLR CLR TI LCALL DSSJ SETB MOV SBUF,53H JNB TI,$ CLR CLR TI LCALL DSSJ SETB RET TAB:DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,00H,71H DSSJ: mov r5,0fah 。 time2_5ms_1: mov r6,0f8h 。**************************************************** 。**************************************************** 。最高位為零，不點(diǎn)亮 JJ0: MOV A, R0 MOV R4, A MOV A, R1 MOV R5, A MOV R3, 00D MOV R2, 100D LCALL DIV4BY2 MOV 41H, R4 MOV A,41H JNZ JJ1 MOV A,40H 。最高位不亮 ， 次高位也不亮 JJ1: MOV A, R0 MOV R4, A MOV A, R1 MOV R5, A MOV R3, 00D MOV R2, 10D LCALL DIV4BY2 MOV 42H, R4 MOV A,42H JNZ JJ2 MOV A,41H 。次高位不亮 ， 次次高位也不亮 JJ2: MOV 43H, R0 POP B POP PSW POP ACC RET 。**************************************************** 。**************************************************** 。 MUL2BY2: CLR A MOV R7, A MOV R6, A MOV R5, A MOV R4, A MOV 46H, 10H MULLOOP1: CLR C MOV A, R4 RLC A MOV R4, A MOV A, R5 RLC A MOV R5, A MOV A, R6 36 RLC A MOV R6, A MOV A, R7 RLC A MOV R7, A MOV A, R0 RLC A MOV R0, A MOV A, R1 RLC A MOV R1, A JNC MULLOOP2 MOV A, R4 ADD A, R2 MOV R4, A MOV A, R5 ADDC A, R3 MOV R5, A MOV A, R6 ADDC A, 00H MOV R6, A MOV A, R7 ADDC A, 00H MOV R7, A MULLOOP2: DJNZ 46H, MULLOOP1 RET 。**************************************************** 。**************************************************** 。 DIV4BY2: MOV 46H, 20H MOV R0, 00H MOV R1, 00H DIVLOOP1: MOV A, R4 RLC A MOV R4, A MOV A, R5 RLC A 37 MOV R5, A MOV A, R6 RLC A MOV R6, A MOV A, R7 RLC A MOV R7, A MOV A, R0 RLC A MOV R0, A MOV A, R1 RLC A MOV R1, A CLR C MOV A, R0 SUBB A, R2 MOV B, A MOV A, R1 SUBB A, R3 JC DIVLOOP2 MOV R0, B MOV R1, A DIVLOOP2: CPL C DJNZ 46H, DIVLOOP1 MOV A, R4 RLC A MOV R4, A MOV A, R5 RLC A MOV R5, A MOV A, R6 RLC A MOV R6, A MOV A, R7 RLC A MOV R7, A RE