請高手幫忙看一下

jlhl1170

20位元BIN轉BCD的程式
LIBRARY IEEE;
. v" g% \) X4 muse IEEE.std_logic_1164.all;
) v& z7 L# M/ Y
5 R/ M' a% ?: f, b3 M/ h$ k+ @entity bin2bcd is
* {  _7 b" l- P) kport(
  data_in : in std_logic_vector(19 downto 0);
; ~6 `6 V1 n# N, d5 I: s  EN : in std_logic;
  data_out : out std_logic_vector(23 downto 0)
  z( k+ j' {. }$ `);
# o3 R( Q5 l0 W" u4 X) Xend entity;
0 Y9 r* |0 J- ~' w% c8 Y

architecture bin2bcd of bin2bcd is
begin

process(data_in, EN)
2 O# D# y+ A! N) t  }& i9 Ivariable data_in_TEMP : std_logic_vector(2 downto 0);
begin
( t/ B3 a2 y0 ]2 M! u. I  data_in_TEMP := data_in(19 downto 1);
8 l! y, g) G: }4 e2 p- U4 H, }  data_out  '0');
  if EN='1' then
   case data_in_TEMP is
: J3 w0 V/ v% O' ^- v1 o' B& p+ \    when "000" => data_out(23 downto 1)  data_out(23 downto 1)  data_out(23 downto 1)  data_out(23 downto 1)  data_out(23 downto 1)  data_out(23 downto 1)  data_out(23 downto 1)  data_out(23 downto 1)  data_out'0');
. m# u' L; x8 K6 j2 g   end case;

   data_out(0) <= data_in(0);
  end if;
end process;
& \: G2 p) G0 a& W4 Z4 h
end architecture;


3 }/ w  s0 z: \/ y# C3 TCHECK的時候第一行跟if EN='1' then這行出現錯誤
會是什麼問題??

johson

variable data_in_TEMP : std_logic_vector(2 downto 0); ~~資料寬度 3 bits
3 ?  u. L  J0 r* ?! L5 Cdata_in_TEMP := data_in(19 downto 1);~~資料寬度 19 bits ??
% c( ~! Q/ R. S+ t' t1 H7 Cdata_out  '0');~~????????目的為何????