blob: fa6fdea833ed91205e7d58846732843e5c5ae03e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use IEEE.STD_LOGIC_UNSIGNED.ALL;
use IEEE.NUMERIC_STD.ALL;
entity bin2bcd is
port (
A: in std_logic_vector(4 downto 0);
X: out std_logic_vector(3 downto 0);
Y: out std_logic_vector(3 downto 0));
end bin2bcd;
architecture Behavioral of bin2bcd is
signal X_tmp: unsigned(3 downto 0);
signal Y_tmp: unsigned(3 downto 0);
begin
X_tmp <= (unsigned(A(X_tmp'range)) / 10);
Y_tmp <= (unsigned(A(Y_tmp'range)) mod 10);
X <= std_logic_vector(X_tmp);
Y <= std_logic_vector(Y_tmp);
end Behavioral;
|