六、结论

通过本次课程设计，我学习到了很多，也收获了很多。总结如下： 一、我对单片机的理论知识有了进一步的掌握，对单片机的原理和实际应用有了更多地理解和掌握。

二、我对单片机的C语言编程有了更深刻的认识和更扎实的掌握，我们不断修改，不断尝试，对源代码各个模块的函数都有了一个非常深入的掌握。

三、理论与实践相结合才能更好的理解和掌握所学的知识。

七、课程总结

通过本次设计，让我很好的锻炼了理论联系实际，与具体项目、课题相结合开发、设计产品的能力。既让我们懂得了怎样把理论应用于实际，又让我们懂得了在实践中遇到的问题怎样用理论去解决。 在本次设计中，我们还需要大量的以前没有学到过的知识，于是图书馆和INTERNET成了我们很好的助手。在查阅资料的过程中，我们

6

要判断优劣、取舍相关知识，不知不觉中我们查阅资料的能力也得到了很好的锻炼。我们学习的知识是有限的，在以后的工作中我们肯定会遇到许多未知的领域，这方面的能力便会使我们受益非浅。 在设计过程中，总是遇到这样或那样的问题。有时发现一个问题的时候，需要做大量的工作，花大量的时间才能解决。自然而然，我的耐心便在其中建立起来了。为以后的工作积累了经验，增强了信心

八、附录（源程序）

1、小时计数器VHDL语言源程序（底层文件） LIBRARY IEEE;

use IEEE.STD_LOGIC_1164.ALL; USE IEEE.STD_LOGIC_UNSIGNED.ALL; ENTITY hour IS

PORT(clk,reset:IN STD_LOGIC;

daout:out STD_LOGIC_VECTOR(5 DOWNTO 0)); END ENTITY hour;

ARCHITECTURE fun OF hour IS

SIGNAL count:STD_LOGIC_VECTOR(5 DOWNTO 0); BEGIN

daout<=count; PROCESS(clk,reset) BEGIN

IF(reset='0')THEN count<=\——若reset=0，则异步清零

