0-f.asm

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

DSPBUF EQU 50H;..52H
PDSPSEG EQU P0
PDSPPCS EQU P2
ORG 0000H
AJMP MAIN
ORG 0003H
CLR EX0
RETI
ORG 000BH
AJMP T0INT
ORG 0013H
CLR EX1
RETI
ORG 001BH
CLR ET1
RETI
ORG 0023H
RETI
    MAIN:MOV DSPBUF,#0
         MOV 60H,#0
         ACALL T0CSH
MAINLOOP:ACALL DISPLAY
         AJMP MAINLOOP
   T0CSH:MOV TMOD,#00000001B
         MOV TH0,#HIGH(65536-10000)
         MOV TL0,#LOW(65536-10000)
         SETB TR0
         SETB EA
         SETB ET0
         RET
   T0INT:PUSH PSW
         PUSH ACC
         MOV TH0,#HIGH(65536-10000)
         MOV TL0,#LOW(65536-10000)
         INC 60H
         MOV A,60H
         CJNE A,#100,L0
         MOV 60H,#0
         INC DSPBUF
         MOV A,DSPBUF
         CJNE A,#10H,L0
         MOV DSPBUF,#0
      L0:POP ACC
         POP PSW
         RETI
 DISPLAY:MOV R2,#11011111B
         MOV R0,#DSPBUF
      LP:MOV A,@R0
         MOV DPTR,#DSPTAB
         MOVC A,@A+DPTR
         MOV PDSPSEG,A
         MOV PDSPPCS,R2
         ACALL DELAY
         MOV A,R2
         RL A
         MOV R2,A
         INC R0
         JB ACC.6,LP
         RET
   DELAY:MOV R3,#10
      L1:MOV R4,#10
      L2:DJNZ R4,L2
         DJNZ R3,L1
         RET
  DSPTAB:DB 0C0H,0F9H,0A4H,0B0H,99H
         DB 92H,82H,0F8H,80H,90H
         ;DB 88H,83H,0C6H,0A1H,86H,8EH
end