реклама на сайте
подробности

 
 
> АНТИДРЕБЕЗГ (VHDL)
lyzifer
сообщение Jul 25 2017, 14:52
Сообщение #1


Участник
*

Группа: Участник
Сообщений: 24
Регистрация: 13-07-17
Пользователь №: 98 133



Возникла проблема.Есть устройство,на выходе которого 4 светодиода (led).Они поочерёдно загораются и тухнут с частотой 1Гц . К устройству подключена кнопка (btn). Когда она нажата, сигнал должен идти на светодиоды (как показано на диаграмме). Так вот, при нажатии возникает дребезг, диоды горят хаотично, при чём даже могут гореть, когда кнопка отпущена. Код вроде простой.но никак не могу правильно этот антидребезг добавить. Заранее благодарен.

ВЕРХНИЙ ФАЙЛ

Код
library ieee;
  use ieee.std_logic_1164.all;
  use ieee.numeric_std.all;

entity led_blink is
  port (
    clk : in  std_logic; -- синхросигнал
    btn : in  std_logic; --кнопка
    led : out std_logic_vector(3 downto 0) --выход на светодиоды
  );
end led_blink;

architecture rtl of led_blink is
  signal ONN_OFF : std_logic                    := '1';
  signal state   : std_logic_vector(3 downto 0) := "0001";
  signal divider : unsigned(23 downto 0)        := (others => '0'); --делитель частоты
begin
  main_p : process(clk)
  begin
    if (rising_edge(clk)) then
      if (divider < 5000000) then  ---если меньше 5 млн. тактов, то счётчик наращивает 1
        divider <= divider + 1;
      else
        divider <= (others => '0');--если больше,то счётчик сбрасывается в 0
        if (btn = '1') then --если нажата кнопка
          ONN_OFF <= not(ONN_OFF);--светодиоды загораются
          if (ONN_OFF = '1') then
            state <= state(2 downto 0) & state(3);
            led   <= state;
          else --если НЕ нажата
            led   <= (others => '0');--сигнал на выход светодиодов не идёт
          end if;
        else
          ONN_OFF <= '1';
          led     <= (others => '0');
        end if;
      end if;
    end if;
  end process;
end rtl;


АНТИДРЕБЕЗГ (КОРЯВЫЙ)

Код
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use IEEE.STD_LOGIC_ARITH.ALL;
use IEEE.STD_LOGIC_UNSIGNED.ALL;


entity Debouncer is
    Port ( clk : in  std_logic;
           btn : in  std_logic;
           led : out std_logic_vector(3 downto 0));
end Debouncer;


architecture Behavioral of Debouncer is
  signal led : std_logic_vector (3 downto 0);
  signal btn_cl : std_logic;
begin
  process (clk)
  begin
    if rising_edge(clk) then
      if clk /= btn_cl then
        btn_cl <= clk;
        led <= (others => '0');
      elsif led = "1111" then
        btn <= btn_cl;
      else
        led <= led + 1;
      end if;
    end if;
  end process;
end Behavioral;



Временная диаграмма работы устройства.
При загрузке в устройсво, кнопка конечно же без антидребега так идеально не работает (((

Go to the top of the page
 
+Quote Post
 
Start new topic
Ответов
Flip-fl0p
сообщение Jul 26 2017, 11:27
Сообщение #2


В поисках себя...
****

Группа: Свой
Сообщений: 729
Регистрация: 11-06-13
Из: Санкт-Петербург
Пользователь №: 77 140



Если вы посмотрите внимательно на антидребезг, то увидите, что он как-бы сигнал сдвигает на время, в течении которого у Вас фильтруется дребезг.
23 разряда на анти дребезг - это сильно. Посчитайте ради интереса, сколько у вас пройдет времени когда в 23 разряде счетчика появиться единичка. Скорее всего пройдет как раз 1 секунда, из-за чего у вас и происходит "паразитное" зажигание светодиода. Время дребезга существенно меньше, чем 1 секунда. Уменьшите время фильтрации и должно всё заработать.
Go to the top of the page
 
+Quote Post
gibson1980
сообщение Jul 26 2017, 16:19
Сообщение #3


Частый гость
**

Группа: Свой
Сообщений: 116
Регистрация: 13-12-12
Пользователь №: 74 831



А я просто использую заполнение нулями или единицами сдвигового регистра.

Код
signal reg_btn : std_logic_vector(7 downto 0) := x"00";
signal in_btn, out_btn : std_logic := '0';

reg_btn <= reg_btn(6 downto 0) & in_btn:

if (reg_btn = x"00") then
    out_btn <= '0';
elsif (reg_btn = x"FF") then
    out_btn <= '1';
end if;


--------------------
Go to the top of the page
 
+Quote Post
Tausinov
сообщение Jul 26 2017, 16:30
Сообщение #4


Частый гость
**

Группа: Участник
Сообщений: 135
Регистрация: 19-10-13
Пользователь №: 78 795



Цитата(gibson1980 @ Jul 26 2017, 19:19) *
А я просто использую заполнение нулями или единицами сдвигового регистра.


Обычно время фильтрации ~10 мс, а для 7-битного регистра даже на 100 МГц клоке это всего лишь 70 нс
Go to the top of the page
 
+Quote Post



Closed TopicStart new topic
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 


RSS Текстовая версия Сейчас: 24th June 2025 - 23:45
Рейтинг@Mail.ru


Страница сгенерированна за 0.01386 секунд с 7
ELECTRONIX ©2004-2016