电子日历单片机课程设计

单片机课程设计学院：电气与信息工程学院专业：电子信息工程班级：姓名：学号：指导教师：电子日历的设计一实验目的：现今，高精度的计时工具大多数都使用了石英体振荡器，如电子钟，石英表，石英钟都采用了石英技术。

这种时钟走时精度高，稳定性好，使用方便，不需要经常调校，数字式电子钟用集成电路计时，译码代替机械式转动，用LED显示器代替显示器代替指针显示进而显示时间，减小了计时误差，这种表具有时，分，秒显示时间的功能，还可以进行时和分的校对，片选的灵活性好。

本设计利用AT89C51为核心，辅以必要的芯片和外围电路，构成一个电子日历，旨在：1、加深对单片机课程的全面认识和掌握，对单片机课程的应用进一步的了解。

2、掌握单片机的接口技术及相关外围芯片的外特性、控制方法。

3、通过这次课程设计将单片机软硬件结合起来，对程序进行编辑，校验，锻炼理论联系实际的能力。

4、通过实际程序设计和调试，逐步掌握模块化程序设计方法和调试技术。

5、掌握单片机和外部电路的连接特性，更好地把握单片机的特性二系统设计要求1.设计一个可以显示年月日、时间，并有闹钟功能的电子日历。

2.具有时间设置功能。

3.具有定时闹钟功能。

三系统设计环境开发软件：Keil c51,Proteus6.9, STC-ISP四实验接线图五．实验说明与连线用一片8255进行扩展，8255的PA,PB口外接6位LED数码管构成时钟显示器。

单片机CPU的P1口外界4个按键K1、K2、K3、K4。

利用这6个LED显示当前时间。

P3.5口外界一个二极管作为闹钟提示标志，当到达设定的闹钟时间，改灯自动亮30秒，随即熄灭。

四个按键的功能分别是：K1：日期切换按键；K2：设置键，用于选择需要设置的位；K3：加1键，设置时，按下即加1；K4：显示闹钟时间键；六．主要实验设备电烙铁、数字万用表、导线若干89c51芯片一块、8255A芯片一块、2083两块、6个独立的8段数码管、100欧姆排阻2个、4个轻触开关七.注意事项线路板的布局原则是按照各元器件的特点，兼顾元器件便利装卸和考虑抗干扰性（一个互相干扰和外来干扰）。

要求达到版面整洁，布局合理，线路清晰，连接有序。

一个好的布局，能便于焊接和电路检修。

八．主要程序见附1九、电路板实样89c51芯片8255A芯片十．操作演示1.设置首先进入年月日设置界面，按下K2键进入设置界面。

通过按K3键进行加1达到设置，按下K2一次则进入下一位设置，则设置位依次从年、月、日跳转。

设置完“日”位，再按K2键，自动进入时间设置界面——相同的，设置完时间，按下K2键进入闹钟设置闹钟只需设置时和分即可。

2．显示时间设置好后，自动显示设置好的时间可以清楚地看到当前时间为10：01：46；按下K1键即可看到当前日期当前日期为09年5月14日；按下K4键即可看到设置的闹钟时间可以看到闹钟为10：00；十一.设计总结以及感想这次课程设计，应该说中间的过程是比较曲折的，虽然最后的实验结果按照自己的预期实现了，但是中间走了些弯路，也经历了些小小的坎坷。

不过总体来说还是很有成就感的，也学到了不少知识。

这次试验的主程序主要是参考别人的，我最主要的任务是把它看懂看透，并且在此基础之上稍作修改，同时焊接板子并且下载。

经过自己的不懈努力，终于可以仿真成功。

我的坎坷主要体现在接下来焊接器件的过程中，以及之后的调试过程中。

因为硬件排错是很困难的。

我吸取之前同学的经验教训，焊地很仔细，因为一旦焊错了，将会非常麻烦。

但是问题仍然出现。

首先焊完之后，我的电源按钮没有作用，只要上电就一直工作。

经过我的思考分析，断定问题应该出在电路上面，而且肯定是电源电路那一部分。

最后终于发现，焊接的时候由于没有把PCB的电路认真看明白，导致我多焊了两个电源，所以我断定这个应该是导致我电源按钮失效的根源。

