51单片机做数字电子钟

悬赏分:10 -解决时间：2009-7-517:４2

设计一个数字电子钟,要求可以进行时、分、秒显示，最大显示时间为23:59:59,并且可以通过按键进行时、分调整。"

画出硬件连接电路图,说明各个控制信号的作用。"

画出程序流程图，编写程序,硬件连接调试，直至正确。"

编写课程设计报告。"

3、给定条件

在Dais-52ＰH+单片机实验箱中,有一片８155芯片用于扩展3×3键盘，还具有６位ＬEＤ数码显示器，可分别用于按键和显示控制。

在PC机上调试可使用MＣS51仿真开发系统。

数字电子钟的工作过程为：从00：０0:00(时:分:秒）开始计时，以24小时为一循环,最大计时时间为２3：59:５9。当需要校正时间时，按下调整键，小时的十位闪烁，等待键入新值，若需调整则按下加1按键,数值以秒为单位自动加1,当十位调整好后，按下确认键确认,然后小时的个位闪烁，等待键入新值,按照十位的调整步骤调整时间,并按下确认键确认，当确认后,分钟的十位开始闪烁，等待键入新值,分钟的十位和个位调整过程与小时调整一样，只是当分的个位调整好后,按下确认键即启动计时。

数字电子钟是以1s为最小定时单位的，５1单片机自身具有两个1６位定时/计数器,当晶振频率为６MHｚ时,最大定时时间为0.13ｓ。而具有时、分和秒的数字电子钟只能以1s定时,所以要实现实现1s定时，必须采用软件计数和定时器定时相结合的方法。每1ｓ定时到,修改显示值，送6位ＬED显示。

本课题需用6个LED数码管显示时间值，并且需调整键、加1键、确认键等控制键。在Ｄaiｓ-5２PH+单片机实验箱中,６位ＬED数码显示器的字形口地址为0ＦFDCH，字位口地址为0FFDＤH,字形表和字位表见附录一。可通过8１55可编程接口芯片驱动的３×3键盘实现按键控制(具体电路参考课题一数字秒表)。8155的PC0～PC２为3×3键盘的行扫线，PB0～PB2为3×3键盘的列扫线，键盘工作过程为:单片机从815５的PB0～PB2送出全零，并从PC0~PC２读入数据,当PC0～ＰC2≠000时，表明有键按下,则逐行从PB0～PB2送出零，再从PC0～PC2口读入，最终确定按键位置和键值,此后,转入相应的按键处理程序,修改显示缓冲区内容。

提问者：ｗanｇalong２1１- 一级

最佳答案

源程序如下：ORG 0000Ｈ;程序开始入口

ＬＪＭＰＳＴＡRT

ＯＲＧ0０03H ;外中断0中断程序入口

RＥTI

ＯＲG 000BH ;定时器T0中断程序入口

LJMP IＮTT0 ;跳至IＮTTＯ执行

ORＧ0013Ｈ；外中断1中断程序入口

RETI

ORG 0０１BH ;定时器T1中断程序入口

ＬJMＰIＮTＴ1

ＯRG０0２3H ;串行中断程序入口地址

RETI

;-－－－-----------主程序---－-----－－－－-------－-;

START:MOV R0,#７0H ；70给R0,清70-７ＦH显示内存

MＯV R7,#０FH

CLEAＲDＩSP:MOV @R０,#00H；0给R0中的数为地址的内存中存放(７0H)

IＮＣR０

ＤJNZ R7,CLEAＲDISP

ＭOV78Ｈ,#2;默认时间为12：００,闹钟5:００

MOV 79H,#１

MＯＶ74H,#2;防止上电时数码管显示0０小时

MOV75Ｈ，#1

MOV 66H,#1；中断退出时6６Ｈ为１时，分、时计时单元数据移入显存标志

ＭOＶ68H,#1;上电默认闹钟开状态

ＭOV 7DH,#6 ;闹钟时十位

MOＶ７CH,＃３

MOV ６9H，#0

ＭＯV ７AH,#0AH;放入＂熄灭符"数据

MOV TMOD,#1１Ｈ;设Ｔ０、T1为１6位定时器

MOV TＬ０,#0B0H ;50MＳ定时初值（T0计时用)

MOＶTH0，＃3CＨ

SETB ＥA ；总中断开放

SETB ET0;允许Ｔ0中断

ＳEＴB ＴR0 ;T0定时器开始计时

MＯV R4,＃14Ｈ;1秒定时用初值（5０MＳ×20)

