|
本帖最后由 chenqinte 于 2009-5-5 14:34 编辑 9 Y( f0 ]" G- s
9 I5 E! H; G1 G/ W2 e没人顶哦,这是我写的一个小程序不过仿真的结果可以实现3分频,但在板子上跑时,分频乱七八糟的,不知道为什么
a+ h/ V u3 Olibrary ieee;5 o2 c0 B$ f7 |! v; W
use ieee.std_logic_1164.all;
- N6 e4 z0 `& D% {use ieee.std_logic_arith.all;" G& @3 B# _) @; ~4 a( q$ W4 G% L
use ieee.std_logic_unsigned.all;
6 U0 o% L% v6 r, rentity febpin is
, m; {$ z; V! r+ T' u port(
s3 v7 g5 ?6 B$ `. [4 v0 g# L clk:in std_logic;
' K! c- V; d1 F- [) x7 A; F/ E- G" t div3:inout std_logic, @8 }" c5 e0 P- ]
);! W0 q4 R) [: |6 l$ D3 `
end;
- m3 U0 Y+ } ^ D, y) ~architecture behavioral of febpin is7 T) F5 U& T' I
signal cnt:integer range 0 to 2;& v5 c* i, Q* I+ d7 M5 I
signal q:std_logic:='0';
; M5 \: S3 T4 k8 N, m( ~1 b, Hbegin3 F2 N/ S J& c# `
process(clk)5 j. c3 n0 I+ C' H' L
begin; x3 Z1 S/ t* u9 N# }! I- _' Z) w
if (clk'event) then
, h/ N$ l V( b) k( ^8 | if cnt=2 then/ R. ~3 L R% D* a! R: ` W
q<=not q;- J) [) U' b/ B- h
cnt<=0;. |7 y1 h) A5 F: ?8 ]5 s( Q# E
else
2 |7 R+ T; y- Y) {* `' n+ S cnt<=cnt+1;5 s0 a2 t! o! @% O. z% ~( R
end if;
: \3 T* }; W5 K+ e+ M end if;
" L! ~ l# @- w' C end process;* v: l# ~$ t8 y* W) ], r: K+ p# H1 U* q
div3<=q;
+ q& |- H2 n0 p* o( l0 q- p: g7 K) Lend behavioral; |
|