单片机电子时钟实验报告

1、郑 州 轻 工 业 学 院单片机实验 报 告实验名称： 姓 名： 院 （系）： 专业班级： 学 号： 指导教师： 陈晓雷、王小瑞 成 绩： 时间： 年 月 日至 年 月 日实验 电子时钟（定时器、中断综合实验）一、实验目的熟悉MCS-51定时器，中断初始化编程方法，了解定时器的应用，时钟程序的设计与调试技巧。二、实验内容按照STC单片机实验板电路，或者自己设计电路原理图，编写程序，基本要求：用定时器产生0.1S定时中断，对时钟计数器计数，并将数值实时地送数码管显示。扩展要求：可键盘调整时间、万年历、定时报警等。三、程序框图开始键盘输入时、分、秒合乎规定吗？定时,中断,初始化,开定时显示N关中断

2、显示P时加11秒到吗?恢复初值,保护0.1秒单元清零,60秒到吗?秒单元清零,60分到吗?分单元清零,24小时到吗?时单元清零中断返回0.1秒加1NNNN定时中断YYYY秒加1分加1四、实验步骤连续运行程序，在键盘上输入时间初值，执行，数码管上实时显示时间值。五、思考题1电子钟走时精度和程序中哪些常数有关？2修改程序使定时器工作方式改变，调节有关参数，进一步提高精度。3设计一个倒计时时钟，如何来修改程序？六、参考程序0030 CHK00: MOV SP,#60H0033 1204A5 LCALL LEDP0036 MOV DPTR,#CLOCK0039 A882 MOV R0,DPL003B

3、A983 MOV R1,DPH003D 90000B MOV DPTR,#000BH0040 7402 MOV A,#02H0042 F0 MOVX DPTR,A0043 A3 INC DPTR0044 E9 MOV A,R10045 F0 MOVX DPTR,A0046 A3 INC DPTR0047 E8 MOV A,R00048 F0 MOVX DPTR,A0049 120DF0 CHK0: LCALL LCK0 ;键扫，显示子程序004C LCALL PTDS0 ;显示缓冲区放数子程序004F MOV TMOD,#01H0052 43A882 ORL IE,#82H0055 758AB

4、7 MOV TL0,#0B7H0058 758C3C MOV TH0,#3CH ;定时中断初始化005B MOV 23H,#00H005E D28C SETB TR0 ;开定时0060 LOO5: LCALL DIS ;显示0063 LCALL PTDS00066 80F8 SJMP LOO50068 7879 PTDS0: MOV R0,#79H006A E522 MOV A,22H006C 1177 ACALL PTDS006E E521 MOV A,21H0070 1177 ACALL PTDS0072 E520 MOV A,20H0074 1177 ACALL PTDS0076 22

5、RET 0077 F9 PTDS: MOV R1,A ;拆送显示缓冲区 0078 117C ACALL PTDS1 007A E9 MOV A,R1 007B C4 SWAP A 007C 540F PTDS1: ANL A,#0FH 007E F6 MOV R0,A 007F 08 INC R0 0080 22 RET 0081 758AB7 CLOCK: MOV TL0,#0B7H 0084 758C3C MOV TH0,#3CH ;恢复初值 0087 C0D0 PUSH PSW 0089 C0E0 PUSH ACC 008B D2D3 SETB 0D3H ;保护 008D 0523 IN

6、C 23H ;0.1秒加1 008F E523 MOV A,23H 0091 B40A27 CJNE A,#0AH,DONE ;1秒到吗？ 0094 MOV 23H,#00H ;清0.1秒单元 0097 E522 MOV A,22H 0099 04 INC A ;秒加1 009A D4 DA A 009B F522 MOV 22H,A ;十进制调整 009D B4601B CJNE A,#60H,DONE ;60秒到吗？ 00A0 MOV 22H,#00H ;秒单元清零 00A3 E521 MOV A,21H 00A5 04 INC A 00A6 D4 DA A ;分加1,十进制调整 00A7

7、 F521 MOV 21H,A 00A9 B4600F CJNE A,#60H,DONE ;60分到吗？ 00AC MOV 21H,#00H ;分单元清零 00AF E520 MOV A,20H 00B1 04 INC A 00B2 D4 DAA ;时加1,十进制调整 00B3 F520 MOV 20H,A 00B5 B42403 CJNE A,#24H,DONE ;24小时到吗？ 00B8 MOV 20H,#00H ;时单元清零 00BB D0E0 DONE: POP ACC ;退栈 00BD D0D0 POP PSW 00BF 32 RET1 ORG 0D59H 0D59 D2D4 SSE

8、E: SETB RS1 ;换工作区 0D58 7D05 MOV R5,#05H 0D5D SSE2: MOV 30H,#20H 0D60 75317E MOV 31H,#7EH 0D63 7F06 MOV R7,#06H 0D65 79DD SSE1: MOV R1,#0DDH 0D67 E530 MOV A,30H 0D69 F3 MOVX R1,A ;字位送入 0D6A A831 MOV R0,31H 0D6C E6 MOV A,R0 0D6D 900D85 MOV DPTR,#0DDFFH 0D70 93 MOVC A,A+DPTR ;取字形代码 0D71 79DC MOV R1,#0D

9、CH 0D73 F3 MOVX R1,A ;字形送入 0D74 E530 MOV A,30H ;右移 0D76 03 RR A 0D77 F530 MOV 30H,A 0D79 1531 DEC 31H 0D7B 74FF MOV A,#0FFH 0D7D F3 MOVX R1,A ;关显示 0D7E DFE5 DJNZ R7,SSE1 ;6位显示完了吗？ 0D80 DDDB DJNZ R5,SSE2 ;5次显示完了吗？ 0D82 C2D4 CLR RS1 0D84 22 RET 0D85 C0F9A4 ODFF: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H 0D88