SＴＡRT1：ＬCALL DIＳＰＬAY ;显示子程序

LＣＡLLＢEＥＰ;闹钟查询

JＮＢP1.7,ＳＥTTIＭE ；P1.7口为0时转时间调整程序

JMP SＴＡRT1 ;Ｐ1.７口为1时跳回ＳＴART1

;---－-－--－-－-－--－---－---时间闹钟调整系统---－------－-－--------－---－;

NFLAG:MＯV Ａ,68Ｈ;设置闹钟开关状态

CJNEＡ,#1，BEE68

MOV 68Ｈ,#0

ＪＭP E6

BEE6８:ＭＯV68H,#1

Ｅ6:MOV 66H,#8 ；中断退出6６H不为1时分、时计时单元数据移入显存标志

MOV 72H,7ＢH

MＯV 73H,7CH

MOV 74H,７DH

MOV 75H，7EＨ

LCALL DDL

LCAＬLＤＤL

MOV 7２H，６8H

ＭＯV ７3H,6９H

MOV ７4H，７AH

MOV75H,7AH

LCALL ＤDL

LＣALL DDL

MOＶ６6H,#1

LJMP STAＲT1

SETTIME：ＬCALL ＤDＬ

ＪB P１.7,NFLAG ;键按下时间小于1秒，设置闹钟开关状态并查看闹钟时间,不关走时,确保准确,大于1秒调时

ＭOV TL１,＃0Ｂ0H ;Ｔ1闪烁定时初值

MOV TH1,#3CH

MＯV R2,#06H ；进入调时状态，赋闪烁定时初值

MOV 66Ｈ,#8 ;调闹钟时保持走时,关闭时钟显示数据

ＳＥＴB ET1 ；允许T1中断

SETＢTＲ1 ;开启定时器T１

ＳEＴ1:LCALL DＩＳPLAY;调用显示,防止键按下无显示

JNB P1.７，SＥT1 ;P1.7口为０等待键释放

MOV R5，#00Ｈ；清设置类型闪烁标志

ＳETN１:ＩNC R５;闹钟分调整

SET5:LＣAＬL DISＰＬＡY

JB P1．7，SET5

SEＥTN1：LＣAＬＬＤDL;有键按下大于1秒分时间连续加(0.5秒加1),小于1秒转调时状态

JＢP1.7,SET6 ;键释放查询,键释放自动转调时

MＯV Ｒ0,＃7CH

LCALＬＡDＤ1

MＯV A,R3

CLR Ｃ

CJＮE A,#60Ｈ,HHN１

HHN1:JC SＥＥTN１

LCAＬＬＣLＲ０

JMP SEETN1

ＳET6：INＣR5;闹钟时调整SＥEＴ6:LCＡＬＬDISPLＡY

JB P1.7,ＳＥＥT6

SEETNH1:LCALL DDL

JＢP1.７，ＳＥＴF

MOＶR0,#7EH

ＬCAＬL AＤＤ1

MOＶＡ,R3

CＬR C

CJNE A,#24H,HOＵU1

HOUU１:JC SEETＮH１

LCALL CＬR0

JMP SEETＮH1

ＳＥTF:ＬＣALL DIＳPLAＹ

JBＰ1.７,SETF

LＣＡＬL DDL

JNB Ｐ1．7,SETＯＵT;短按调时，长按退出

CＬRＥT0

CLR TR０

MＯＶ7０Ｈ,#０0Ｈ;设定后的时间从０0秒开始走时

MOV ７1Ｈ,#００Ｈ

INC R5

ＳET３:ＬCAＬL ＤISPＬＡY

ＪB P1.7,SET3

SETMＭ：LCALL ＤDＬ

JＢP1.7,ＳET4

MOV R0,#７7H

LＣＡLL ADD1

MOＶＡ,R3

ＣLR C

CJNＥＡ,＃60H,MMＨ

MMH:JC SETMM

LＣALL CＬＲ0

ＡＪMＰSＥTMM

SＥＴ4:INC Ｒ5

SEＥT４:LCALL DISPLＡＹ

JB P1.7，SEET4

SEＴHH:ＬＣＡＬL DDL

ＪB P1.７，SETOUT1

MOＶＲ0,#７9H

ＬCＡLＬADD1

ＭＯV A,Ｒ3

CＬR C

ＣJNＥA,#24H，HOＵU

ＨOUU:JＣSEＴHH

LCＡＬL CLR0

AJMP ＳEＴHH

SETOUT1:SＥTＢＥＴ0

ＳETB TR0;计时开始

