Chip123 科技應用創新平台

標題: 請問倒數00就停怎寫? [打印本頁]

作者: hope1014 時間: 2008-11-26 06:56 PM
標題: 請問倒數00就停怎寫?
LIBRARY ieee;
USE ieee.std_logic_1164.all;
USE ieee.std_logic_unsigned.all;
ENTITY counter_backwards60_seg2 IS
PORT(Clrn,Load,Ena,Clk : IN  STD_LOGIC;
   Ring       : OUT STD_LOGIC;
   Q0,Q1       : OUT STD_LOGIC_VECTOR(3 downto 0)) ;
END counter_backwards60_seg2;
ARCHITECTURE arc OF counter_backwards60_seg2 IS
BEGIN
  PROCESS (Clk)
   VARIABLE imper0 :STD_LOGIC_VECTOR(3 downto 0);
   VARIABLE imper1 :STD_LOGIC_VECTOR(3 downto 0);
  BEGIN
IF Clrn='0' THEN  imper1 := "0110"; imper0 := "0000";
ELSE IF (Clk'event AND Clk='1') THEN
         IF Load='0' THEN imper1:="0110"; imper0:="0000";
         ELSIF Ena='1' THEN
            IF (imper0="1001" AND imper1="0101")THEN
               imper0 :="1000";
            ELSIF imper0 >"0000" THEN imper0 := imper0-1;
            ELSE imper0:="1001";
                  IF  imper1 >"0000" THEN imper1 := imper1-1;
                  ELSE imper1:="0101";
                  END IF;
            END IF;
         END IF;
      END IF;
   END IF;
Q0 <= imper0; Q1 <= imper1;
Ring <= not(imper0(0) or imper0(1) or imper0(2) or imper0(3) or imper1(0) or imper1(1) or imper1(2) or imper1(3));
END PROCESS ;
END arc;

上面是我的倒數60秒程式
小弟不才
不知道怎寫停止
只要數1次60就好

作者: spring69393 時間: 2008-11-27 09:37 PM
如果單純計數的話，宣告成整數型式比較好。 signal timer : integer range ;
要六十秒數一次的話，簡單點就 if timer = 0 then timer <= 0; 就好了，
除非你有什用途，不然就這樣就好了。

作者: hope1014 時間: 2008-11-28 05:05 PM
我是使用QuartusII
跑一次的宣告是要放哪一行...?
還有一個問題想請教
就是counter_backwards60_seg2是我的分鐘
counter_backwards60_seg是我的秒
現在就是秒那邊 10→9秒的時候Co也會進位
秒的個位數有延遲所以導致10→9秒的Co會進位
程式分跟秒是依樣的 (Ring就是Co)
另外分鐘怎從60開始
因為現在我是00:00開始倒數
我需要在counter_backwards60_seg2改哪邊?

我奇摩即時通:xt_9000
希望有好心人幫幫忙
懵懂無知的大學生

作者: spring69393 時間: 2008-11-30 01:13 AM
剛學程式時寫的計數器，不過是上數的，基本上跟你要的下數差不多，只是反過來而已，
看有沒有用可以參考一下。

作者: hope1014 時間: 2008-12-5 05:10 PM
感謝大大的回答
我想問說
怎從"60"開始倒數?
60→59→58→57....→00
因為我弄出來都是
00→59→58→57....→00

希望有高手解一下疑惑

作者: spring69393 時間: 2008-12-6 03:06 AM
初始值要給六十呀，也就是rst 的地方不要給他00 ，給他60。

不過時鐘的話應該是給59才對，沒有從60在數回來的。

作者: hope1014 時間: 2008-12-6 08:22 PM
沒有啦
因為我要做60分鐘倒數
所以要60:00 →59:59→59:58
我現在是00:00→59:59 @@"

作者: spring69393 時間: 2008-12-7 03:58 PM
if reset<='0' then
timer<=(others=>'0'); <<< 改這 60 00

作者: hope1014 時間: 2008-12-7 07:00 PM
我沒有設定res啊@@"
我是用Quartus II 電路圖接法
60:00(現在是00:00) →59:59→59:58

IF Clrn='0' 或者 IF Load='0' 就停止動作了啊@@
小弟比較笨拙~"~

作者: hope1014 時間: 2008-12-8 01:00 AM
LIBRARY ieee;
USE ieee.std_logic_1164.all;
USE ieee.std_logic_unsigned.all;
ENTITY counter_backwards60_seg2 IS
PORT(Clk : IN  STD_LOGIC;
   Q0,Q1       : OUT STD_LOGIC_VECTOR(3 downto 0)) ;
END counter_backwards60_seg2;
ARCHITECTURE arc OF counter_backwards60_seg2 IS
BEGIN
  PROCESS (Clk)
   VARIABLE imper0 :STD_LOGIC_VECTOR(3 downto 0);
   VARIABLE imper1 :STD_LOGIC_VECTOR(3 downto 0);
  BEGIN

   IF (Clk'event AND Clk='1') THEN

            IF imper0 >"0000" THEN imper0 := imper0-1;
            ELSE imper0:="1001";
            IF  imper1 >"0000" THEN imper1 := imper1-1;
            ELSE imper1:="0101";
                  END IF;
            END IF;
         END IF;
   Q0 <= imper0; Q1 <= imper1;
END PROCESS ;
END arc;
以上我精簡了一些也能跑模擬圖
但現在重點是我該怎寫60→59→58...
初始值60要怎寫...
是要多2個input 然後給他一開始的值?
但要怎寫啊@@...

作者: hope1014 時間: 2008-12-8 09:32 PM
以上問題已經解決@@"
但請問我需要一個另外程式
去控制暫停開始和暫停
LIBRARY ieee;
USE ieee.std_logic_1164.all;
USE ieee.std_logic_unsigned.all;
ENTITY debounce_v IS
PORT(CLK,PB : IN  STD_LOGIC;
   PULSE : OUT  STD_LOGIC
);
END debounce_v;
ARCHITECTURE arc OF debounce_v IS
SIGNAL imper : STD_LOGIC;
BEGIN
  PROCESS (CLK)
   VARIABLE counter : integer range 0 to 49;
  BEGIN
IF (CLK'event AND CLK='1') THEN
   IF counter = "1" and (PB = '1') THEN imper <= '1';
   ELSE counter := counter-1; imper <= '0';
   END IF;
END IF;
   PULSE <= imper;
END PROCESS ;
END arc;

這是按一次減一次
想要按一下開始按一下暫停

ps.轉自全華圖書

作者: spring69393 時間: 2008-12-9 09:39 AM
Quartus II 電路圖接法我不會也，程式寫法就懂。

你就建一個按鍵跟上面的一樣，只是還要做一個暫存器，=0 就跑，= 1就停。

作者: hope1014 時間: 2008-12-11 08:38 PM
@@"
有需要暫存器??
那是震盪器→先接到開關→接到暫存器→計數器
這是樣嗎?

作者: hope1014 時間: 2008-12-12 10:23 PM
PROCESS (CLK)
   VARIABLE counter : integer range 0 to 49;
  BEGIN
IF (CLK'event AND CLK='1') THEN
      IF counter = "1" and (PB = '1') THEN imper <= '1';
   ELSE counter := counter-1; imper <= '0';
   END IF;
能幫我解釋一下這幾行是什麼意思嗎?

作者: spring69393 時間: 2008-12-14 09:56 PM
PROCESS (CLK) -- 有些書翻成敏感列，如果clk 的狀態有改變的話就重做以下動作
   VARIABLE counter : integer range 0 to 49;  -- 把counter設成 0 到49 的整數
  BEGIN
IF (CLK'event AND CLK='1') THEN  -- 如果clk 正緣觸發
      IF counter = "1" and (PB = '1') THEN imper <= '1';
            -- 如果counter = "1" 和 (PB = '1')就把  imper設為1

   ELSE counter := counter-1; imper <= '0'; --不然的話counter := counter-1; imper 為0
   END IF;

作者: hope1014 時間: 2008-12-18 07:44 PM
spring69393 大大感謝您

按鍵開關第一次 on時，開始計時。
第二次 on時，停止計時。
第三次 on時，開始計時。

這有哪位大大能幫忙@@

作者: spring69393 時間: 2008-12-21 12:53 PM
你就判斷暫存器是高電位還低電位不就好了，一個計數一個停止呀，不是很簡單嗎@"@

作者: hope1014 時間: 2008-12-22 09:21 PM
是移位暫存器嗎?
平行輸入 / 平行輸出
平行輸入 / 串列輸出
串列輸入 / 平行輸出
串列輸入 / 串列輸出
哪一個啊@@...
我都是看書自己學
所以都不會咩
拜託幫幫忙

作者: hope1014 時間: 2008-12-24 08:18 PM
真的有要用到暫存器?!
今天問老師
可是老師沒說到暫存器的東西
反而是說
IF CLK'event AND CLK='1
counter := counter + 1 ;

抓counter (0) ----第一個腳位?!
給counter位元多一點之類的

00 01 10 11
最後腳位為0 ----Run
最後腳位為1 ----Stop

可是要怎弄勒@@

作者: spring69393 時間: 2008-12-25 08:12 PM
你說的是自動變速，跟你的要求的開關功能根本不一樣。
至於怎麼做我也不知怎樣跟你說，給你程式你又看不懂，
跟你說原理你又不去想，要用你懂的畫圖的我又不會，
難解了！

作者: ssejack1 時間: 2008-12-26 09:37 AM
Key function
按鍵開關第一次 on時，開始計時。
第二次 on時，停止計時。
第三次 on時，開始計時。
未 synthesis,請自行 debug........

LIBRARY ieee;
USE ieee.std_logic_1164.all;
USE ieee.std_logic_unsigned.all;
ENTITY KeyFunction IS
      PORT(CLK,
               PB,
               RSTn       : IN  STD_LOGIC;
               START_COUNT,
               PAUSE
                       : OUT  STD_LOGIC
            );
END KeyFunction;
ARCHITECTURE arc OF debounce_v IS
SIGNAL  currently_state : STD_LOGIC_VECTOR(2 downto 0);
signal    pb_reg,debounce_counting,debounce_end : std_logic;
signal debounce_counter : STD_LOGIC_VECTOR(15 downto 0);

constant  debounce_time : STD_LOGIC_VECTOR(15 downto 0):= "0000000000000000";
BEGIN

--============================================================
-- get key push state. ( active high)
--============================================================
  PROCESS (CLK,RSTn,PB,pb_reg,debounce_counting,debounce_end)
BEGIN
if( RSTn = '0') then
         pb_reg <= 1;
elsif( CLK 'event and CLK ='1')then
      if( PB='1' and pb_reg ='0')then
           debounce_counting <= '1';
      elsif( debounce_end = '1')then
        debounce_counting <= '0';
      else
        debounce_counting <= debounce_counting;
      end if;
      pb_reg <= PB;
end if;

作者: ssejack1 時間: 2008-12-26 09:38 AM
--============================================================
-- key debounce timer
--============================================================
  PROCESS (CLK,RSTn,PB,pb_reg,debounce_counting,debounce_end)
BEGIN
if( RSTn = '0') then
      debounce_end <= '0';
         debounce_counter <= debounce_time;
elsif( CLK 'event and CLK ='1')then
      if( debounce_counting  ='1')then
        if( debounce_count = "1111111111111111")then
        debounce_end <= '1';
        debounce_counter <= debounce_time;
        else
        debounce_end <= '0';
           debounce_count = debounce_count+1 ;
           end if;
      end if;
end if;

--============================================================
-- key function control
-- PAUSE -(key push)-> START_COUNT -(key push)-> PAUSE -(key push)-> START_COUNT
--============================================================
  PROCESS (CLK,RSTn,pb_reg,debounce_end)
BEGIN
if( RSTn = '0') then
      currently_state <= "10"; -- pause
elsif( CLK 'event and CLK ='1')then
      if( debounce_end  ='1' and pb_reg ='1')then
        currently_state <= currently_state(0)& currently_state(1);
      end if;
end if;
               START_COUNT <= currently_state(0);
               PAUSE <= currently_state(1);

END PROCESS ;
END arc;

歡迎光臨 Chip123 科技應用創新平台 (http://www.chip123.com.tw/)