基于FPGA的数字频率计代码Word下载.docx

基于FPGA的数字频率计代码Word下载.docx

《基于FPGA的数字频率计代码Word下载.docx》由会员分享，可在线阅读，更多相关《基于FPGA的数字频率计代码Word下载.docx（5页珍藏版）》请在冰豆网上搜索。

--八段码

w1:

outstd_logic_vector（3downto0））;

--数码管位选信号

endplj;

architecturebehavofPLjis

signalb1,b2,b3,b4,b5,b6,b7:

std_logic_vector（3downto0）;

--十进制计数器

signalbcd:

--BCD码寄存器

signalq:

integerrange0to49999999;

--秒分频系数

signalqq:

integerrange0to499999;

--动态扫描分频系数

signalen,bclk:

std_logic;

--使能信号，有效被测信号

signalsss:

std_logic_vector（3downto0）;

--小数点

signalbcd0,bcd1,bcd2,bcd3:

--寄存7位十位计数器中有效的高4位数据

begin

second:

process（clk）--此进程产生一个持续时间为一秒的的闸门信号

ifstart='

1'

thenq<

=0;

elsifclk'

eventandclk='

then

ifq<

49999999thenq<

=q+1;

elseq<

=49999999;

endif;

49999999andstart='

0'

thenen<

='

;

elseen<

endprocess;

and2:

process（en,clk1）--此进程得到7位十进制计数器的计数脉冲

bclk<

=clk1anden;

:

process（start,bclk）--此进程完成对被测信号计脉冲数

then--复位

b1<

="

0000"

b2<

b3<

b4<

b5<

b6<

b7<

elsifbclk'

eventandbclk='

then

ifb1="

1001"

thenb1<

--此IF语句完成个位十进制计数

ifb2="

thenb2<

--此IF语句完成百位十进制计数

ifb3="

thenb3<

--此IF语句完成千位十进制计数

ifb4="

thenb4<

--此IF语句完成万位十进制计数

ifb5="

THENb5<

--此IF语句完成十万位十进制计数

ifb6="

thenb6<

--此IF语句完成百万位十进制计数

ifb7="

thenb7<

--此IF语句完成千万位十进制计数

elseb7<

=b7+1;

elseb6<

=b6+1;

elseb5<

=b5+1;

elseb4<

=b4+1;

elseb3<

=b3+1;

elseb2<

=b2+1;

elseb1<

=b1+1;

process（clk）--此进程把7位十进制计数器有效的高4位数据送如bcd0~3；

并得到小数点信息

ifrising_edge（clk）then

ifen='

ifb7>

"

thenbcd3<

=b7;

bcd2<

=b6;

bcd1<

=b5;

bcd0<

=b4;

sss<

1110"

elsifb6>

=b3;

1101"

elsifb5>

=b2;

1011"

elsebcd3<

=b1;

1111"

weixuan:

process（clk）--此进程完成数据的动态显示

ifclk'

ifqq<

99999thenqq<

=qq+1;

bcd<

=bcd3;

w1<

0111"

ifsss="

thenyy1（0）<

elseyy1（0）<

elsifqq<

199999thenqq<

=bcd2;

299999thenqq<

=bcd1;

399999thenqq<

=bcd0;

elseqq<

m0:

process（bcd）--译码

begin

casebcdis

when"

=>

yy1（7downto1）<

0000001"

0001"

1001111"

0010"

0010010"

0011"

0000110"

0100"

1001100"

0101"

0100100"

0110"

1100000"

0001111"

1000"

0000000"

0001100"

whenothers=>

1111111"

endcase;

endbehav;