于是我去掉这两根线，重新下载，此时该问题已经消除，LED也可以显示。

然而，一个新的问题出现了，LED的某一位一直不亮。

我反复检查了自己的电路，并没有焊错的问题，反复看程序也找不到不对劲的地方。

我确定是自己的硬件除了问题，一定有某个地方接触不良。

我将几个重要的接口之间的线重新焊了一遍。

果然，显示器全都亮了，而且开始计时。

但这个时候，新的问题又出来了——我的显示的高低位全部反了！这个问题无疑可以通过修改程序来实现。

于是我仔细研读了程序的显示部分，将里边循环移位的顺序修改了一下。

虽然仿真的时候是反的，但当程序下到板子上后一切正常。

后来又经过改正，将显示的频闪和秒钟速度得以完善。

这次的坎坷经历让我受益很大。

硬件焊接和调试的那一天，苦于对线路的研究和对各种问题的排除，我从早上8点一直忙到晚上9点，中间的午饭也只是下楼买了盒饼干充饥。

但是真正搞完之后，真的大松了一口气。

虽然知道将来研究生期间这样的经历会很多，但是这次的课程设计还是对我有很大的启发的。

我打算在课余自己独立写个程序，这样才使得课程设计真正属于自己的。

附1：（主要程序）ST_ADDR EQU 0000HPA EQU 7CFFH;A口地址PB EQU 7DFFH;B口地址CTR EQU 7FFFH;控制字地址BUF EQU 23HSBF EQU 22HMBF EQU 21HHBF EQU 20HDAY EQU 19HMONTH EQU 18HYEAR EQU 17HHOUR EQU 16HMIN EQU 15HORG 0000HLJMP MAINORG 000BHLJMP CLOCKORG 0200HMAIN:MOV DPTR,#CTRMOV A,#80HMOVX @DPTR,AANL TMOD,#0F0HORL TMOD,#01HMOV TL0,#00HMOV TH0,#38HSETB P3.5SETB EASETB ET0SETB TR0MOV MBF,#00H;***********闹钟************** MAIN1: LCALL ADS1MOV A,SBFCJNE A,#00H,KEY0 ;秒位是否相同MOV A,MBFCJNE A,MIN,KEY0 ;分位是否相同MOV A,HBFCJNE A,HOUR,KEY0 ;时位是否相同CLR P3.5 ; 定时时间到,灯亮KEY0: MOV A,#30H;30秒后自动关闹钟CJNE A,SBF,K0SETB P3.5;****************K0: JNB P1.0,AAAJNB P1.3,BBBJNB P1.1,GWAITAJMP MAIN1 AAA: LCALL BDS1 AJMP MAIN1 BBB: LCALL CDS1 AJMP MAIN1 GWAIT: LCALL YDS1JNB P1.1,GWAIT ;判断P1.1是否按完SETG1: LCALL YDS1 JNB P1.1,GWAIT2 JNB P1.2,GADDYEAR AJMP SETG1 GADDYEAR: MOV R7,YEAR LCALL ADD1 MOV YEAR,A CJNE A,#51H,WAITT1 MOV YEAR,#01H WAITT1: LCALL YDS1JNB P1.2,WAITT1 ;判断P1.2是否按完AJMP SETG1;************* GWAIT2: LCALL MODS1 JNB P1.1,GWAIT2 SETG2: LCALL MODS1 JNB P1.1,GWAIT3 JNB P1.2,GADDMONTH AJMP SETG2GADDMONTH: MOV R7,MONTH LCALL ADD1 MOV MONTH,A CJNE A,#13H,WAITT2 MOV MONTH,#01H WAITT2: LCALL MODS1 JNB P1.2,WAITT2 AJMP SETG2 GWAIT3: LCALL DDS1 JNB P1.1,GWAIT3 SETG3: LCALL DDS1 JNB P1.1,GWAIT4 JNB P1.2,GADDDAY AJMP SETG3 GADDDAY: MOV R7,DAY LCALL ADD1MOV DAY ,ACJNE A,#32H,WAITT3 MOV DAY ,#01H WAITT3: LCALL DDS1 JNB P1.2,WAITT3 AJMP SETG3 GWAIT4: LCALL HDS1 JNB P1.1,GWAIT4 SETG4: LCALL HDS1 JNB P1.1,GWAIT5 JNB P1.2,GADDHBF AJMP SETG4 GADDHBF: MOV R7,HBF LCALL ADD1 MOV HBF,ACJNE A,#24H,WAITT4 MOV HBF,#00H WAITT4: LCALL HDS1 JNB P1.2,WAITT4 AJMP SETG4 GWAIT5: LCALL MDS1 JNB P1.1,GWAIT5 SETG5: LCALL MDS1 JNB P1.1,GWAIT6 JNB P1.2,GADDMBF AJMP SETG5 GADDMBF: MOV R7,MBF LCALL ADD1 MOV MBF,ACJNE A,#60H,WAITT5 MOV MBF,#00H WAITT5: LCALL MDS1 JNB P1.2,WAITT5 AJMP SETG5 GWAIT6: LCALL CDS1 JNB P1.1,GWAIT6 SETG6: LCALL CDS1 JNB P1.1,GWAIT7 JNB P1.2,GADDHOUR AJMP SETG6 GADDHOUR: MOV R7,HOUR LCALL ADD1 MOV HOUR,A CJNE A,#24H,WAITT6MOV HOUR,#00H WAITT6: LCALL CDS1 JNB P1.2,WAITT6 AJMP SETG6 GWAIT7: LCALL CDS1 JNB P1.1,GWAIT7 SETG7: LCALL CDS1 JNB P1.1,SETGOUT JNB P1.2,GADDMIN AJMP SETG7 GADDMIN: MOV R7,MIN LCALL ADD1 MOV MIN,ACJNE A,#60H,WAITT7 MOV MIN,#00H WAITT7: LCALL CDS1 JNB P1.2,WAITT7 AJMP SETG7 SETGOUT: LCALL ADS1 JNB P1.1,SETGOUT LJMP MAIN1;***********显示模块*********** ADS1: MOV R0,#45HMOV R2,#01H ;CHANGGE ADS2: MOV DPTR,#PB;位选 MOV A,R2 MOVX @DPTR,A MOV DPTR,#PA MOV A,@R0 LCALL TABLEMOVX @DPTR,A;送段码 LCALL DELAY1;延时 DEC R0 CLR C MOV A,R2RLC A ;CHANGGE MOV R2,A JNZ ADS2 MOV R0,#45H MOV A,SBF LCALL GET MOV A,MBF LCALL GET MOV A,HBFLCALL GET RETBDS1: MOV R0,#45H MOV A,DAY LCALL GET MOV A,MONTH LCALL GET MOV A,YEAR LCALL GET MOV R0,#45HMOV R2,#01H ;CHANGGE BDS2: MOV DPTR,#PB;位选 MOV A,R2 MOVX @DPTR,A MOV DPTR,#PA MOV A,@R0 LCALL TABLEMOVX @DPTR,A;送段码 LCALL DELAY1;延时 DEC R0 CLR C MOV A,R2RLC A ;CHANGGE MOV R2,A JNZ BDS2 RETSDS1: MOV R0,#45H MOV A,SBF LCALL GET MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A MOV R0,#45HMOV R2,#01H ;CHANGGE SDS2: MOV DPTR,#PB;位选 MOV A,R2MOVX @DPTR,A MOV DPTR,#PA MOV A,@R0 LCALL TABLEMOVX @DPTR,A;送段码 LCALL DELAY1;延时 DEC R0 CLR C MOV A,R2RLC A ;CHANGGE MOV R2,A JNZ SDS2 RETDDS1: MOV R0,#45H MOV A,DAY LCALL GET MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A MOV R0,#45HMOV R2,#01H ;CHANGGE DDS2: MOV DPTR,#PB;位选 MOV A,R2 MOVX @DPTR,A MOV DPTR,#PA MOV A,@R0 LCALL TABLEMOVX @DPTR,A;送段码 LCALL DELAY1;延时 DEC R0 CLR C MOV A,R2RLC A ;CHANGGE MOV R2,A JNZ DDS2 RETMDS1: MOV R0,#45H MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,MBF LCALL GET MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A MOV R0,#45HMOV R2,#01H ;CHANGGE MDS2: MOV DPTR,#PB;位选 MOV A,R2 MOVX @DPTR,A MOV DPTR,#PA MOV A,@R0 LCALL TABLEMOVX @DPTR,A;送段码 LCALL DELAY1;延时 DEC R0 CLR C MOV A,R2RLC A ;CHANGGE MOV R2,A JNZ MDS2 RETMODS1: MOV R0,#45H MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,MONTH LCALL GET MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AHMOV @R0,A MOV R0,#45HMOV R2,#01H ;CHANGGE MODS2: MOV DPTR,#PB;位选 MOV A,R2 MOVX @DPTR,A MOV DPTR,#PA MOV A,@R0 LCALL TABLEMOVX @DPTR,A;送段码 LCALL DELAY1;延时 DEC R0 CLR C MOV A,R2RLC A ;CHANGGE MOV R2,A JNZ MODS2 RETHDS1: MOV R0,#45H MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,HBF LCALL GET MOV R0,#45HMOV R2,#01H ;CHANGGE HDS2: MOV DPTR,#PB;位选 MOV A,R2 MOVX @DPTR,A MOV DPTR,#PA MOV A,@R0 LCALL TABLEMOVX @DPTR,A;送段码 LCALL DELAY1;延时 DEC R0CLR C MOV A,R2RLC A ;CHANGGE MOV R2,A JNZ HDS2 RETYDS1: MOV R0,#45H MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,#0AH MOV @R0,A DEC R0 MOV A,YEAR LCALL GET MOV R0,#45HMOV R2,#01H ;CHANGGE YDS2: MOV DPTR,#PB;位选 MOV A,R2 MOVX @DPTR,A MOV DPTR,#PA MOV A,@R0 LCALL TABLEMOVX @DPTR,A;送段码 LCALL DELAY1;延时 DEC R0 CLR C MOV A,R2RLC A ;CHANGGE MOV R2,A JNZ YDS2 RETCDS1: MOV R0,#45H MOV A,MIN LCALL GET MOV A,#0AH MOV @R0,A DEC R0MOV A,#0AH MOV @R0,A DEC R0 MOV A,HOUR LCALL GET MOV R0,#45HMOV R2,#01H ;CHANGGE CDS2: MOV DPTR,#PB;位选 MOV A,R2 MOVX @DPTR,A MOV DPTR,#PA MOV A,@R0 LCALL TABLEMOVX @DPTR,A;送段码 LCALL DELAY1;延时 DEC R0 CLR C MOV A,R2RLC A ;CHANGGE MOV R2,A JNZ CDS2 RET TABLE: INC AMOVC A,@A+PC RET DB0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,98H,0BFHGET: MOV R1,A ANL A,#0FH MOV @R0,A DEC R0 MOV A,R1 SWAP A ANL A,#0FH MOV @R0,A DEC R0 RETCLOCK:MOV TL0,#00H;定时器中断子程序 MOV TH0,#38H PUSH PSW PUSH ACC INC BUF MOV A,BUFCJNE A,#14H,QUIT MOV BUF,#00H MOV A,SBF INC A DA A MOV SBF,A CJNE A,#60H,QUIT MOV SBF,#00H MOV A,MBF ADD A,#1H DA A MOV MBF,A CJNE A,#60H,QUIT MOV MBF,#00H MOV A,HBF ADD A,#1H DA A MOV HBF,A CJNE A,#24H,QUIT MOV MBF,#00H MOV A,day ADD A,#1H DA A MOV day,A CJNE A,#32H,QUIT MOV day,#01H MOV A,month ADD A,#1H DA A MOV month,A CJNE A,#13H,QUIT MOV month,#01H MOV A,year ADD A,#1H DA A MOV year,A QUIT: POP ACC POP PSW RETI ADD1: MOV A,R7 ADD A,#01H DA A RETDELAY1: MOV R4,#05;4ms 延时DEL11: MOV R5,#0AH DEL12: MOV R3,#18H DEL13: DJNZ R3,DEL13DJNZ R5,DEL12DJNZ R4,DEL11RETEND。