速度检测0.asm

电动车的程序

   ORG 0000H
       SJMP MAIN
       ORG 000BH
       SJMP INTT2
       ORG 0030H
 MAIN:MOV 51H,#00H
      SETB EA
      SETB ET2
      MOV TMOD,#06H
      MOV TH2,#0FFH
      MOV TL2,#0FFH
      SETB TR2
      ACALL XIANSHI
      SJMP $

INTT0:MOV R0,#51H
      MOV A,@R0
      INC A
      MOV @R0,A
      ACALL XIANSHI
      RETI

XIANSHI:MOV 33H,#08H
      MOV R0,#51H
      MOV SCON,#00H
      CLR P2.7
      MOV DPTR ,#TABLE
      CLR TI

FA:   MOV A,@R0
      MOVC A,@A+DPTR
      ;  CLR P2.7
      MOV  SBUF,A
      JNB TI,$
      CLR TI
      INC R0
      DJNZ 33H,FA
     RET
DELAY :MOV 45H,#0FH
LOOP1:MOV 46H,#0FH
LOOP2:DJNZ 46H,LOOP2
      DJNZ 45H,LOOP1
      RET
TABLE:DB 3FH ,06H,5BH,4FH,66H,6DH
      DB 7DH,07H,7FH,6FH,80H
      END