mirror of
https://github.com/myhdl/myhdl.git
synced 2024-12-14 07:44:38 +08:00
36 lines
660 B
VHDL
36 lines
660 B
VHDL
|
-- File: bin2gray.vhd
|
||
|
-- Generated by MyHDL 0.6dev10
|
||
|
-- Date: Sat Nov 22 22:39:37 2008
|
||
|
|
||
|
library IEEE;
|
||
|
use IEEE.std_logic_1164.all;
|
||
|
use IEEE.numeric_std.all;
|
||
|
use std.textio.all;
|
||
|
|
||
|
use work.pck_myhdl_06dev10.all;
|
||
|
|
||
|
entity bin2gray is
|
||
|
port (
|
||
|
B: in unsigned(7 downto 0);
|
||
|
G: out unsigned(7 downto 0)
|
||
|
);
|
||
|
end entity bin2gray;
|
||
|
|
||
|
architecture MyHDL of bin2gray is
|
||
|
|
||
|
|
||
|
begin
|
||
|
|
||
|
|
||
|
BIN2GRAY_LOGIC: process (B) is
|
||
|
variable Bext: unsigned(8 downto 0);
|
||
|
begin
|
||
|
Bext := to_unsigned(0, 9);
|
||
|
Bext := resize(B, 9);
|
||
|
for i in 0 to 8-1 loop
|
||
|
G(i) <= (Bext((i + 1)) xor Bext(i));
|
||
|
end loop;
|
||
|
end process BIN2GRAY_LOGIC;
|
||
|
|
||
|
end architecture MyHDL;
|