7段顯示器用when else 寫法

gto10620

剛學FPGA/CPLD 現在學VHDL寫出7段顯示器。
/ d1 r% l) z+ Mentity sedg7 is
5 D- Y, [4 O  [/ }7 y    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);
, a8 N$ p1 F2 P; L& a4 Dend sedg7;
6 N# u  E7 g' S% T' b
- n5 p$ E. f9 I; w/ }- Warchitecture Behavioral of sedg7 is
% Z6 D& o& k: w4 m  ?
' k) K9 o% C: g- b: tbegin
        Y<=        "00000011" when S= "0000" else               
                        "10011111" when S= "0001" else       
                        "00100101" when S= "0010" else       
                        "00001101" when S= "0011" else       
0 I( l3 S5 B; @  e6 @9 [$ W                        "10011001" when S= "0100" else       
                        "01001001" when S= "0101" else       
8 N5 Y1 X" L8 f# ?/ `) ~8 ]) S, l                        "01000001" when S= "0110" else       
8 E7 ]( N+ Q! s- E% m                        "00011011" when S= "0111" else       
                        "00000001" when S= "1000" else       
! J1 Y9 F6 }% c. y                        "00001001" when S= "1001" else         
% R+ s" I4 R; }  Q' l+ u: j                        "00010001" when S= "1010" else       
                        "11000001" when S= "1011" else       
6 @8 z7 |  l6 @7 N                        "01100011" when S= "1100" else       
                        "10000101" when S= "1101" else       
                        "01100001" when S= "1110" else       
. G/ @6 r% i5 r( k, }8 t: v                        "01110001" when others ;   
* j+ ?2 Q# p8 ~( n                       
" o0 ~4 z8 M4 l                        a:= Y(7);
6 \' J- a3 k. ]( ~3 _. t                        b:= Y(6);
                        c:= Y(5);
9 t$ W( L/ U- q$ |2 O, I0 X% G3 K                        d:= Y(4);
8 D! W  _2 E! Y1 w$ G" G                        e:= Y(3);
7 ~, N4 e, ~9 J4 ?( \) @2 v6 U                        f:= Y(2);
                        g:= Y(1);
                        p:= Y(0);
                SEL0<= '0';
end Behavioral;
% h; v5 B: o6 `
; h3 `1 ]/ i& C+ t; ^7 r4 @$ GERROR:HDLParsers:164 - "D:/ypj2008/4e2afpga/sedg7/sedg7.vhd" Line 54. parse error, unexpected OTHERS
2 m' S5 r0 X- M1 H2 l4 H( w2 VERROR:HDLParsers:3312 - "D:/ypj2008/4e2afpga/sedg7/sedg7.vhd" Line 64. Undefined symbol 'SEL0'.
一直錯誤~"~ 實在搞不懂... 誰可以幫幫我呢? 感謝~

addn

您好
( m' l, ]) u3 }  @1.
: v: ^( _6 p  G Y : out  STD_LOGIC_VECTOR (7 downto 0);
Y宣告為out 怎還可以指定給abcdefgp

( e1 J( ]2 Q! W& D& r$ x3 O* C2.
a,b,c,d,e,f,g,p不能用":="要改成"<="
) D- O1 r$ q) D8 i" @
; t1 c9 Z' L; h! \; Y3.
' K  J) a( M% e" @& ^5 \# K, sSEL0沒宣告,怎會冒出SEL0<= '0';來呢

9 W7 M/ b" f) T+ h. c: ?[ 本帖最後由 addn 於 2008-5-8 09:30 AM 編輯 ]

airtiger

改成這樣就可以了
% @4 c$ e6 h8 n
entity segment_7 is
    Port ( S : in  STD_LOGIC_VECTOR (3 downto 0);
           Y : out  STD_LOGIC_VECTOR (7 downto 0));
- C+ k* J: ]! N2 g7 Wend segment_7;
1 ?; B/ H5 a! h
architecture Behavioral of segment_7 is

1 Q/ p1 h- Z' E/ L" R% dbegin
5 u: X" \( S& H' J" Z        Y<=        "00000011" when S= "0000" else               
                        "10011111" when S= "0001" else        
' Y. |6 U/ c5 b% `3 h" {                        "00100101" when S= "0010" else        
                        "00001101" when S= "0011" else        
                        "10011001" when S= "0100" else        
: U, m2 n' \& J( A                        "01001001" when S= "0101" else        
1 c% @( k1 j' d6 v                        "01000001" when S= "0110" else        
                        "00011011" when S= "0111" else        
: B8 N2 Y6 O1 m( k+ R- k                        "00000001" when S= "1000" else        
$ H* M' D4 ^9 E0 Y) h+ P                        "00001001" when S= "1001" else         
  N$ j/ e. h; l                        "00010001" when S= "1010" else        
                        "11000001" when S= "1011" else        
                        "01100011" when S= "1100" else        
! b, W" }% p, _8 h6 m                        "10000101" when S= "1101" else        
                        "01100001" when S= "1110" else        
1 Y& r! ~2 x8 q% g3 V+ y3 O                        "01110001";   
                        
end Behavioral;

gto10620

感謝囉!!後來我改成這樣
entity sedg7 is
& t8 w! F, p5 V5 C0 T    Port ( Enable : in  STD_LOGIC;
           X : in  STD_LOGIC_VECTOR (3 downto 0);
& O$ H# O! f7 c& P2 M2 Q8 r+ o                          a,b,c,d,e,f,g,p : out STD_LOGIC;
                          SEL : OUT   STD_LOGIC_VECTOR (5 DOWNTO 0));
8 N( D- i( f/ W; ^% G                          
( [1 v% T9 d2 w  g& W* i                          

6 y' m/ Y% {/ Kend sedg7;

, k2 \7 \% m7 J! G4 G0 R/ Rarchitecture Behavioral of sedg7 is
SIGNAL Y :  STD_LOGIC_VECTOR (7 downto 0);
begin
& G6 g, ?! K% L* s                Y<=                "11111111" WHEN Enable= '1' ELSE
  [* l" h( K- ?                                        "00000011" WHEN X="0000" ELSE
/ S/ T8 ]) y+ T+ h8 f+ U9 p                                        "10011111" WHEN X="0001" ELSE
                                        "00100101" WHEN X="0010" ELSE
2 a) Z$ ]9 y" N. j8 z* Y% a0 i                                        "00001101" WHEN X="0011" ELSE
& v  Y1 W% C) E2 d& ^' t/ R                                        "10011001" WHEN X="0100" ELSE
" ~& k9 ~2 C9 z9 i0 I                                        "01001001" WHEN X="0101" ELSE
; R# `# M; w7 @; C5 o2 K7 n                                        "01000001" WHEN X="0110" ELSE
                                        "00011011" WHEN X="0111" ELSE
: U, h6 O) z( v                                        "00000001" WHEN X="1000" ELSE
                                        "00001001" WHEN X="1001" ELSE
                                        "00010001" WHEN X="1010" ELSE
                                        "11000001" WHEN X="1011" ELSE
                                        "01100011" WHEN X="1100" ELSE
, ]* Z! B3 Z! {" q9 t0 b; H+ Q                                        "10000101" WHEN X="1101" ELSE
                                        "01100001" WHEN X="1110" ELSE
9 t* M; c' H/ S& `1 b                                        "01110001" ;
        a<= Y(7);
# F9 S6 Q4 g3 m( J; \        b<= Y(6);
0 N  e, `  f( R& V! t' ?        c<= Y(5);
        d<= Y(4);
2 T* ]2 S! L, U! ]7 ~        e<= Y(3);
        f<= Y(2);
        g<= Y(1);
; M  V) ^2 w9 q. ~2 x) K        p<= Y(0);
        SEL<= "111110" ;
end Behavioral;