Case-Anweisung VHDL Problem

[Max K. (mku)]

Ich habe ein kleines problem mit einem kleinen programm ,was ich 
schreibe.

ich möchte einfach eine LED mittels tasten immer nach rechts oder links 
verschieben.

Dabei wollte ich nun die Case-Anweisung in Quartus benutzen, bekomme 
aber immer die Fehlermeldung "Error (10313): VHDL Case Statement error 
at led_bewegung.vhd(137): Case Statement choices must cover all possible 
values of expression"

woran kann das liegen?

so sieht der Code aus:

-- LED bewegung durch Tasten

library ieee;
use ieee.std_logic_1164.all;
use ieee.numeric_std.all;
use ieee.std_logic_arith.all;

entity bewegung_led is

  port
  (
    clk50                : in std_logic;
    reset                : in std_logic;
    ausgangszustand_in      : in std_logic;
    led_in              : in std_logic_vector(7 downto 0);
    taste_rechts_in        : in std_logic;
    taste_rechts_preller_in    : in std_logic;
    taste_rechts_entprellt_in  : in std_logic;
    taste_links_in          : in std_logic;
    taste_links_preller_in    : in std_logic;
    taste_links_entprellt_in  : in std_logic;
    
    led_out              : out std_logic_vector(7 downto 0);
--    led0                : out std_logic;  -- low oder high
--    led1                : out std_logic;
--    led2                : out std_logic;
--    led3                : out std_logic;
--    led4                : out std_logic;
--    led5                : out std_logic;
--    led6                : out std_logic;
--    led7                : out std_logic;
    taste_links_preller_out    : out std_logic;
    taste_links_entprellt_out  : out std_logic;
    taste_rechts_preller_out  : out std_logic;
    taste_rechts_entprellt_out  : out std_logic;
    ausgangszustand_out      : out  std_logic
  );

end entity;

architecture rtl of bewegung_led is
begin

  process (clk50, reset)
    variable   cnt  : integer;
  begin
---------------------------------------------------------------  
                        -- reset
    if reset = '0' then
      cnt             := 0;
      led_out          <= "00000000";
--      led0            <= '0';
--      led1            <= '0';
--      led2            <= '0';
--      led3            <= '0';
--      led4            <= '0';
--      led5            <= '0';
--      led6            <= '0';
--      led7            <= '0';
      ausgangszustand_out  <= '0';
---------------------------------------------------------------          
    elsif (rising_edge(clk50)) then
    
      if ausgangszustand_in = '0' then
        led_out           <= "00001000";
        cnt             := 4;
--        led0             <= '1';
--        led1             <= '1';
--        led2             <= '1';
--        led3             <= '0';
--        led4             <= '1';
--        led5             <= '1';
--        led6             <= '1';
--        led7             <= '1';
        ausgangszustand_out   <= '1';
      end if;
--------------------------------------------------------------  
      if taste_rechts_in = '0' then
        if taste_rechts_preller_in = '0' then
          taste_rechts_entprellt_out <= '1';
          taste_rechts_preller_out <= '1';
        end if;
      end if;
      
      if taste_rechts_in = '1' then
        taste_rechts_preller_out <= '0';
      end if;
      --------------------------------
      if taste_links_in = '0' then
        if taste_links_preller_in = '0' then
          taste_links_entprellt_out <= '1';
          taste_links_preller_out <= '1';
        end if;
      end if;
      
      if taste_links_in = '1' then
        taste_links_preller_out <= '0';
      end if;
--------------------------------------------------------------    
      if taste_rechts_entprellt_in = '1' then
        if cnt >= 0 then
          cnt := cnt -1;
        end if;

--          case led_in is
--          when "00000001" => led_out  <= "11111110";
--          when "00000010" => led_out <= "00000001";
--          when "00000100" => led_out <= "00000010";
--          when "00001000" => led_out <= "00000100";
--          when "00010000" => led_out <= "00001000";
--          when "00100000" => led_out <= "00010000";
--          when "01000000" => led_out <= "00100000";
--          when "10000000" => led_out <= "01000000";
--          when "01111111" => led_out <= "10000000";
--        end case;
      end if;
      
      if taste_links_entprellt_in = '1' then
        if cnt < 10 then
          cnt := cnt +1;
        end if;
        
        
