deled.vhd

此程序为dsp原码程序

LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;


ENTITY DELED IS
PORT(
     S: IN STD_LOGIC_VECTOR(3 DOWNTO 0);
     A,B,C,D,E,F,G,H: OUT STD_LOGIC);
END DELED;

ARCHITECTURE BEHAV OF DELED IS
SIGNAL DATA:STD_LOGIC_VECTOR(3 DOWNTO 0);
SIGNAL DOUT:STD_LOGIC_VECTOR(7 DOWNTO 0);
BEGIN
DATA<=S;
PROCESS(DATA)
BEGIN
CASE  DATA IS
WHEN "0000"=>DOUT<="00111111";
WHEN "0001"=>DOUT<="00000110";
WHEN "0010"=>DOUT<="01011011";
WHEN "0011"=>DOUT<="01001111";
WHEN "0100"=>DOUT<="01100110";
WHEN "0101"=>DOUT<="01101101";
WHEN "0110"=>DOUT<="01111101";
WHEN "0111"=>DOUT<="00000111";
WHEN "1000"=>DOUT<="01111111";
WHEN "1001"=>DOUT<="01101111";
WHEN "1010"=>DOUT<="01110111";
WHEN "1011"=>DOUT<="01111100";
WHEN "1100"=>DOUT<="00111001";
WHEN "1101"=>DOUT<="01011110";
WHEN "1110"=>DOUT<="01111001";
WHEN "1111"=>DOUT<="01110001";
WHEN OTHERS=>DOUT<="00000000";
END CASE;
END PROCESS;
H<=DOUT(7);
G<=DOUT(6);
F<=DOUT(5);
E<=DOUT(4);
D<=DOUT(3);
C<=DOUT(2);
B<=DOUT(1);
A<=DOUT(0);
END BEHAV;