Segment_Decoder_Module.vhd

----------------------------------------------------------------------------------
-- Company: 		EasyTrom Labs	
-- Engineer: 		Eduardo Avelar	
-- Create Date:   14:29:45 04/12/2017 
-- Design Name: 	Leitura de Encoder e Display
-- Module Name:   Segment_Decoder_Module - Behavioral 
----------------------------------------------------------------------------------
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;

entity Segment_Decoder_Module is
    Port ( Digit : in  STD_LOGIC_VECTOR (3 downto 0);
           segment_A : out  STD_LOGIC;
           segment_B : out  STD_LOGIC;
           segment_C : out  STD_LOGIC;
           segment_D : out  STD_LOGIC;
           segment_E : out  STD_LOGIC;
           segment_F : out  STD_LOGIC;
           segment_G : out  STD_LOGIC);
end Segment_Decoder_Module;

architecture Behavioral of Segment_Decoder_Module is

begin
process(Digit)
	
	-- Variável para salvar todos os sinais decodificados
	variable Decode_Data : std_logic_vector(6 downto 0);
			
	begin
	-- Case que depende dos 4 bits de entrada
		case Digit is					-- a,b,c,d,e,f,g --
			when "0000" => Decode_Data := "1111110"; --0
			when "0001" => Decode_Data := "0110000"; --1
			when "0010" => Decode_Data := "1101101"; --2
			when "0011" => Decode_Data := "1111001"; --3
			when "0100" => Decode_Data := "0110011"; --4
			when "0101" => Decode_Data := "1011011"; --5
			when "0110" => Decode_Data := "1011111"; --6
			when "0111" => Decode_Data := "1110000"; --7
			when "1000" => Decode_Data := "1111111"; --8
			when "1001" => Decode_Data := "1111011"; --9
			when "1010" => Decode_Data := "1110111"; --A
			when "1011" => Decode_Data := "0011111"; --B
			when "1100" => Decode_Data := "1001110"; --C
			when "1101" => Decode_Data := "0111101"; --D
			when "1110" => Decode_Data := "1001111"; --E
			when "1111" => Decode_Data := "1000111"; --F
			when others => Decode_Data := "0111110"; --Erro H
		end case;
			
		-- Atribui cada resultado ao seguimento do display
		-- A diretiva NOT é devido ao display ser ativo em 0
		segment_A <= not Decode_Data(6);
		segment_B <= not Decode_Data(5);
		segment_C <= not Decode_Data(4);
		segment_D <= not Decode_Data(3);
		segment_E <= not Decode_Data(2);
		segment_F <= not Decode_Data(1);
		segment_G <= not Decode_Data(0);
	end process;
	
end Behavioral;