ELSIF(clk'event and clk='1')THEN ——否则，若clk上升沿到 IF(count(3 DOWNTO 0)=\——若个位计时恰好到“1001”即9 IF(count<16#23#)THEN ——23进制

count<=count+7; ——若到23D则 else

count<=\——复0 END IF;

ELSIF (count<16#23#)THEN ——若未到23D，则count进1 count<=count+1;

ELSE ——否则清零 count<=\

END IF; ——END IF（count（3 DOWNTO 0）=“1001”） END IF; ——END IF（reset=‘0’）

7

END PROCESS; END fun;

2、分钟计数器VHDL语言源程序（底层文件） LIBRARY IEEE;

USE IEEE.STD_LOGIC_1164.ALL; USE IEEE.STD_LOGIC_UNSIGNED.ALL; ENTITY minute IS

PORT(clk,clk1,reset,sethour:IN STD_LOGIC; enhour:OUT STD_LOGIC;

daout:OUT STD_LOGIC_VECTOR(6 DOWNTO 0)); END ENTITY minute ;

ARCHITECTURE fun OF minute IS

SIGNAL count :STD_LOGIC_VECTOR (6 DOWNTO 0);

SIGNAL enhour_1, enhour_2: STD_LOGIC; ——enmin_1为59分时的进位信号

BEGIN ——enmin_2由clk调制后的手动调时脉冲信号串 daout<=count;

enhour_2<= (sethour and clk1); ——sethour为手动调时控制信号，高电平有效 enhour<= (enhour_1 or enhour_2); PROCESS(clk,reset,sethour) BEGIN

IF(reset='0') THEN ——若reset为0，则异步清零 count<=\

ELSIF(clk'event and clk='1')THEN ——否则，若clk上升沿到

IF(count (3 DOWNTO 0) =\——若个位计时恰好到“1001”即9 IF(count <16#60#) THEN ——又若count小于16#60#，即60 IF(count=\——又若已到59D enhour_1<='1'; ——则置进位为1 count<=\——count复0 ELSE

count<=count+7; ——若count未到59D，则加7，即作“加6校正” END IF; ——使前面的16#60#的个位转变为8421BCD的容量 ELSE

count<=\——count复0（有此句，则对无效状态电路可自启动） END IF; ——END IF（count<16#60#） ELSIF (count <16#60#) THEN

count<=count+1; ——若count<16#60#则count加1 enhour_1<='0' after 100 ns; ——没有发生进位 ELSE

count<=\——否则，若count不小于16#60# count复0 END IF; ——END IF（count（3 DOWNTO 0）=“1001”） END IF; ——END IF（reset=‘0’） END process; END fun;

8

3、秒钟计数器VHDL语言源程序（底层文件） LIBRARY IEEE;

USE IEEE.STD_LOGIC_1164.ALL; USE IEEE.STD_LOGIC_UNSIGNED.ALL; ENTITY second IS

PORT( clk,reset,setmin:STD_LOGIC; enmin:OUT STD_LOGIC;

daout:OUT STD_LOGIC_VECTOR(6 DOWNTO 0)); END ENTITY second;

ARCHITECTURE fun OF second IS

SIGNAL count:STD_LOGIC_VECTOR(6 DOWNTO 0);

SIGNAL enmin_1,enmin_2:STD_LOGIC; ——enmin_1为59秒时的进位信号

BEGIN ——enmin_2由clk调制后的手动调分脉冲信号串 daout<=count;

enmin_2<=(setmin and clk); ——setmin为手动调分控制信号，高电平有效 enmin<=(enmin_1 or enmin_2); ——enmin为向分进位信号 PROCESS(clk,reset,setmin) BEGIN

IF(reset='0')THEN count<=\——若reset为0，则异步清零 ELSIF(clk 'event and clk='1')then ——否则，若clk上升沿到

IF(count(3 downto 0)=\——若个位计时恰好到“1001”即9 IF(count<16#60#)then ——又若count小于16#60#,即60H IF(count=\——又若已到59D

enmin_1<='1';count<=\——则置进位为1及count复0 ELSE ——未到59D

count<=count+7; ——则加7，而+7=+1+6，即作“加6校正” END IF;

ELSE ——若count不小于16#60#（即count等于或大于16#60#） count<=\——count复0

END IF; ——END IF（count<16#60#）

ELSIF(count<16#60#)then ——若个位计数未到“1001”则转此句再判 count<=count+1; ——若count<16#60#则count加1 enmin_1<='0'after 100 ns; ——没有发生进位

ELSE ——否则，若count不小于16#60# count<=\——则count复0

END IF; ——END IF（count（3 DOWNTO 0）=“1001”） END IF; ——END IF（reset=‘0’） END PROCESS; END fun;

4、整点报时报警模块VHDL语言源程序（底层文件） LIBRARY IEEE;

USE IEEE.STD_LOGIC_1164.ALL;

9

USE IEEE.STD_LOGIC_UNSIGNED.ALL; ENTITY alert IS

PORT(clk:IN STD_LOGIC;

dain:IN STD_LOGIC_VECTOR(6 DOWNTO 0); speak:OUT STD_LOGIC;

lamp:OUT STD_LOGIC_VECTOR(2 DOWNTO 0)); END alert;

ARCHITECTURE fun OF alert IS

SIGNAL count:STD_LOGIC_VECTOR(1 DOWNTO 0); SIGNAL count1:STD_LOGIC_VECTOR(1 DOWNTO 0); BEGIN

speaker:PROCESS(clk) BEGIN

speak<=count1(1);

IF(clk'event and clk='1')THEN

IF(dain=\ IF(count1>=\

count1<=\——count1为三进制加法计数器 ELSE

count1<=count1+1; END IF ; END IF ; END IF ;

END PROCESS speaker; lamper:PROCESS(clk) BEGIN

IF(rising_edge(clk))THEN IF(count<=\ IF(count=\

lamp<=\——循环点亮三只灯 ELSIF(count=\ lamp<=\

ELSIF(count=\ lamp<=\ END IF;

count<=count+1; ELSE

count<=\ END IF; END IF; END PROCESS lamper; END fun;

10