ＳＥTＯUT：MＯV Ｒ5,#00H ;清设置类型闪烁标志

CLＲTR１;关闭T1

ＣLR ET１;关T1中断

MＯV6６Ｈ,#1

SＥTOUT２:LCALＬDISＰLAＹ

ＪＮB P１.7,SETOUT２

LJMP SＴARＴ1

;--－--------－-－---－-－--－---延时１秒钟－------------－－－------－;

DDＬ:ＭＯV 1８H，＃36

DDL０:MOV 17H,#２39

DDL1:LCALL ＤISPＬＡＹ

DJNＺ17H，DDL１

DJＮZ 18Ｈ，DDL0

RET

;－---－－-－--－-－-－---－--－－-----T０中断程序－----------－-－-----－－-－-；

IＮTT0：ＰUSＨACC;打包

PUＳH PSW

CLR ET０

CLＲＴR０

MOV A，#0B7H

AＤD A，TL0

MOV TＬ０,A

ＭOＶA，#３CＨ

ADＤC Ａ,ＴH０

MＯV ＴＨ０,A

ＳEＴB TR０

DJNＺR4，OUTＴ0 ；２0次中断未到中断退出

ＡＤDSS：MOV R4，＃１4H ;２0次中断到(1秒）重赋初值

MOV R0,#71H ;指向秒计时单元(70－71H）

ACALL AＤＤ1 ;调用加1程序(加1秒操作)

MOＶA,R３；秒数据放入A(R3为2位十进制数组合）

CLR C；清进位标志

ＣJNE A,#60H,AＤDMＭ

ADDＭＭ: JC OＵＴT01 ；小于60秒退出

ＡCALL CLＲ0 ；等于或大于6０秒清０

MOＶR0，#77H ；指向分计时单元(７6H－77Ｈ)

ACALL AＤＤ1

MOV A,R3

CLR C

ＣJNE A,#60H,ADDHH

ADDＨH:JC ＯUTT0

ACAＬL CLR0

ＭOＶR0，＃７9Ｈ;指向小时计时单元（7８Ｈ-79Ｈ)

ACALL ADD1

MOV A,R３

ＣLR C

CＪNE A,＃24Ｈ,ＨOUR

HＯＵR：JC ＯUTT0

ＡＣALL CLR０

ＯUTＴ0:MOＶA,66H;查询标志

CJNE A,#1,ＯUTT01

ＭOV ７2H,76H ;中断退出时将分、时计时单元数据移入对应显示单元

MOV 73H,7７H

MOV ７4H,78H

ＭOV ７5H，79H

ＯUTT０1：PＯP ＰSW;出栈

POPＡCC

SETB ET0 ；开放Ｔ0

REＴＩ;中断返回

;-----------－-－-－--－－--－--－-加1程序-----－-－-－---------－-－---－;

ＡDＤ１:ＭOV A,@Ｒ0 ;取当前计时单元数据到A

ＤEC Ｒ０;指向前一地址

SWAP A ;Ａ中数据高四位与低四位交换

ORＬA,@Ｒ0;前一地址中数据放入A中低四位

AＤＤA,#01H ;Ａ加1操作

DA A ;十进制调整

MOV Ｒ３,A ；移入R3寄存器

ＡNL Ａ,#0FＨ;高四位变0

MOV @Ｒ0,A;放回前一地址单元

ＭＯV A,R3 ;取回R3中暂存数据

IＮC R0 ；指向当前地址单元

ＳWAＰ A ;A中数据高四位与低四位交换

ANL A,＃０FH ;高四位变0

MOＶ＠Ｒ0,A ;数据放入当削地址单元中

RET

CLＲ0：CLＲ C

ＣLR A ;清累加器

MOV @R0,A ；清当前地址单元

DEＣR０;指向前一地址

MOV @R０,A；前一地址单元清0

RET ;子程序返回

;----－------－－－------－--－-调时闪烁程序－--－----------------－－;

INTT1: PUSH ＡＣC

PUSH PＳW

ＭＯV TＬ1,#0Ｂ０H

MOV TＨ1,#３CH

DJＮZ Ｒ2,INTT１OUT ；0.3秒未到退出中断（5０MＳ中断6次)

MOVＲ2,＃06H ;重装0.3秒定时用初值

CPL０2H；０.３秒定时到对闪烁标志取反

JB02H,FLＡSＨ1 ;０2H位为1时显示单元"熄灭＂

MＯＶA,Ｒ5

ＣJNE A，#０1Ｈ，NＬ

JMP NNN１

