QuartusII时钟CASE语句Word文档下载推荐.docx

QuartusII时钟CASE语句Word文档下载推荐.docx

《QuartusII时钟CASE语句Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《QuartusII时钟CASE语句Word文档下载推荐.docx（17页珍藏版）》请在冰豆网上搜索。

signalsec2:

signalh1:

signalh2:

signalm1:

signalm2:

signals1:

signals2:

-------------------------------------------------

begin

----------------------------------------------模6计数

choice:

process（clk1）

ifclk1'

eventandclk1='

1'

then

ifsel="

101"

sel<

="

000"

;

else

=sel+1;

endif;

endprocesschoice;

-----------------------------------------------小时十位

h110:

process（clk,hou2,min1,min2,sec1,sec2,md1,md2）

ifclk'

eventandclk='

if（hou1="

0010"

andhou2="

0011"

）and（min1="

0101"

andmin2="

1001"

）and（sec1="

andsec2="

） 

hou1<

0000"

elsifhou1="

andhou2="

andmd1='

0'

andmd2="

01"

then--当时间为23点且处于校时状态时

elsif（hou2="

and（min1="

））or（hou2="

=hou1+1;

endprocessh110;

-----------------------------------------------小时个位

h220:

process（clk,min1,min2,sec1,sec2,md1,md2,hou1）

）then

hou2<

elsifhou2="

）or（hou1="

--md<

='

elsif（（min1="

））or（md1='

=hou2+1;

--speak<

=clk;

endprocessh220;

-----------------------------------------------分钟十位

m110:

process（clk,min2,sec1,sec2,md1,md2）

if（min1="

）then

min1<

elsifmin1="

andmin2="

and（md1='

00"

）then

elsif（min2="

and（sec1="

））or（min2="

=min1+1;

--endif;

endprocessm110;

----------------------------------------------分钟个位

m220:

process（clk,sec1,sec2,md1,md2）

ifmin2="

min2<

elsifmin2="

else 

if（sec1="

）or（md1='

=min2+1;

endprocessm220;

---------------------------------------------秒十位

s110:

process（clk）

if（sec1="

sec1<

elseifsec2="

then

=sec1+1;

endprocesss110;

--------------------------------------------秒个位

s220:

ifsec2="

sec2<

elsesec2<

=sec2+1;

endprocesss220;

-------------------------------------------时间设置小时部分

sethour1:

process（clk,seth2）

ifseth1="

andseth2="

seth1<

elsifseth2="

=seth1+1;

endprocesssethour1;

-------------------------------------------

sethour2:

process（clk,md1,md2,seth1）

if（seth1="

）orseth2="

seth2<

elsifmd1='

=seth2+1;

endprocesssethour2;

-------------------------------------------时间设置分钟部分

setmin1:

process（clk,setm2）

ifsetm1="

andsetm2="

setm1<

elsifsetm2="

=setm1+1;

endprocesssetmin1;

----------------------------------------------

setmin2:

process（clk,md1,md2）

ifsetm2="

setm2<

=setm2+1;

endprocesssetmin2;

--------------------------------------------

--------------------------------------------闹铃

speaker:

process（clk1,hou1,hou2,min1,min2）

ifseth1=hou1andseth2=hou2andsetm1=min1andsetm2=min2then

speak<

=clk1;

elsespeak<

endprocessspeaker;

disp:

process（sel,md1,hou1,hou2,min1,min2,sec1,sec2,seth1,seth2,setm1,setm2）

selout<

caseh1is

when"

=>

dout<

0111111"

0001"

0000110"

1011011"

whenothers=>

1000000"

endcase;

elsifsel="

001"

caseh2is

1001111"

0100"

1100110"

1101101"

0110"

1111101"

0111"

0000111"

1000"

1111111"

1101111"

whenothers=>

010"

casem1is

011"

casem2is

100"

cases1is

cases2is

ifmd1='

then---------------计时时间显示和设置模式

h1<

=hou1;

h2<

=hou2;

m1<

=min1;

m2<

=min2;

s1<

=sec1;

s2<

=sec2;

-----------闹铃时间现实和设置模式

=seth1;

=seth2;

=setm1;

=setm2;

1111"

endprocessdisp;

------------------------------------------

end 

one;

.1数字钟的基本组成及工作原理

数字钟实际上是一个对标准频率（1HZ）进行计数的计数电路.由于计数的起始时间不可能与标准时间（如北京时间）一致,故需要在电路上加一个校时电路,同时标准的1HZ时间信号必须做到准确稳定.通常使用石英晶体振荡器电路构成数字钟.图1.1所示为数字钟的一般构成框图.

