999999.asm

里面包含了18个定时定数器

;********************************************************************************
;0-999999 秒计时   8数码管显示                                                  *
;********************************************************************************
;*  日期:  2007-3-25                                                            *
;*  版本:  3.0                                                                  *
;*  作者:  深圳学林电子有限公司     专业8051单片机教学站                        *
;*  邮箱: [e-mail]                                                       *
;*  网站： http://www.51c51.com     http://www.8951.com    更多例程请登陆网站   *
;********************************************************************************
;*  硬件：此程序在本公司xlisp系列单片机实验仪运行通过                           *
;********************************************************************************
;* 【版权】 Copyright(C)深圳学林电子有限公司 www.51c51.com  All Rights Reserved *
;* 【声明】 此程序仅用于学习与参考，引用请注明版权和作者信息！                  *
;********************************************************************************
         Count      EQU  40H
         TimeCount  EQU  3FH
;**********************************************************
         ORG 0000H
         JMP  MAIN
         ORG  000BH
         JMP  TIMER0
         ORG 0030H
;**********************************************************
MAIN:
         MOV  SP,#60H
         MOV TMOD,#01
         SETB  EA
         SETB  ET0
         SETB  TR0
         MOV  TH0,#4CH         ;50ms定时
         MOV  TL0,#00H
         MOV  R0,#Count
         MOV  A,#00H
CLR_1:
         MOV  @R0,A             ;清零
         INC  R0
         CJNE  R0,#49H,CLR_1
DISP:
         MOV R0,#Count         ;获得显示单元首地址
         MOV R1,#07FH          ;从第一个数码管开始
         MOV R2,#08H           ;共显示8位数码管
DISP1:
         MOV A,@R0             ;获得当前位地址
         MOV DPTR,#TABLE       ;获得表头
         MOVC A,@A+DPTR        ;查表获得显示数据
         MOV P0,A              ;显示数据
         MOV P2,R1             ;开始显示当前位
         MOV A,R1              ;准备显示下一位
         CJNE  A,#0BFH,DISP2

DISP2:
         RR A
         MOV R1,A              ;下一位
         INC R0                ;取下一个单元地址
         LCALL DELAY2MS        ;延时 2 MS
         DJNZ R2,DISP1         ;重复显示下一个
         MOV  P2,#0FFH
         JMP  DISP
         RET                   ;显示完成，返回
;---------------------------------------------------------
;延时子程序
;---------------------------------------------------------
DELAY2MS:
         MOV  R6,#10
DEL1:
         MOV  R7,#100
         DJNZ  R7,$
         DJNZ  R6,DEL1
         RET
;**********************************************************
TIMER0:
         PUSH  ACC
         MOV  TH0,#4CH             ;50ms定时
         MOV  TL0,#00H
         INC  TimeCount
         MOV  A,TimeCount
         CJNE  A,#2,T_END
         MOV  TimeCount,#00H
         INC Count                 ;小数位
         MOV A,Count
         CJNE A,#10,T_END
         MOV  Count,#00H
         INC Count+1               ;个位
         MOV A,Count+1
         CJNE A,#10,T_END
         MOV  Count+1,#00H
         INC Count+2               ;十位
         MOV A,Count+2
         CJNE A,#10,T_END
         MOV  Count+2,#00H
         INC Count+3               ;百位
         MOV A,Count+3
         CJNE A,#10,T_END
         MOV  Count+3,#00H
         INC Count+4               ;千位
         MOV A,Count+4
         CJNE A,#10,T_END
         MOV  Count+4,#00H
         INC Count+5               ;万位
         MOV A,Count+5
         CJNE A,#10,T_END
         MOV  Count+5,#00H
         INC Count+6               ;十万位
         MOV A,Count+6
         CJNE A,#10,T_END
         MOV  Count+6,#00H
         INC Count+7               ;百万位
         MOV A,Count+7
         CJNE A,#10,T_END
         MOV  Count+7,#00H
T_END:
         POP  ACC
         RETI
;**********************************************************
TABLE:
       db 28h,7eh,0a2h,62h,74h,61h,21h,7ah,20h,60h
;**********************************************************
         END