单片机课程设计——时间控制器一．设计要求：设计一个以AT89 C52为核心的时间控制器。
可以实现时间显示和设置闹钟功能。
用89S52单片机设计一个时间控制器，有8位数码管显示年月日及时分秒，具有日历和时钟功能，有一路输出控制电灯，有一路输出控制蜂鸣器，可以设置年月日及时分秒，可以设置一张时间表，该时间表记录什么时间开、关电灯，什么时间开、关蜂鸣器，而单片机按这张时间表来控制电灯和蜂鸣器。
该时间表要求掉电时仍能保存不掉数据，所以需要用一片EEPROM来保存数据，如用24C02/04/08等。
二．设计原理：在AT80C52单片机内部对机器周期进行计数，从而得到定时。
由于AT89 C52的内部计数器是16位的，振荡脉冲频率为12MHZ，这样一个机器周期为1μs，计满一次为65536μs。
显示器选用8位共阳极数码管，分别表示时、分、秒。
同时选用两个74HC273作为片选和位选锁存器。
同时经过P0口外加四个键盘用以调整时间。
软件部分分为四大模块：调整初始时间、设置闹铃时间实现闹铃功能、显示时间和脉冲计数模块。
脉冲计数模块，通过AT89 C52的T0进行计数，设置T0计数溢出时，由内部硬件置位，同时开放中断，使系统进入中断服务程序。
在定时器运行前，在其中先预置入计数初值，为了计算方便，在次设置中预置的初值为（65536－1000），这样一次“硬件计时周期”就可定时1000μs。
在中断服务程序设置进行1000次“硬件计时周期”就可得到1S。
同理进行分、小时的计时。
三．流程图：四．设计原理图：五．程序清单：SYSTEM equ 0 NMLIGHTON equ 6 NMLIGHTOFF equ 7 NMALARMON equ 8 ANALARMOFF equ 9 YEAR1 equ 10H YEAR2 equ 11H YEAR3 equ 12H YEAR4 equ 13H MONTH1 equ 14H MONTH2 equ 15H DAY1 equ 16H DAY2 equ 17H HOUR1 equ 18H HOUR2 equ 19H MINUTE1 equ 1AH MINUTE2 equ 1BHSECOND1 equ 1CHSECOND2 equ 1DHWEEKDAY1 equ 1EHWEEKDAY2 equ 1FH;time tableLIGHTONT equ 100LIGHTOFF equ 200ALARMON equ 300ALARMOFF equ 400org 00hjmp startorg 03hjmp Int0Procorg 1BHjmp T1Procorg 13Hjmp Int1Procorg 30hstart: mov DPTR,#SYSTEMmovx A,@DPTRjnz Next3 ;have value in external ROMmov A,#01Hmovx @DPTR,Acall Initmov R4,#1 ;first display Dateclr C ;LED turn off in the firstmov P3.0,CNext3: mov TL1,#9cHmov TH1,#0ffHmov TMOD,#11H ;Timer 1 mode 1setb TR1setb ET1setb IT0 ;smart heresetb IT1setb PX0setb EX0setb EX1setb EASECOND: mov R5,#2call WaitSecondcpl P3.1jb P1.3, Next7call SetDateNext7: jb P1.4,Next8call SetTimeNext8: mov DPTR,#SECOND2movx A,@DPTRinc Amovx @DPTR,A ;seconds increase 1,then write to ROMxrl A,#10jnz SECONDmov A,#0mov DPTR,#SECOND2movx @DPTR,A ;clear SECOND2mov DPTR,#SECOND1movx A,@DPTRinc Amovx @DPTR,A ;inc SECOND1movx A,@DPTRxrl A,#6jnz SECONDmov A,#0movx @DPTR,AMINUTE: mov DPTR,#MINUTE2movx A,@DPTRinc Amovx @DPTR,A ;write to ROMmovx A,@DPTRxrl A,#10 ;BCD codejnz SECONDmov A,#0movx @DPTR,Amov DPTR,#MINUTE1movx A,@DPTRinc Amovx @DPTR,A ;write to ROMmovx A,@DPTRxrl A,#6jnz SECONDmov A,#0movx @DPTR,AHOUR: mov DPTR,#HOUR2movx A,@DPTRinc Amovx @DPTR,A ;write to ROMmovx A,@DPTRxrl A,#10 ;BCD codejnz Next4mov A,#0movx @DPTR,Amov DPTR,#HOUR1movx A,@DPTRinc Amovx @DPTR,A ;write to ROMjmp SECONDNext4: mov DPTR,#HOUR1movx A,@DPTRmov B,A ;save hour1 to Bmov A,#10mul ABmov R0,A ;save the result to R0mov DPTR,#HOUR2movx A,@DPTRmov R1,A ;save hour2 to R1mov A,B ;restore the resultadd A,R1xrl A,#24jnz SECONDmov A,#0mov DPTR,#HOUR2movx @DPTR,A ;reset HOUR2mov DPTR,#HOUR1movx @DPTR,Amp SECONDT1Proc: mov TH1,#0FfHmov TL1,#9cHcpl P3.1retiInt0Proc: push DPLpush DPHpush ACCclr EAmov A,R4jnz Next5call WriteTimejmp Return3Next5: call WriteDateReturn3: setb EApop ACCpop DPHpop DPLretiInt1Proc: push ACCpush Bclr EAinc R6 ;R6 to mark Date/Time on the LEDmov A,R6mov B,#3div ABmov A,B ;judge the remainderjz Next6mov R4,#0jmp Return5Next6: mov R4,#1HReturn5: setb EApop Bpop ACCretiWriteTime: inc R7 ;R7 to generate scan signal of LED mov A,R7xrl A,#8jnz I0mov R7,#0I0: mov A,R7xrl A,#0jnz I1call WriteHour1jmp Return4I1: mov A,R7xrl A,#1jnz I2call WriteHour2jmp Return4I2: mov A,R7xrl A,#2jnz I3call WriteMinute1jmp Return4I3: mov A,R7xrl A,#3jnz I4call WriteMinute2jmp Return4I4: mov A,R7xrl A,#4jnz I5call WriteSECOND1jmp Return4I5: mov A,R7xrl A,#5jnz I6call WriteSECOND2jmp Return4I6: mov A,R7xrl A,#6jnz I7call WriteWeekday1jmp Return4l7: mov A,R7xrl A,#7jnz Return4call WriteWeekday2 Return4: retWriteDate: inc R7mov A,R7xrl A,#8jnz IS0mov R7,#0IS0: mov A,R7xrl A,#0jnz IS1call WriteYear1jmp Return1IS1: mov A,R7xrl A,#1jnz IS2call WriteYear2jmp Return1IS2: mov A,R7xrl A,#2jnz IS3call WriteYear3jmp Return1IS3: mov A,R7xrl A,#3jnz IS4call WriteYeaR5jmp Return1IS4: mov A,R7xrl A,#4jnz IS5call WriteMonth1jmp Return1IS5: mov A,R7xrl A,#5jnz IS6call WriteMonth2jmp Return1IS6: mov A,R7xrl A,#6jnz IS7call WriteDay1jmp Return1IS7: mov A,R7xrl A,#7jnz Return1call WriteDay2Return1: retWriteYear1: mov DPTR,#YEAR1movx A,@DPTRanl P1,#11111000B ; P1=0mov P2,AretWriteYear2: mov DPTR,#YEAR2movx A,@DPTRorl P1,#00000001B ; P1=1mov P2,AretWriteYear3: mov DPTR,#YEAR3movx A,@DPTRxrl P1,#00000011B ;P1=2mov P2,AretWriteYeaR5: mov DPTR,#YEAR4 ;P1=3movx A,@DPTRorl P1,#00000001Bmov P2,AretWriteMonth1: mov DPTR,#MONTH1movx A,@DPTRxrl P1,#00000111B ;P1=4mov P2,AretWriteMonth2: mov DPTR,#MONTH2movx A,@DPTRorl P1,#00000001B ;P1=5mov P2,AretWriteDay1: mov DPTR,#DAY1movx A,@DPTRxrl P1,#00000011B ;P1=6mov P2,AretWriteDay2: mov DPTR,#DAY2movx A,@DPTRorl P1,#00000001B ;P1=7mov P2,AretWriteHour1: mov DPTR,#HOUR1movx A,@DPTRanl P1,#11111000B ; P1=0mov P2,AretWriteHour2: mov DPTR,#HOUR2movx A,@DPTRorl P1,#00000001B ; P1=1mov P2,AretWriteMinute1: mov DPTR,#MINUTE1movx A,@DPTRxrl P1,#00000011B ;P1=2mov P2,AretWriteMinute2: mov DPTR,#MINUTE2movx A,@DPTRorl P1,#00000001B ;P1=3mov P2,AretWriteSECOND1: mov DPTR,#SECOND1movx A,@DPTRxrl P1,#00000111B ;P1=4mov P2,AretWriteSECOND2: mov DPTR,#SECOND2movx A,@DPTRorl P1,#00000001B ;P1=5mov P2,AretWriteWeekday1: mov DPTR,#WEEKDAY1movx A,@DPTRxrl P1,#00000011B ;P1=6mov P2,AretWriteWeekday2:mov DPTR,#WEEKDAY2movx A,@DPTRorl P1,#00000001B ;P1=7mov P2,AretInit: mov A,#2mov DPTR,#YEAR1movx @DPTR,Amov A,#0mov DPTR,#YEAR2movx @DPTR,Amov A,#0mov DPTR,#YEAR3movx @DPTR,Amov A,#8mov DPTR,#YEAR4movx @DPTR,Amov A,#0mov DPTR,#MONTH1movx @DPTR,Amov A,#1mov DPTR,#MONTH2movx @DPTR,Amov A,#0mov DPTR,#DAY1movx @DPTR,Amov A,#1mov DPTR,#DAY2movx @DPTR,Amov A,#1mov DPTR,#HOUR1movx @DPTR,Amov A,#7mov DPTR,#HOUR2movx @DPTR,Amov A,#1mov DPTR,#MINUTE1movx @DPTR,Amov A,#6mov DPTR,#MINUTE2movx @DPTR,Amov A,#1mov DPTR,#SECOND1movx @DPTR,Amov A,#0mov DPTR,#SECOND2movx @DPTR,Amov A,#0mov DPTR,#WEEKDAY1movx @DPTR,Amov A,#2mov DPTR,#WEEKDAY2movx @DPTR,AretSetTime: clr EX1 ;forbid interrupt 1mov R4,#00H ;show time alwaysmov A,#0mov DPTR,#SECOND2movx @DPTR,A ;clear secondsmov DPTR,#SECOND1movx @DPTR,Asettime1:jb P1.4,Return7jb P1.5,Next9call SetHour ; P1.5=0 ,key pressNext9: jb P1.6,settime1call SetMinute ;P1.6=0,key pressjmp settime1Return7: setb EX1retSetMinute:mov DPTR,#MINUTE2movx A,@DPTRinc Amovx @DPTR,A ;increase Minute2xrl A,#10jnz Jmov A,#0movx @DPTR,ASetYear: mov DPTR,#YEAR4movx A,@DPTRinc Amovx @DPTR,Axrl A,#10jnz J5mov A,#0movx @DPTR,Amov DPTR,#YEAR3movx A,@DPTRinc Amovx @DPTR,Axrl A,#10jnz J5mov A,#0movx @DPTR,Amov DPTR,#YEAR2movx A,@DPTRinc Amovx @DPTR,Axrl A,#10jnz J5mov A,#0movx @DPTR,Amov DPTR,#YEAR1movx A,@DPTRinc Amovx @DPTR,Axrl A,#10jnz J5mov A,#0movx @DPTR,AJ5: jb P1.5,Return13 ;wait the key to releasejmp J5Return13:retWaitSecond: mov A,R5jz Return6WaitSecond1:mov TL0,#0B0H ;50000(0xc350) ticks before overflow = 0.5s at 1.2MHz Clock mov TH0,#3cHmov A,TMODorl A,#00000001Bmov TMOD,A ;Timer 0 mode 1setb TR0;Timer 0 runsWaitSecond2: jnb TF0,WaitSecond2clr TR0 ;Timer 0 stops(no interrupt,can't auto clear,so software clear)clr TF0dec R5mov A,R5jnz WaitSecond1Return6: retEND。