NＬ:CJＮE A,#0２H,NＬ1

LＪＭP NNN1

NL１:CJNE A，#0３H，ＮL2

LJMＰNLL

NL2:ＣＪNE Ａ，#04Ｈ,INTT1ＯＵT

LJMP NLL

NLL:ＭOV 72H，76H

MＯV 73H，77H

MOV 74H,78H

MOV75H,7９H

AJMP IＮTT1OUT

ＮNＮ1:MOＶ72H，７BH

MOＶ73H,7CH

MOV 74H，７DH

ＭOV 75H，7EH

IＮTT1ＯUＴ:POP ＰSW ;恢复现场

POP ＡCC

RETI ;中断退出

FLＡSH1：MOV A,R5

CＪNE A,#01H,ML

LＪＭＰMNN1

ＭＬ:CJＮE Ａ,＃０２Ｈ,ＭＬ１

LJMP MＮN2

ＭL1:CJＮE A,#03H,MN

LJMP MLL

MＮ：ＣJＮＥＡ,#04H,INTＴ1ＯＵT

ＬＪＭＰMHL

MＬL:MＯＶ72H,7AH

ＭOV 73H,７AH ;显示单元(72-73H),将不显示分数据

MOＶ74Ｈ，7８H

MOV75H,7９H

AJMP IＮTT1OUT

ＭHＬ:ＭOV 7２H,7６Ｈ

MOV73H,77Ｈ

ＭＯＶ74H,7AH;显示单元（74－75Ｈ）,小时数据将不显示

ＭOV 75H，7ＡH

AJMP IＮTT1OUＴ

MNN1:MOV ７2H,７AH

MOＶ7３Ｈ,7AH ;显示单元

(72-73H)，将不显示闹钟分数据

MOV 7４H，7DＨ

MOV ７5H,7EH

AJＭＰINＴＴ1OＵT

MNN2:MOＶ７2H,7BH

ＭOＶ7３H,7CＨ

MＯV7４H,7ＡH

ＭOV 75H,7AH ；显示单元（74-75Ｈ），闹钟小时数据将不显示

AJMP INTＴ1ＯＵＴ

;----－--－-－---－----－-----－显示----－－--－--－－--－---－-----－－---－；

DISPLAY:MOVＤPTＲ,#DIＳDAＴＡ

MＯV Ａ,7０H

MＯVC A,＠Ａ+DＰTＲMOV P３,A

CＬR P1.０

NOP

ＮOP

SＥＴB Ｐ１.０

MＯV Ａ，71Ｈ

ＭOＶC Ａ，@A+DPTR MOＶP3,A

CLR P１.1

NOP

NＯP

ＳETB P１．1

MOＶＡ,７2H

ＭＯＶC A,＠A＋DPＴＲMOV P3，A

CLR P１.2

NOP

NＯP

SETB Ｐ1.２

MOＶＡ,73H

MOＶＣA,@A+DPTR MOV Ｐ3,A

CＬＲP1．３

ＮOＰ

NOP

ＳEＴB P1.３

MOＶA,74H

ＭＯVC A,＠Ａ+DPTR MOV P3,A

CＬR P１.4

NOP

ＮOP

SETB P1.4

MOV Ａ,75H

MOVC A,＠Ａ+DPTR

MOＶP3,Ａ

ＣLＲＰ1.５

ＮOP

NＯＰ

NOＰ

SEＴB Ｐ１.5

REＴ

BＥEＰ:MOV A,68H ;查询标志

CJNＥＡ,＃1,BＥERE

MＯV A,７8H ；查询闹钟时个位CJNＥＡ,７ＤＨ,ＢEＥRE

ＭＯV A,79H ;查询闹钟时十位

CJNE A,7EH,ＢEＥRＥ

MOV A,76Ｈ；查询闹钟分个位

CJNE Ａ,7ＢＨ,BＥＥRE

ＭＯＶA,77H ;查询闹钟分十位

CJNE A,7CH,ＢEEＲＥ

BB:ＣLR P1.６

ＬCALL DDL

SETB P1.6

LCALＬＤＤL

ＪNBＰ1．7,BEＥRR

ＢEERE:RET

BＥERＲ：SETＢＰ1．６

MOV 6８H,#0

LCALＬDＩSPLＡＹ

JNＢP１．7,BEEＲR

JMＰBEEＲE

ＤＩSDATA:ＤB 0C0H,0Ｆ9H，６4H，70H,59H，52H,42H,0F8H,4０H,50H，０FFH ；01234５6７89空白