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