7段顯示器用when else 寫法

gto10620

剛學FPGA/CPLD 現在學VHDL寫出7段顯示器。
$ v6 \; T5 h' F- g5 [entity sedg7 is
    Port ( S : in  STD_LOGIC_VECTOR (3 downto 0);
           Y : out  STD_LOGIC_VECTOR (7 downto 0);
           a,b,c,d,e,f,g,p : out  STD_LOGIC);
1 Y/ {8 r: q! r- z+ A7 d+ H/ N9 cend sedg7;

; e9 t) }  I4 J5 K9 k/ Varchitecture Behavioral of sedg7 is

' R6 c; E" P( g7 x% U" Z( G" v- Ibegin
        Y<=        "00000011" when S= "0000" else               
                        "10011111" when S= "0001" else       
2 q9 x$ z- }5 ^( r                        "00100101" when S= "0010" else       
* c2 Y7 Z  A# _+ m                        "00001101" when S= "0011" else       
                        "10011001" when S= "0100" else       
, z& z  W4 O8 b7 E' e5 F                        "01001001" when S= "0101" else       
' B* J9 R6 s& G7 d4 I9 [* M) y                        "01000001" when S= "0110" else       
$ G: {- k3 R5 x; a" e                        "00011011" when S= "0111" else       
                        "00000001" when S= "1000" else       
! P, W6 a4 V* e8 A, D                        "00001001" when S= "1001" else         
2 q3 W/ K: y+ n5 K$ P                        "00010001" when S= "1010" else       
  j4 n( `5 J2 ~  J! n5 d                        "11000001" when S= "1011" else       
* m+ p; ?! T4 ]; [                        "01100011" when S= "1100" else       
                        "10000101" when S= "1101" else       
                        "01100001" when S= "1110" else       
                        "01110001" when others ;   
5 f  P, A4 o+ Q" B9 A                       
- d# M8 [6 r1 [5 Z6 D2 ~* u+ f                        a:= Y(7);
                        b:= Y(6);
                        c:= Y(5);
7 G# J4 P% G  n, h9 D                        d:= Y(4);
4 B; h( Q6 t% L0 f# G7 e                        e:= Y(3);
6 m/ J+ W  `8 N/ q0 b+ S! w1 n                        f:= Y(2);
3 M% k0 s  h# {( O* i                        g:= Y(1);
, f; Z/ f2 p! B5 t* s- F                        p:= Y(0);
                SEL0<= '0';
8 _; E) V; i$ \* s( i9 |end Behavioral;
+ T; H* U6 T3 ?4 _& j3 Y; n
' |9 N$ K# C+ d) y0 ?! k0 t1 {7 S8 |, PERROR:HDLParsers:164 - "D:/ypj2008/4e2afpga/sedg7/sedg7.vhd" Line 54. parse error, unexpected OTHERS
ERROR:HDLParsers:3312 - "D:/ypj2008/4e2afpga/sedg7/sedg7.vhd" Line 64. Undefined symbol 'SEL0'.
一直錯誤~"~ 實在搞不懂... 誰可以幫幫我呢? 感謝~

gto10620

感謝囉!!後來我改成這樣
entity sedg7 is
    Port ( Enable : in  STD_LOGIC;
           X : in  STD_LOGIC_VECTOR (3 downto 0);
                          a,b,c,d,e,f,g,p : out STD_LOGIC;
                          SEL : OUT   STD_LOGIC_VECTOR (5 DOWNTO 0));
                          
2 B+ k5 ]& H$ s2 E1 L. }                          

end sedg7;

architecture Behavioral of sedg7 is
SIGNAL Y :  STD_LOGIC_VECTOR (7 downto 0);
6 F9 |4 |' c5 [: E0 bbegin
) Q0 o; X2 H% t: Q# L3 o. l                Y<=                "11111111" WHEN Enable= '1' ELSE
6 V" g9 {7 r7 u( |0 V2 w: k  m                                        "00000011" WHEN X="0000" ELSE
! [1 J2 J" k9 l  _* z2 Y$ E% A                                        "10011111" WHEN X="0001" ELSE
                                        "00100101" WHEN X="0010" ELSE
( ~# N, ^1 b6 Z! u7 S+ {1 g                                        "00001101" WHEN X="0011" ELSE
  r  _& f1 L! O' ^( x                                        "10011001" WHEN X="0100" ELSE
$ o4 a- ~8 }& Z- i7 v                                        "01001001" WHEN X="0101" ELSE
                                        "01000001" WHEN X="0110" ELSE
                                        "00011011" WHEN X="0111" ELSE
, m0 \1 F& v4 T                                        "00000001" WHEN X="1000" ELSE
                                        "00001001" WHEN X="1001" ELSE
                                        "00010001" WHEN X="1010" ELSE
! y7 u: B# z/ ?% A! z5 [                                        "11000001" WHEN X="1011" ELSE
/ d$ i0 D% c! J% V8 L2 X                                        "01100011" WHEN X="1100" ELSE
: a- p+ p) h9 J: G                                        "10000101" WHEN X="1101" ELSE
                                        "01100001" WHEN X="1110" ELSE
7 P, o- z# t2 |0 `3 m0 u                                        "01110001" ;
+ d6 H" k( {  [& ^        a<= Y(7);
0 X# `$ k4 @" {6 {( `7 e6 p        b<= Y(6);
" M9 d4 B; l7 Z( ~( D: H4 B        c<= Y(5);
        d<= Y(4);
+ Z) y  l. ?4 O% _% o: r        e<= Y(3);
        f<= Y(2);
* p4 ]; [: O' G& E) P) ?! Z        g<= Y(1);
" g& F+ v$ Y( B        p<= Y(0);
        SEL<= "111110" ;
end Behavioral;