1、基于单片机的数字时钟设计一 摘要单片计算机即单片微型计算机。（Single-Chip Microcomputer ）,是 集CPU ,RAM ,ROM ,定时，计数和多种接口于一体的微控制器。他体积小，成本低，功能强，广泛应用于智能产品和工业自动化上。而51 单片机是各单片机中最为典型和最有代表性的一种。这次毕业设计通过对它的学习，应用，从而达到学习、设计、开发软、硬的能力。二 说明系统由AT89C51、LED 数码管、按键、发光二极管等部分构成，能实现时间的调整、定时时间的设定，输出等功能。系统的功能选择由SB0、SB1、SB2、SB3、SB4 完成。其中SB0为时间校对，定时器调整功能键，
2、按SB 0 进入调整状态。SB1 为功能切换键。第一轮按动SB1 依次进入一路、二路、三路定时时间设置提示程序，按SB3 进入各路定时调整状态。定时时间到，二极管发亮。到了关断时间后灭掉。如果不进入继续按SB1 键，依次进入时间 年 位校对、 月 位校对、 日 位校对、 时 位校对、 分 位校对、 秒 位校对状态。不管是进入那种状态，按动SB2 皆可以使被调整位进行不进位增量加1 变化。各预置量设置完成后，系统将所有的设置存入RAM 中，按SB1 退出调整状态。上电后，系统自动进入计时状态，起始于 00 时 00 分。SB4 为年月日显示转换键，可使原来显示时分秒转换显示年月日。三、程序设计思
3、想和相关指令介绍本系统的主程序主要完成时间显示和定时输出判断功能。而年月日显示和各时间单元进位，时间设定时，调定时间设定时等功能全部在中断服务程序中完成。1计时功能的实现与中断服务程序时间的运行依靠定时中断子程序对时钟单元数值进位调整来实现的。计数器T0 打开后，进入计时，满100 毫秒后，重装定时。中断一次，满一秒后秒进位，满60 秒后即为1 分钟，分钟单元进位，60 分到了后，时单元进位，24 小时满后，天单元进位。这样然后根据进率，得到年、月、日、时、分、秒存储单元的值，并经译码后，通过扫描程序送LED 中显示出来，实现时钟计时功能。累加是用指令INC 来实现的。进入中断服务程序以后，执
4、行PUSH PSW 和PUSH A 将程序状态寄存器PSW 的内容和累加器A 中的数据保存起来，这便是所谓的 保护现场 . 以保护现场和恢复现场时存取关键数据的存储区叫做堆栈。在软件的控制之下，堆栈可在片内RAM 中的任一区间设定，而堆栈的数据存取与一般的RAM 存取又有区别，对它的操作，要遵循 后进先出 的原则。2 时间控制功能与比较指令系统的另一功能就是实现对执行设备的定时开关控制，其主要控制思想是这样的：先将执行设备开启的时间和关闭时间置入RAM 某一单元，在计时主程序当中执行几条比较指令，如果当前计时时间与执行设备的设定开启时间相等，就执行一条 CLR 指令，将对应的那路P3 置为高电
5、位，开启；如果当前计时时间与执行设备设定的关闭时间相等，就执行SETB对应的P3 置低电位，二极管截止，。实现此控制功能用到的比较指令为CJNE A，#direct，rel，其转移条件是累加器A 中的值与立即数不等则转移。参考文献1马忠梅 籍顺心等.单片机的C语言应用程序设计（第4版），北京航空航天大学出版社 2余锡存 曹国华.单片机原理及接口技术M.陕西:西安电子科技大学出版社3雷丽文 等.微机原理与接口技术M.北京：电子工业出版社四：程序SEC EQU 32H ;秒 即时时间 伪指令MIN EQU 31H ;分HOUR EQU 30H ;时DAY EQU 35H ;日MON EQU 34H
6、 ;月YEAR EQU 33H ;年MIN_1 EQU 41H ;分 定时器1 路、开存储单元HOUR_1 EQU 42H ;时DAY_1 EQU 43H ;MON_1 EQU 44H ;YEAR_1 EQU 45H ;MIN_11 EQU 40H ;分 定时器1 路、关存储单元HOUR_11 EQU 46H ;时DAY_11 EQU 47H ;日MON_11 EQU 48H ;月YEAR_11 EQU 49H ;年;*ORG 0000Hljmp MAINORG 0003H ;中断转换显示年月日、INT0（SB4 键）LJMP SHOWORG 000BH ;计数中断 T0、方式1LJMP TI
7、MEORG 0013HLJMP CHANGE; 调整时间、定时、INT1（SB0 键）;-主程序ORG 0030HMAIN:;-初始化付值MOV YEAR , #02MOV MON , #05MOV DAY , #01MOV HOUR , #00MOV MIN , #00MOV SEC , #00CLR 40H ;定时单元1 路清零CLR 41HCLR 42HCLR 43HCLR 44HCLR 45HCLR 46HCLR 47HCLR 48HCLR 49H;-开中断MOV TMOD , #01H ;计数、模式1、T0MOV TL0, #0B0H ;100SM 计数定时MOV TH0, #3CH
8、 ;clr p3.0MOV 20H, #0AH ;10 次*100SMSETB PT0 ;T0 为最高级SETB TR0 ;允许计数SETB ET0 ;允许T0 中断SETB EX0 ;允许INT0 中断SETB EX1 ;允许INT1 中断SETB EA ;开总中断;-显示、定时器启动判断LOOP:MOV R1, #30H; 存储单元MOV R4, #01H; 位选通MOV R3, #03H; 三组显示NEXT:MOV A , R1 ;MOV B , #10 ;将存储单元转换成两高低两组的BCD 码DIV ABSWAP AORL A, BMOV P0, A;输出MOV P2, R4INC R
9、1 ;下一单元MOV A, R4 ;RL A ;位移MOV R4, ALCALL DE5SM ;延时0.5SMDJNZ R3, NEXT ;全扫描显示一偏;-判断定时输出(只编写了一路)CJNE R7, #88H,LOOP ;是8 则开，否则、定时已关、转;-开MOV A, YEARCJNE A, YEAR_1, LOOP_1;年比较，不等转关MOV A, MONCJNE A, MON_1, LOOP_1MOV A, DAYCJNE A , DAY_1,LOOP_1MOV A, HOURCJNE A, HOUR_1,LOOP_1MOV A, MINCJNE A, MIN_1, LOOP_1CP
10、L P3.0;-关LOOP_1:MOV A, YEARCJNE A, YEAR_11, LOOP;年比较MOV A, MONCJNE A, MON_11, LOOPMOV A, DAYCJNE A , DAY_11,LOOPMOV A, HOURCJNE A, HOUR_11,LOOPMOV A, MINCJNE A, MIN_11, LOOPCPL P3.0LJMP LOOP;-年月日显示中断子程序SHOW:PUSH PSWpush ACCPUSH BPUSH 01HPUSH 02HPUSH 03HPUSH 04HMOV R2, #0FFH ;中断扫描次数TURN: MOV R1 , #33
11、HMOV R4 , #01HMOV R3 , #03HNEXT_1:MOV A, R1MOV B , #10DIV ABSWAP AORL A, BMOV P0, AMOV P2, R4INC R1RL AMOV R4 ,ALCALL DE5SMDJNZ R3, NEXT_1DJNZ R2, TURN ;反复显示一定时间后返回POP 04HPOP 03HPOP 02HPOP 01HPOP BPOP ACCPOP PSWRETI;-计数中断服务子程序TIME:PUSH PSWPUSH ACCPUSH BPUSH 06HMOV TH0 , #3CH;重装计数MOV TL0 , #0BH;DJNZ
12、20H, OUT ;转到中断跳出pop 程序MOV 20H, #0AH ; 重装：100*10=1000;-进位程序INC SECMOV R6, SEC ;CJNE R6, #60, OUT;比较MOV SEC , #00 ;INC MINMOV R6, MINCJNE R6, #60, OUTMOV MIN , #00INC HOURMOV R6 , HOURCJNE R6 , #25 , OUTMOV HOUR ,#00INC DAYMOV R5, MONCJNE R5, #1, MON_22;是否1 月、不是转2 月MOV R5, DAYCJNE R5, #32, OUT ; 本月是否益
13、出INC MONMOV DAY,#1LJMP OUTOUT:POP 06HPOP BPOP ACCPOP PSWRETIMON_22:MOV R5, MONCJNE R5 , #2 , MON_33;是否2 月、不是转3 月MOV A, YEAR ;判断是否瑞年MOV B, #4DIV ABMOV A , BJNZ OUT_1;不是则转（A 不为零则转）MOV R5 ,DAYCJNE R5,#30, OUT;如是瑞年、判断是否到29 天INC MONMOV DAY ,#1LJMP OUTOUT_1:MOV R5, DAYCJNE R5, #29, OUT ;平年二月判断INC MONMOV D
14、AY , #1LJMP OUTMON_33:MOV R5, MONCJNE R5, #3 , MON_44MOV R5, DAYCJNE R5 , #32, OUTINC MONMOV DAY , #1LJMP OUTMON_44:MOV R5, MONCJNE R5,#4, MON_55MOV R5, DAYCJNE R5 ,#31,OUTINC MONMOV DAY , #1LJMP OUTMON_55:MOV R5,MONCJNE R5,#5, MON_66MOV R5,DAYCJNE R5,#32,OUTINC MONMOV DAY,#1LJMP OUTMON_66:MOV R5, M
15、ONCJNE R5,#6, MON_77MOV R5, DAYCJNE R5 ,#31,OUTINC MONMOV DAY , #1LJMP OUTMON_77:MOV R5, MONCJNE R5,#7, MON_88MOV R5, DAYCJNE R5,#32,L1INC MONMOV DAY , #1L1: LJMP OUTMON_88:MOV R5, MONCJNE R5,#8, MON_99MOV R5, DAYCJNE R5 ,#32,L2INC MONMOV DAY , #1L2: LJMP OUTMON_99:MOV R5, MONCJNE R5,#9, MON_00MOV R
16、5,DAYCJNE R5 ,#31,L3INC MONMOV DAY , #1L3: LJMP OUTMON_00:MOV R5, MONCJNE R5,#10, MON_AAMOV R5, DAYCJNE R5 ,#32,L4INC MONMOV DAY , #1L4: LJMP OUTMON_AA:MOV R5, MONCJNE R5,#11, MON_BBMOV R5,DAYCJNE R5,#31,L5INC MONMOV DAY , #1L5: LJMP OUTMON_BB:MOV R5, DAYCJNE R5 ,#32,L6INC YEARMOV MON, #1MOV DAY , #
17、1L6:LJMP OUT;-按SB2定时器年单元加1 子程序SB3_2: LJMP SHOW_2 ;二路没编返回SB3_3: LJMP SHOW_3 ;三路没编返回SB3_1:MOV A , YEAR_1 ; 调时年单元MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #01HLCALL READLCALL DE250SMCJNE A, 01H, SB3_1CJNE A, #0FBH, KEY2_7 ;按SB2 转年调整LJMP MON_111 ;按SB1 往下调月单元KEY2_7:CJNE A, #0FDH, SB3_1INC YEAR_1 ; 1
18、路年单元加1MOV R5,YEAR_1CJNE R5,#09,SB3_1 ;益出MOV YEAR_1, #00HAJMP SB3_1 ;-月单元加1 子程序MON_111:MOV A , MON_1 ; 调时月单元显示MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #02HLCALL READLCALL DE250SMCJNE A, 01H, MON_111CJNE A, #0FBH, KEY2_8 ;按SB2 转月调整LJMP DAY_111KEY2_8:CJNE A,#0FDH,MON_111INC MON_1 ;1 路月单元加1MOV R5,M
19、ON_1CJNE R5,#13,MON_111;益出MOV MON_1, #01HAJMP MON_111 ; 转到月显;_-日单元加1 子程序DAY_111:MOV A , DAY_1 ; 调时日单元显示提示MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #04HLCALL READLCALL DE250SMCJNE A, 01H,DAY_111CJNE A, #0FBH, KEY2_9 ;按SB2 转日调整LJMP HOUR_111KEY2_9: CJNE A,#0FDH,DAY_111INC DAY_1 ;1 组日单元加1MOV R5, DAY
20、_1CJNE R5,#32,DAY_111;益出MOV DAY_1, #01HAJMP DAY_111 ; 转到日显;-按SB2 时单元加1 子程序HOUR_111:MOV A , HOUR_1 ; 调时时单元显示提示MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #01HLCALL READLCALL DE250SMCJNE A, 01H,HOUR_111CJNE A, #0FBH, KEY2_10 ; 按SB2 转时调整LJMP MIN_111KEY2_10:CJNE A,#0FDH,HOUR_111INC HOUR_1MOV R5,HOUR_1
21、CJNE R5,#24,HOUR_111;益出MOV HOUR_1, #00HAJMP HOUR_111 ; 转到时显;-分单元加1 子程序MIN_111:MOV A , MIN_1 ; 调时分单元、并显示提示MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #02HLCALL READLCALL DE250SMCJNE A, 01H,MIN_111CJNE A, #0FBH, KEY2_11 ;按SB2 转分调整AJMP OFF_CH ;按SB3 往下调定时：关单元KEY2_11: CJNE A, #0FDH, MIN_111INC MIN_1 ;1
22、 路分单元加1MOV R5, MIN_1CJNE R5,#60,MIN_111;益处MOV MIN_1, #00HAJMP MIN_111 ; 转到分显年单元调整OFF_CH: MOV A , YEAR_11 ; 调时年单元MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #01HLCALL READLCALL DE250SMCJNE A, 01H, OFF_CHCJNE A, #0FBH, KEY2_F7 ;按SB2 转年调整LJMP MON_OFF ;按SB1 往下调月单元KEY2_F7:CJNE A, #0FDH, OFF_CHINC YEAR_
23、11 ; 1 路年单元加1MOV R5,YEAR_11CJNE R5,#09,OFF_CH ;益出MOV YEAR_11, #00HAJMP OFF_CH ;-月单元加1 子程序MON_OFF:MOV A , MON_11 ; 调时月单元显示MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #02HLCALL READLCALL DE250SMCJNE A, 01H, MON_OFFCJNE A, #0FBH, KEY2_F8 ;按SB2 转月调整LJMP DAY_OFFKEY2_F8:CJNE A,#0FDH,MON_OFFINC MON_11 ;1
24、 路月单元加1MOV R5,MON_11CJNE R5,#13,MON_OFF;益出MOV MON_11, #01HAJMP MON_OFF ; 转到月显;_-日单元加1 子程序DAY_OFF:MOV A , DAY_11 ; 调时日单元显示提示MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #04HLCALL READLCALL DE250SMCJNE A, 01H,DAY_OFFCJNE A, #0FBH, KEY2_F9 ;按SB2 转日调整LJMP HOUR_OFFKEY2_F9: CJNE A,#0FDH,DAY_OFFINC DAY_11
25、 ;1 组日单元加1MOV R5, DAY_11CJNE R5,#32,DAY_OFF;益出MOV DAY_11, #01HAJMP DAY_OFF ; 转到日显;-按SB2 时单元加1 子程序HOUR_OFF:MOV A , HOUR_11 ; 调时时单元显示提示MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #01HLCALL READLCALL DE250SMCJNE A, 01H,HOUR_OFFCJNE A, #0FBH, KEY2_F10 ; 按SB2 转时调整LJMP MIN_OFFKEY2_F10:CJNE A,#0FDH,HOUR_
26、OFFINC HOUR_11MOV R5,HOUR_11CJNE R5,#24,HOUR_OFF;益出MOV HOUR_11, #00HAJMP HOUR_OFF ; 转到时显;-分单元加1 子程序MIN_OFF:MOV A , MIN_11 ; 调时分单元、并显示提示MOV B ,#10DIV ABSWAP AORL A,BMOV P0, AMOV P2, #02HLCALL READLCALL DE250SMCJNE A, 01H,MIN_OFFCJNE A, #0FBH, KEY2_F11 ;按SB2 转分调整LJMP ON_1 ;按SB3 往下调定时：开与关KEY2_F11: CJNE
27、 A, #0FDH, MIN_OFFINC MIN_11 ;1 路分单元加1MOV R5, MIN_11CJNE R5,#60,MIN_OFF;益处MOV MIN_11, #00HLJMP MIN_OFF ; 转到分显;-开、关定时ON_1:CJNE A, #0FBH, MIN_OFFK1: MOV A, #88HMOV R7, AMOV P0, AMOV P2, #0FFH;三组都显示开LCALL READLCALL DE250SMCJNE A, 01H, ON_1;去抖后比较CJNE A, #0FBH,KEY2_12 ;按SB2 转关LJMP OUT_A ;按SB3 调出、处于开状态KEY
28、2_12: CJNE A, #0FDH, K1k2: MOV A, #00H; 显示0 关MOV R7, AMOV P0, AMOV P2, #0FFH;LCALL READLCALL DE250SMCJNE A, 01H, K2;去抖后比较CJNE A, #0FBH,KEY2_13 ;按SB2 转开LJMP OUT_A ;SB3 调出、处关状态KEY2_13:CJNE A, #0FDH, K2 ; 比较按了没LJMP K1 ; 按了SB2、转开OUT_A:POP 00HPOP BPOP ACCPOP PSWRETI;_-读取按键程序READ:MOV A , P1;读取按键MOV R1, ALCALL DE10MSMOV A, P1RET;_-延时程序DE5SM:PUSH 01HMOV R1, #0FFHDJNZ R1,$POP 01HRETDE10MS: PUSH 04HPUSH 05HMOV R4, #0AHDl1: MOV R5, #0FFHdl2: DJNZ R5,$DJNZ R4,dl1POP 05HPOP 04HRETDE250SM:PUSH 02HPUSH 00HMOV R0, #0FFHDEL:MOV R2, #0FFHDJNZ R2,$DJNZ R0, DELPOP 00HPOP 02HRET
