;利用8051串行口，和并行輸出串行移位寄存器74LS164，
;擴展一位數碼顯示在數碼顯示器上循環顯示0-9這10個數字。
;晶振頻率為11.0592MHZ
;4C00為50ms定時常數
ORG0000H
LJMPSTART
ORG000BH;定時器0中斷程序入口地址
AJMP INTT0
ORG0040H
START:
MOVSP,#60H
MOVTMOD,#01H;定時器0方式 1
MOVTL0,#00H;延時 50mS 的常數
MOVTH0,#4CH
MOVR0,#0
MOVR1,#20
MOVSCON,#00H;置串口工作方式 0
CLRTI
CLRRI
SETB TR0;開中斷
SETB ET0
SETB EA
SJMP $
INTT0:;定時器0中斷子程序
PUSH ACC;保護現場
PUSH PSW
CLRET0;關定時器0中斷
CLRTR0
MOVTL0,#00H;延時 50mS 的常數
MOVTH0,#4CH
DJNZ R1,EXIT
MOVR1,#20;延時一秒的常數
MOVDPTR,#DATAb;置表格基址
MOVA,R0;置表格偏移量
MOVC A,@A+DPTR;讀表格數據
CLRTI
MOVSBUF,A;串行發送數據
INCR0
CJNE R0,#0AH,EXIT ;判斷是否到表尾
MOVR0,#00H;調整表格偏移量
EXIT:
SETB TR0
SETB ET0;開定時器0中斷
POPPSW
POPACC;恢復現場
RETI
DATAb:;數碼管顯示常數表
DB 03H,9FH,25H,0DH,99H,49H,41H,1FH,01H,09H;0 1 2 3 4 5 6 7 8 9
END