7段顯示器用when else 寫法

gto10620

剛學FPGA/CPLD 現在學VHDL寫出7段顯示器。
% E1 T( A, W  p3 m/ Kentity sedg7 is
    Port ( S : in  STD_LOGIC_VECTOR (3 downto 0);
( b6 X% p5 t) ?           Y : out  STD_LOGIC_VECTOR (7 downto 0);
5 M) x  p1 M+ c" b% }           a,b,c,d,e,f,g,p : out  STD_LOGIC);
end sedg7;

1 N& P! v& U* z3 T, karchitecture Behavioral of sedg7 is

begin
        Y<=        "00000011" when S= "0000" else               
6 w* H6 S( z  g2 A$ e( _                        "10011111" when S= "0001" else       
8 E9 }) v* U& x( E2 Q" B  t8 r                        "00100101" when S= "0010" else       
7 P6 a, f' i2 S! C5 f, I$ B; R                        "00001101" when S= "0011" else       
                        "10011001" when S= "0100" else       
6 C( M: }! F+ J7 q                        "01001001" when S= "0101" else       
                        "01000001" when S= "0110" else       
, G" B+ W. {6 ~( y7 ?/ g5 [( z                        "00011011" when S= "0111" else       
; [+ }  E; {3 M) K/ n, R+ m                        "00000001" when S= "1000" else       
                        "00001001" when S= "1001" else         
* ~: }: {' d+ M% ]) e2 U( {3 f5 }9 P                        "00010001" when S= "1010" else       
                        "11000001" when S= "1011" else       
0 N) b) _, f! L7 K3 y                        "01100011" when S= "1100" else       
4 @% Q1 P$ E; E0 X6 }, w                        "10000101" when S= "1101" else       
5 o5 y. H+ W' P6 i& i/ V; e                        "01100001" when S= "1110" else       
                        "01110001" when others ;   
                       
5 l8 a. q( z4 g' ~2 l* u                        a:= Y(7);
5 Z' ^" L% x6 ]8 H                        b:= Y(6);
                        c:= Y(5);
                        d:= Y(4);
! W6 E1 r( B" }& k0 e8 P                        e:= Y(3);
                        f:= Y(2);
                        g:= Y(1);
                        p:= Y(0);
5 [9 ]$ f4 A7 Y. H7 d5 f                SEL0<= '0';
  u) A: `, s' `* h. y$ Z  Cend Behavioral;

, A; ^& l1 f1 a$ P6 T' zERROR:HDLParsers:164 - "D:/ypj2008/4e2afpga/sedg7/sedg7.vhd" Line 54. parse error, unexpected OTHERS
% O- P! `3 f& m) F; V+ RERROR:HDLParsers:3312 - "D:/ypj2008/4e2afpga/sedg7/sedg7.vhd" Line 64. Undefined symbol 'SEL0'.
一直錯誤~"~ 實在搞不懂... 誰可以幫幫我呢? 感謝~

addn

您好
! a/ e- ^. J, [* X+ d% y. g1.
9 n* R3 b( Z: F* e. @: x, a Y : out  STD_LOGIC_VECTOR (7 downto 0);
Y宣告為out 怎還可以指定給abcdefgp
- O/ I0 _+ [# r3 D' I, y" d; L: N. D
* N; ?7 {+ n; U2.
a,b,c,d,e,f,g,p不能用":="要改成"<="
% ]+ ~' W6 E0 ]/ S
" g% \5 u. C( E: z7 [: D% h7 J  L3.
SEL0沒宣告,怎會冒出SEL0<= '0';來呢
' w6 Q/ ]: r9 L, R1 V8 Z
[ 本帖最後由 addn 於 2008-5-8 09:30 AM 編輯 ]

airtiger

改成這樣就可以了
' Z7 [8 C5 u8 j2 W" |, G
( s# E6 [7 y# B$ Fentity segment_7 is
$ u- C5 P( c, G* Z% o    Port ( S : in  STD_LOGIC_VECTOR (3 downto 0);
( H4 c9 `. e" u4 y; @. I           Y : out  STD_LOGIC_VECTOR (7 downto 0));
. l! V% m& V- i& d  m( v, bend segment_7;

architecture Behavioral of segment_7 is
" R' ^" O! i0 K
begin
3 o) L1 n. n, J9 e% Z        Y<=        "00000011" when S= "0000" else               
3 y- F1 G% ^8 ]7 j                        "10011111" when S= "0001" else        
                        "00100101" when S= "0010" else        
                        "00001101" when S= "0011" else        