--        case led_in is
--          when "00000001" => led_out <= "00000010";
--          when "00000010" => led_out <= "00000100";
--          when "00000100" => led_out <= "00001000";
--          when "00001000" => led_out <= "00010000";
--          when "00010000" => led_out <= "00100000";
--          when "00100000" => led_out <= "01000000";
--          when "01000000" => led_out <= "10000000";
--          when "10000000" => led_out <= "01111111";
--        end case;
      end if;
      
      
          case cnt is
          when 0 => led_out  <= "11111110";
          when 1 => led_out <= "00000001";
          when 2 => led_out <= "00000010";
          when 3 => led_out <= "00000100";
          when 4 => led_out <= "00001000";
          when 5 => led_out <= "00010000";
          when 6 => led_out <= "00100000";
          when 7 => led_out <= "01000000";
          when 8 => led_out <= "10000000";
          when 9 => led_out <= "01111111";
        end case;
      
----------------------------------------------------    
        if taste_rechts_preller_in <= '1' then
          taste_rechts_entprellt_out <= '0';
        end if;
        
        if taste_links_preller_in <= '1' then
          taste_links_entprellt_out <= '0';
        end if;
---------------------------------------------------
    
    end if; -- elsif
  end process;

end rtl;

[Philip K. (philip_k)]

Da fehlt ein "When others => led_out <= "?";"

[Max K. (mku)]

ok, aber im netz finde ich oft beispiele ohne dem "when others" z.b.

Example 1

P1:process
variable x: Integer range 1 to 3;
variable y: BIT_VECTOR (0 to 1);
begin
  C1: case x is
      when 1 => Out_1 <= 0;
      when 2 => Out_1 <= 1;
      when 3 => Out_1 <= 2;
  end case C1;
  C2: case y is
      when "00" => Out_2 <= 0;
      when "01" => Out_2 <= 1;
      when "10" => Out_2 <= 2;
      when "11" => Out_2 <= 3;
  end case C2;
end process;

wenn ich jetzt z.b. schreibe

          when others => led_out "11111111";

Auch wenn das nie eintreffen wird, dann meckert er, das er ein ' oder ( 
oder . erwartet. ich weiß aber nicht, wo da z.B. eine Klammer hin 
gehören soll.

[Bitflüsterer (Gast)]

>ok, aber im netz finde ich oft beispiele ohne dem "when others" z.b.
Richtig. Denn Dein Beispiel zeigt gerade den Fall, das mit den cases 
alle möglichen Fälle ausdrüklich abgedeckt werden.

x kann Werte von 1 bis 3 annehmen. Für jeden dieser Werte gibt es ein 
when.
y kann Werte von 00 bis 11 annehmen. Für jeden dieser Werte gibt es ein 
when.


Da

when others => led_out "11111111";

fehlt ein "<="

when others => led_out <= "11111111";

[Lothar M. (Firma: Titel) (lkmiller) (Moderator)]

Max K. schrieb:
> use ieee.numeric_std.all;
> use ieee.std_logic_arith.all;
Hach...
Dazu den Beitrag "IEEE.STD_LOGIC_ARITH.ALL obsolete"

> (10313): VHDL Case Statement error at led_bewegung.vhd(137): Case
> Statement choices must cover all possible values of expression"
> woran kann das liegen?
Wo ist denn die Zeile 137?

> variable   cnt  : integer;
Verwende keine uneingeschränkten Integer.
Und das erste halbe Jahr deiner VHDL-Karriere auch keine Variablen!
Wenn du sowieso einen getakteten Prozess hast, ist eine Variable evtl. 
mit äussst unangenehmen Effekten verbunden. Siehe den Klassiker 
Beitrag "Variable vs Signal"