7段顯示器用when else 寫法

gto10620

剛學FPGA/CPLD 現在學VHDL寫出7段顯示器。
- c$ x$ }+ A: `# Rentity sedg7 is
$ {! x- c/ O9 q# |    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);
end sedg7;

6 z8 S* i& W0 \8 ~architecture Behavioral of sedg7 is

begin
        Y<=        "00000011" when S= "0000" else               
. l* P3 e( p; T* q4 F4 e9 r+ y                        "10011111" when S= "0001" else       
                        "00100101" when S= "0010" else       
+ ^4 ~# [0 k5 n& K. d4 o0 u                        "00001101" when S= "0011" else       
+ _  Y  q5 {: H3 J" O6 A                        "10011001" when S= "0100" else       
0 G2 h* }) y5 F4 O) v! A                        "01001001" when S= "0101" else       
, e$ A" @  d& ]) ]! p                        "01000001" when S= "0110" else       
                        "00011011" when S= "0111" else       
                        "00000001" when S= "1000" else       
! Y( e0 W: v6 x* C+ w% z/ j$ K                        "00001001" when S= "1001" else         
                        "00010001" when S= "1010" else       
                        "11000001" when S= "1011" else       
                        "01100011" when S= "1100" else       
# o8 _! _$ @& c7 W* X2 i                        "10000101" when S= "1101" else       
                        "01100001" when S= "1110" else       
                        "01110001" when others ;   
+ U7 T9 S/ y( j* R; Q                       
& A, E& f0 w. K- o% z( V0 s                        a:= Y(7);
( E1 \4 E# R" V' H0 n# u9 t0 ^                        b:= Y(6);
) [- K* A. c! U' y# n                        c:= Y(5);
                        d:= Y(4);
) b9 r% M8 z+ I* O) k                        e:= Y(3);
                        f:= Y(2);
                        g:= Y(1);
                        p:= Y(0);
                SEL0<= '0';
end Behavioral;

ERROR: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'.
: a9 H7 m2 ~* U, \' C4 ?7 `  E, y一直錯誤~"~ 實在搞不懂... 誰可以幫幫我呢? 感謝~

addn

您好
( W6 f  I9 b8 Q8 B; w9 \) l2 I1.
0 a8 x$ c0 A6 S, T+ h Y : out  STD_LOGIC_VECTOR (7 downto 0);
4 Y0 A3 [- Q) k: q: W6 e Y宣告為out 怎還可以指定給abcdefgp

2.
- G7 f6 N! Y" f$ K! Ja,b,c,d,e,f,g,p不能用":="要改成"<="

3.
SEL0沒宣告,怎會冒出SEL0<= '0';來呢

9 b- [! t4 d9 S8 @[ 本帖最後由 addn 於 2008-5-8 09:30 AM 編輯 ]

airtiger

改成這樣就可以了
& u8 y" m6 j7 O. Z
( T3 D- H" `8 c8 r/ N3 w* D6 t7 Uentity segment_7 is
6 Q/ `$ T2 K, U/ ~    Port ( S : in  STD_LOGIC_VECTOR (3 downto 0);
+ C9 R$ M, P& M( n           Y : out  STD_LOGIC_VECTOR (7 downto 0));
end segment_7;
4 y7 E" Q: l- ~4 n
architecture Behavioral of segment_7 is

3 ^6 U- L3 m3 u: V$ G- [begin
: C. b) ^# _/ g" J; P# M8 O+ w        Y<=        "00000011" when S= "0000" else               
                        "10011111" when S= "0001" else        
                        "00100101" when S= "0010" else        
                        "00001101" when S= "0011" else        
                        "10011001" when S= "0100" else        
- O+ w; _# ?, F8 Q* Z# r                        "01001001" when S= "0101" else        
                        "01000001" when S= "0110" else        
                        "00011011" when S= "0111" else        
                        "00000001" when S= "1000" else        
" z# @8 ^' u" ~8 P8 [/ l5 E: e/ a3 o                        "00001001" when S= "1001" else         
                        "00010001" when S= "1010" else        
                        "11000001" when S= "1011" else        
* A. I% E7 c% R' h  x; L: Q8 \+ y                        "01100011" when S= "1100" else        
                        "10000101" when S= "1101" else        
. G5 p5 h& T- z                        "01100001" when S= "1110" else        
                        "01110001";   
                        
end Behavioral;

gto10620

感謝囉!!後來我改成這樣
( s6 B+ k6 U0 \4 \entity sedg7 is
, y: f) f0 r5 n4 e" W1 B    Port ( Enable : in  STD_LOGIC;
           X : in  STD_LOGIC_VECTOR (3 downto 0);
/ n8 P  F+ f- K3 |6 h  |$ a                          a,b,c,d,e,f,g,p : out STD_LOGIC;
* r$ W1 E8 x5 E                          SEL : OUT   STD_LOGIC_VECTOR (5 DOWNTO 0));
                          
                          

end sedg7;

architecture Behavioral of sedg7 is
SIGNAL Y :  STD_LOGIC_VECTOR (7 downto 0);
begin
0 S5 d8 p4 x) P* T( A                Y<=                "11111111" WHEN Enable= '1' ELSE
                                        "00000011" WHEN X="0000" ELSE
) W8 z# ?& l; J5 [# f3 t                                        "10011111" WHEN X="0001" ELSE
                                        "00100101" WHEN X="0010" ELSE
                                        "00001101" WHEN X="0011" ELSE
                                        "10011001" WHEN X="0100" ELSE
+ E5 r2 q1 @" t. L1 m4 e                                        "01001001" WHEN X="0101" ELSE
                                        "01000001" WHEN X="0110" ELSE
                                        "00011011" WHEN X="0111" ELSE
                                        "00000001" WHEN X="1000" ELSE
                                        "00001001" WHEN X="1001" ELSE
8 W2 \: t3 s  Y6 g4 M+ D  x                                        "00010001" WHEN X="1010" ELSE
& F7 ?! X3 H: q0 t: S- r: P% d                                        "11000001" WHEN X="1011" ELSE
                                        "01100011" WHEN X="1100" ELSE
                                        "10000101" WHEN X="1101" ELSE
% _+ ?- U$ ?4 x0 D, m                                        "01100001" WHEN X="1110" ELSE
2 o3 W- S6 B7 _/ M                                        "01110001" ;
% h5 j' `1 O' J+ ?; \1 o        a<= Y(7);
" y+ E7 Q8 ?; o: ^        b<= Y(6);
) C. C# f3 j  T        c<= Y(5);
% o9 h) Y, z% S* g: i# O" }6 i) u        d<= Y(4);
" w& `5 @( a# T' I% s+ k& h        e<= Y(3);
. I& u9 @0 y/ M9 P  \        f<= Y(2);
        g<= Y(1);
3 D9 b  u1 g: D        p<= Y(0);
        SEL<= "111110" ;
9 [$ |% k1 V, d4 k* bend Behavioral;