6 \! o' Z0 K8 `8 x2 h                        "10011001" when S= "0100" else        
# G; q" _1 w0 r                        "01001001" when S= "0101" else        
                        "01000001" when S= "0110" else        
                        "00011011" when S= "0111" else        
                        "00000001" when S= "1000" else        
: P* ]' `; k* v/ `3 c) m6 u$ n                        "00001001" when S= "1001" else         
3 G( x4 [9 m9 `+ ~                        "00010001" when S= "1010" else        
                        "11000001" when S= "1011" else        
* s6 \  y4 B' M2 L. m9 Z7 Q                        "01100011" when S= "1100" else        
                        "10000101" when S= "1101" else        
2 j' X8 u* R# v/ f: D! U' q. D+ x                        "01100001" when S= "1110" else        
                        "01110001";   
# e- q; _" W% R5 T1 f" L9 ~4 o                        
& t' B9 n- o6 ], c6 N. Yend Behavioral;

gto10620

感謝囉!!後來我改成這樣
2 v6 I; h5 y, D, ^entity sedg7 is
$ t5 `: }# [$ s$ \0 w. `    Port ( Enable : in  STD_LOGIC;
( @: Z: b. x4 \/ X. p8 [           X : in  STD_LOGIC_VECTOR (3 downto 0);
                          a,b,c,d,e,f,g,p : out STD_LOGIC;
/ S$ j( j% J5 J  S                          SEL : OUT   STD_LOGIC_VECTOR (5 DOWNTO 0));
                          
                          

end sedg7;

architecture Behavioral of sedg7 is
* z, \* z8 z/ `SIGNAL Y :  STD_LOGIC_VECTOR (7 downto 0);
begin
                Y<=                "11111111" WHEN Enable= '1' ELSE
3 p0 l# L. @0 \( i6 @4 A, ^  o                                        "00000011" WHEN X="0000" ELSE
7 V8 c% K" c, G3 I" L                                        "10011111" WHEN X="0001" ELSE
9 w* l1 `) A; {$ P: O7 i                                        "00100101" WHEN X="0010" ELSE
                                        "00001101" WHEN X="0011" ELSE
                                        "10011001" WHEN X="0100" ELSE
8 w  \& g7 ^8 @8 k, O                                        "01001001" WHEN X="0101" ELSE
( N8 f2 ^! Q4 Q, U" ]                                        "01000001" WHEN X="0110" ELSE
                                        "00011011" WHEN X="0111" ELSE
) A' |0 |* y4 n/ C                                        "00000001" WHEN X="1000" ELSE
                                        "00001001" WHEN X="1001" ELSE
& e- f/ Y* H3 K6 _# z8 a% u4 e/ x                                        "00010001" WHEN X="1010" ELSE
                                        "11000001" WHEN X="1011" ELSE
/ r7 M9 X: m, `% F3 T  h7 M                                        "01100011" WHEN X="1100" ELSE
" i! M5 M- n8 D' g1 F0 r                                        "10000101" WHEN X="1101" ELSE
                                        "01100001" WHEN X="1110" ELSE
8 d( m8 Z+ y" h4 C+ x' C3 p$ Y                                        "01110001" ;
! ~5 U! M* O: x3 e7 _  c        a<= Y(7);
        b<= Y(6);
: f# T! R" X, z9 P) b0 D. \: j        c<= Y(5);
        d<= Y(4);
5 j! [% }; V# x; R0 I0 h        e<= Y(3);
        f<= Y(2);
* }+ b( j  f7 n, ?' T        g<= Y(1);
! J& x1 j& q; G  W5 q) @: g% k        p<= Y(0);
        SEL<= "111110" ;
* @: Y! y) @  ?2 O$ S  aend Behavioral;