⑴晶体振荡器电路 

晶体振荡器电路给数字钟提供一个频率稳定准确的32768Hz的方波信号,可保证数字钟的走时准确及稳定.不管是指针式的电子钟还是数字显示的电子钟都使用了晶体振荡器电路.

⑵分频器电路 

分频器电路将32768Hz的高频方波信号经32768（）次分频后得到1Hz的方波信号供秒计数器进行计数.分频器实际上也就是计数器.

⑶时间计数器电路 

时间计数电路由秒个位和秒十位计数器,分个位和分十位计数器及时个位和时十位计数器电路构成,其中秒个位和秒十位计数器,分个位和分十位计数器为60进制计数器,而根据设计要求,时个位和时十位计数器为12进制计数器.

⑷译码驱动电路 

译码驱动电路将计数器输出的8421BCD码转换为数码管需要的逻辑状态,并且为保证数码管正常工作提供足够的工作电流.

⑸数码管 

数码管通常有发光二极管（LED）数码管和液晶（LCD）数码管,本设计提供的为LED数码管.

2.2数字钟的工作原理

1）晶体振荡器电路

晶体振荡器是构成数字式时钟的核心,它保证了时钟的走时准确及稳定.

一般输出为方波的数字式晶体振荡器电路通常有两类,一类是用TTL门电路构成;

另一类是通过CMOS非门构成的电路,如图1.2所示,从图上可以看出其结构非常简单.该电路广泛使用于各种需要频率稳定及准确的数字电路,如数字钟,电子计算机,数字通信电路等.

CMOS非门U1与晶体,电容和电阻构成晶体振荡器电路,U2实现整形功能,将振荡器输出的近似于正弦波的波形转换为较理想的方波.输出反馈电阻为非门提供偏置,使电路工作于放大区域,即非门的功能近似于一个高增益的反相放大器.电容C1,C2与晶体构成一个谐振型网络,完成对振荡频率的控制功能,同时提供了一个180度相移,从而和非门构成一个正反馈网络,实现了振荡器的功能.由于晶体具有较高的频率稳定性及准确性,从而保证了输出频率的稳定和准确.

2）分频器电路

通常,数字钟的晶体振荡器输出频率较高,为了得到1Hz的秒信号输入,需要对振荡器的输出信号进行分频.

通常实现分频器的电路是计数器电路,一般采用多级2进制计数器来实现.例如,将32768Hz的振荡信号分频为1HZ的分频倍数为32768（）,即实现该分频功能的计数器相当于15级2进制计数器.常用的2进制计数器有74HC393等.

3）时间计数单元

时间计数单元有时计数,分计数和秒计数等几个部分.

时计数单元以24进制计数器,其输出为两位8421BCD码形式;

分计数和秒计数单元为60进制计数器,其输出也为8421BCD码.

一般采用10进制计数器如74HC290,74HC390等来实现时间计数单元的计数功能.欲实现24进制和60进制计数还需进行计数模值转换.

4）译码驱动及显示单元

计数器实现了对时间的累计以8421BCD码形式输出,为了将计数器输出的8421BCD码显示出来,需用显示译码电路将计数器的输出数码转换为数码显示器件所需要的输出逻辑和一定的电流,一般这种译码器通常称为7段译码显示驱动器.

常用的7段译码显示驱动器有CD4511.

5）校时电源电路

当重新接通电源或走时出现误差时都需要对时间进行校正.通常,校正时间的方法是:

首先截断正常的计数通路,然后再进行人工出触发计数或将频率较高的方波信号加到需要校正的计数单元的输入端,校正好后,再转入正常计时状态即可library 

ieee;

use 

ieee.std_logic_1164.all;

ieee.std_logic_arith.all;

ieee.std_logic_unsigned.all;

entity 

clock 

is 

port 

（clk,clr,a,c,e,f,g:

in 

std_logic;

---输入信号

led_sel:

out 

std_logic_vector（2 

downto 

0）;

---位控输入信号

led:

std_logic_vector（0to 

6）;

--七段码输出

p,q:

std_logic_vector（3downto 

--选择

b:

std_logic_vector（2 

ring:

std_logic）;

---蜂鸣器输出

entityclock;

architecturebeha 

of 

clockis 

signal 

m:

integerrange0 

to999;

hou1,hou0,min1,min0,sec1,sec0,s2:

std_logic_vector（3 

rhou1,rhou0,rmin1,rmin0,rsec1,rsec0:

std_