10、 B09992,DB 0F8H,80H,90H 0D8B 82F880 0D8E 90 0D8F 8883C6 DB 88H,83H,0C6H,0A1H,86H 0D92 A1868E DB 8EH,0FFH,0CH,89H,0DEH 0D95 FF0C89 0D98 DE ORG 038EH 038E FC X3: MOV R4,A 038F 7850 MOV R0,#50H 0391 E6 MOV A,R0 0392 F9 MOV R1,A 0393 EC MOV A,R4 0394 F7 MOV R1,A 0395 E4 CLR A 0396 D083 POP DPH 0398 D082

11、 POP DPL 039A 93 MOVC A,A+DPTR 039B A3 INC DPTR 039C B5010A CJNE A,01H,X30 039F 19 DEC R1 03A0 E4 CLR A 03A1 93 MOVC A,A+DPTR 03A2 F6 X31: MOV R0,A 03A3 A3 INC DPTR 03A4 C082 PUSH DPL 03A6 C083 PUSH DPH 03A8 22 RET 03A9 19 X30: DEC R1 03AA E9 MOV A,R1 03AB 80F5 SJMP X31;-03AD7E50X2:MOV R6,#50H03AF71

12、D1X0:ACALL XLE03B130E51CJNB ACC.5,XX003B4DEF9DJNZ R6,X003B67E20MOV R6,#20H03B87850MOV R0,#50H03BAE6MOV A,R003BBF8MOV R0,A03BCE6MOV A,R003BDFFMOV R7,A03BE7410MOV A,#10H03C0F6MOV R0,A03C171D1X1:ACALL XLE03C330E506JNB ACC.5,XX103C6DEF9DJNZ R6,X103C8EFMOV A,R703C9F6MOV R0,A03CA80E1SJMP X203CCFEXX1:MOV R

13、6,A03CDEFMOV A,R703CEF6MOV R0,A03CFEEMOV A,R603D022XX0:RET03D19125XLE:ACALL DIS03D39164ACALL KEY03D5FCMOV R4,A03D67948MOV R1,#48H03D8E7MOV A,R103D9FAMOV R2,A03DA09INC R103DBE7MOV A,R103DCFBMOV R3,A03DDECMOV A,R403DE6BXRL A,R303DFAB04MOV R3,04H03E1AC02MOV R4,02H03E36004JZ X1003E57A88MOV R2,#88H03E77C

14、88MOV R4,#88H03E91CX10:DEC R403EAECMOV A,R403EB6482XRL A,#82H03ED600FJZ X1103EFECMOV A,R403F0640EXRL A,#0EH03F2600AJZ X1103F4ECMOV A,R403F56005JZ X1203F77C02MOV R4,#20H03F91ADEC R203FA8006SJMP X1303FC7C0FX12:MOV R4,#0FH03FEAA04X11:MOV R2,04H0400AC03MOV R4,03H04027948X13:MOV R1,#48H0404EAMOV A,R20405

15、F7MOV R1,A040609INC R10407EBMOV A,R30408F7MOV R1,A0409ECMOV A,R4040A20E507JB ACC.5,X113040D20E404JB ACC.4,X1130410MOV DPTR,#LS3041393MOVC A,A+DPTR041422X113:RET0415LS3:DB 07H,04H,08H,05H,09H,06H,0AH0418041B0A041C0B0100DB 0BH,01H,00H,02H,0FH,03H,0EH041F020F0304220E04230C0DDB 0CH,0DH0425C083DIS: PUSH

16、DPH0427C082PUSH DPL0429D2D4SETB RS1042B787E MOV R0,#7EH042D7A20MOV R2,#20H042F7B00MOV R3,#00H043190044FMOV DPTR,#LS00434E6LS2:MOV A,R0043593MOVC A,A+APTR043679DCMOV R1,#0DCH0438F3MOVX R1,A0439EAMOV A,R2043A09INC R1043BF3MOVX R1,A043CDBFELS1: DJNZ R3,LS1043EC3 CLR C043F13 RRC A0440FA MOV R2,A044118 D

17、EC R0044270F0 JNZ LS20444F2 MOVX R0,A044518 DEC R00446F4 CPL A0447F2 MOVX R0,A0448C2D4 CLR RS1044AD082 POP DPL044CD083 POP DPH044E22 RET044FC0F9A4 LS0: DB 0C0H,0F9H,0A4H,0B0H,99H,92H0452B09992045582F880 DB 82H,0F8H,80H,90H,88H,83H,0C6H0458045BC6045CA1868E DB 0A1H,86H,8EH,0FFH,0CH,89H,7FH,0BFH045FFF0

18、C8904627FBF0464D2D4KEY: SETB RS104667AFE MOV R2,#0FEH04687B08 MOV R3,#08H046A7800 MOV R0,#00H046C79DDLP1: MOV R1,#0DDH046EEA MOV A,R2046FF3MOVX R1,A047023RL A0471FAMOV R2,A047209INC R10473E3MOVX A,R10474F4CPL A0475540FANL A,#0FH0477700EJNZ LP0047908INC R0047ADBF0DJNZ R3,LP1047C7420XP33:MOV A,#20H047EFAXP3:MOV R2,A047FE4CLR A048079DDMOV R1,#0DDH0482F3MOVX R1,A0483EAMOV A,R20484C2D4CLR RS1048622RET0487F4LP0:CPL A048820E004JB ACC.0,XP0048B7400MOV A,#00H048D8013SJMP LPP048F20E104XP0:JB ACC.1,XP104927408MOV A,#08H0494800CSJMP LPP049620E204XP1:JB ACC.2,XP204997410MOV A,#10H049B8005SJM