0-99.asm

单片机0到99编程 真的很不错

     ORG  0000H
MAIN:  MOV  R7 ,#00
LP:    ACALL qq
       ACALL DISPLAY
       ACALL KEY
       JB F0,LP
       ACALL DELAY
       INC R7
       CJNE  R7,#100,LP
       SJMP  MAIN
DELAY:MOV  R5,#20
   D1:MOV  R4,#200
   D2:ACALL qq
      ACALL DISPLAY
      DJNZ R4 , D2
      DJNZ R5,  D1
      RET

qq:MOV  A,R7
   MOV  B, #10
   DIV  AB
   MOV  30H , A
   MOV  31H , B
   RET
DELAY1:MOV  R3,#14H
       DJNZ R3,$
       RET
DISPLAY:MOV P2,#0FFH
       MOV DPTR,#TAB
       MOV A,30H
       MOVC A,@A+DPTR
       MOV P0,A
       CLR P2.6
       ACALL DELAY1
       SETB P2.6
       MOV A,31H
       MOVC A,@A+DPTR
       MOV P0,A
       CLR P2.5
       ACALL DELAY1
       SETB P2.5
       RET
KEY: JB P3.2,L1
     MOV R7,#00H
     JNB P3.2,$
     SJMP OUT
 L1: JB P3.4 ,OUT
     CPL F0
     JNB P3.4,$
     OUT: RET
TAB: DB 0C0H,0F9H,0A4H,0B0H,99H
     DB 92H,82H,0F8H,80H,90H