- 1、本文档共5页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
单片机程序秒表
(一)独立按键显示数码管从1加到9
ORG 0000H //程序地址开始入口
AJMP WAIT
ORG 0030H
WAIT: MOV P2,#0C0H //P0口初使化
MOV DPTR,#TAB //查表初始化
MOV P1,#0FFH
QD: JB P3.1,QD
ACALL DELAY
JB P3.1,QD
JNB P3.1,$
INC R0
ACALL ZERO //根据题目要求选择相应的程序(ACALL PG或者 ACALL ZERO)
//ACALL PG
WT: ACALL DIS
SJMP QD
;******数码管显示程序********;
DIS: MOV A,R0
MOVC A,@A+DPTR
MOV P2,A //查表显示
RET // 返回
;******数码管防止显示乱码程序********;
PG: MOV A,R0 //
MOV R1,#9 // R1赋值15
SUBB A ,R1 // R0减去15
JB ACC.7, WT // 结果是负数表明R0的值小于15跳转,防止查表超出显示乱码
MOV R0,#9 //
RET // 返回
;******数码管显示归0程序********;
ZERO:MOV A,R0
CJNE A,#10,WT //判断是否到10
MOV R0,#00H // 十位清零
RET
;******去抖延时子程序********;
DELAY:MOV R7,#0FFH
LP1: MOV R6,#0FFH
LP2: DJNZ R6,LP2
DJNZ R7,LP1
RET
;***********高位接a段,低位H段共阳数码管***********
TAB: DB 0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90
END //结束
(二)0-999秒表显示程序
ORG 0000H
AJMP MAIN
ORG 000BH
AJMP TIME0
MAIN: MOV 66H,#00H // 个位显示缓冲期
MOV 67H,#00H // 十位显示缓冲期
MOV 68H,#00H // 十位显示缓冲期
;-----------------------------------
MOV TMOD,#01H //选择T0方式1
MOV TH0,#(65536-5000)/256
MOV TL0,#(65536-5000)mod 256 //装5ms的初值
SETB EA // 开总中断
SETB ET0 // 开T0中断
SETB TR0 // 中断允许位开启
MOV R5,#200 // 1s需要的 次数
LOOP: ACALL display //调用动态显示
SJMP LOOP // 一直在显示
TIME0: MOV TH0,#(65536-5000)/256
MOV TL0,#(65536-5000)mod 256 //重装初值
DJNZ R5,NEXT // 200次结束1s时间到
MOV R5,#200 //给R5
INC 66H //个位加1
MOV A,66H // 把67H的内容送给A
CJNE A,#10,NEXT//判断是否到10
MOV 66H,#00H // 个位清零
INC 67H //十位加1
MOV A,67H
CJNE A,#10,NEXT //判断是否到10
MOV 67H,#00H // 十位清零
INC 68H //百位加1
MOV A,68H
CJNE A,#10,NEXT //判断是否到10
MOV 68H,#00H // 百位清
NEXT: RETI
/**********数码管动态显示程序***********/
display:MOV R7,#3
MOV R0,#66H // 个位数显示
MOV R6,#80H //选中个位
MOV DPTR,#TAB
LOOP3: MOV A,@R0
MOVC A,@A+DPTR // 查表
MOV P2,A // 送段选
MOV P1,R6 // 送位选
MOV A,R6
您可能关注的文档
最近下载
- 立体构成PPT-课件.pptx VIP
- 梅赛德斯-奔驰-R级-产品使用说明书-R350 4MATIC-251165-Rclass.pdf
- 设计依据和设计工作目标.doc VIP
- 津津有味·读经典Level2《铁路少年》译文和答案.pdf
- 办公楼装修 投标方案(技术方案).docx
- 津津有味·读经典Level2《铁路少年》译文和答案.pptx
- 白门埭川李氏宗谱 卷一 苍坡卷2023年癸卯修订稿.pdf
- 器械不良反应报表.docx
- 超星学习通 大学生心理健康教育(北京大学)尔雅网课答案.pdf
- 荣威-550-产品使用说明书-550 Plug-in 豪华版-CSA7154TDPHEV-荣威e550用户手册-2017.3.10.pdf
文档评论(0)