|
以上問題已經解決@@"- _# p% i! U+ o
但請問 我需要一個另外程式
3 [6 J( o3 x) a+ Y去控制暫停開始和暫停
# c" Y- m1 c$ K3 }LIBRARY ieee;
7 p% U! v0 B# U$ RUSE ieee.std_logic_1164.all;7 e, `9 s2 I# ]" ?2 `8 R0 V& y
USE ieee.std_logic_unsigned.all;
" n, e( F2 s5 k% ` [ENTITY debounce_v IS
0 U& n4 |9 d0 ` D( \; C PORT(CLK,PB : IN STD_LOGIC;
4 F9 @2 s% C3 Q5 Q8 x PULSE : OUT STD_LOGIC
2 \! {, _& o. L, R );. X' O3 A$ ~1 {' J, }8 X
END debounce_v;1 T. c2 c5 k J R& y0 e" R5 m6 F
ARCHITECTURE arc OF debounce_v IS4 ^3 G8 u( z4 p7 d! r
SIGNAL imper : STD_LOGIC;
8 ^4 I, n) v E, V9 s# f BEGIN
9 _ h& [/ d2 { ]+ t PROCESS (CLK)7 ?& h6 O* _9 p, y9 @
VARIABLE counter : integer range 0 to 49;- G6 W3 F5 \* b
BEGIN
D/ |: T/ C: P% J IF (CLK'event AND CLK='1') THEN
G$ i6 b2 N* \- l# u. }) `) p IF counter = "1" and (PB = '1') THEN imper <= '1';' ^, o! a( ^; G: K; v+ C3 Y
ELSE counter := counter-1; imper <= '0';' S- {; g3 R+ A4 R
END IF;
, L" O# j8 s0 k# ~+ b9 o( N/ V END IF;8 N; Q# i; U6 f% ^, q8 v
PULSE <= imper; ! F: `" c7 m" I$ ^
END PROCESS ;
$ [0 E# s& J1 L# I6 s2 w* A# jEND arc;& d7 |: g$ q/ {
+ V, l1 J. X' D' ^" L這是按一次減一次% w9 F2 _" ^* G1 _) m7 Y6 I
想要按一下開始 按一下暫停' |) u# p9 @3 l: i; ~
- i, r, O' p* [
ps.轉自全華圖書 |
|