利用8051单片机串行口串并转换输出程序-EDA365

;利用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

『本文转载自网络,版权归原作者所有,如有侵权请联系删除』

利用8051单片机串行口串并转换输出程序

相关推荐