35 lines
1.1 KiB
Plaintext
35 lines
1.1 KiB
Plaintext
|
-------------------------------------------------------------------
|
||
|
|
ENTITY BrightnessPalette IS
|
||
|
|
PORT( D : IN std_logic_vector(3 downto 0);
|
||
|
|
Q : OUT std_logic_vector(7 downto 0)
|
||
|
|
);
|
||
|
|
end BrightnessPalette;
|
||
|
|
-------------------------------------------------------------------
|
||
|
|
|
||
|
|
-------------------------------------------------------------------
|
||
|
|
Architecture RTL OF BrightnessPalette IS
|
||
|
|
Begin
|
||
|
|
Process(D)
|
||
|
|
Begin
|
||
|
|
Case D Is
|
||
|
|
when X"0" => Q <= X"00";
|
||
|
|
when X"1" => Q <= X"01";
|
||
|
|
when X"2" => Q <= X"02";
|
||
|
|
when X"3" => Q <= X"03";
|
||
|
|
when X"4" => Q <= X"04";
|
||
|
|
when X"5" => Q <= X"05";
|
||
|
|
when X"6" => Q <= X"07";
|
||
|
|
when X"7" => Q <= X"09";
|
||
|
|
when X"8" => Q <= X"0E";
|
||
|
|
when X"9" => Q <= X"16";
|
||
|
|
when X"A" => Q <= X"21";
|
||
|
|
when X"B" => Q <= X"32";
|
||
|
|
when X"C" => Q <= X"4B";
|
||
|
|
when X"D" => Q <= X"71";
|
||
|
|
when X"E" => Q <= X"AA";
|
||
|
|
when others => Q <= X"FF";
|
||
|
|
End Case;
|
||
|
|
End Process;
|
||
|
|
End RTL;
|
||
|
|
-------------------------------------------------------------------
|