ORG 0000H ; 数码管共阴
AJMP MAIN
ORG 000BH
T0MS EQU NOT 50000 ; 100 mS 晶振 6.000 MHz
PJSBZ EQU 20H
PJSBZY EQU 21H
PST0: MOV TL0, #LOW T0MS ; T0 中断
MOV TH0, #HIGH T0MS
SETB PJSBZ ; 100 mS 标志
DJNZ R6, PST02
MOV R6, #100 ; 100 mS * 100 = 10 S
SETB PJSBZY ; 10 S 标志
PST02: RETI
MAIN: MOV TMOD, #01H
MOV IE, #82H ; 开 T0 中断
MOV SP, #30H
MOV TL0, #LOW T0MS ; TO 100MS 中断 计时 0
MOV TH0, #HIGH T0MS
SETB TR0
MOV R6, #10 ; 计时初值
MOV DPTR,#TAB
MAIN1: MOV R0, #0
MAIN2: JNB PJSBZY, $ ; 10 S
CLR PJSBZY
MOV A, R0
MOVC A,@A+DPTR
MOV SBUF, A
INC R0
CJNE R0, #0AH, MAIN2
AJMP MAIN1
TAB: DB 3FH, 06H, 5BH, 4FH, 66H, 6DH, 7DH, 07H, 7FH, 6FH
DB 77H, 7CH, 39H, 5EH, 79H, 71H
END
