ymq47.vhd

eda微波炉程序控制器 初学vhdl语言的控制程序设计

LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
USE IEEE.STD_LOGIC_UNSIGNED.ALL;
ENTITY YMQ47 IS
       PORT(AIN4  : IN STD_LOGIC_VECTOR(3 DOWNTO 0);
            DOUT7 : OUT STD_LOGIC_VECTOR(6 DOWNTO 0));
END ENTITY YMQ47;

ARCHITECTURE ART OF YMQ47 IS
  BEGIN
 PROCESS(AIN4)
  BEGIN
CASE AIN4 IS
WHEN "0000"=>DOUT7<="0111111"; 	--显示0的g～a
WHEN "0001"=>DOUT7<="0000110"; 	--1
WHEN "0010"=>DOUT7<="1011011"; 	--2
WHEN "0011"=>DOUT7<="1001111"; 	--3
WHEN "0100"=>DOUT7<="1100110"; 	--4
WHEN "0101"=>DOUT7<="1101101"; 	--5
WHEN "0110"=>DOUT7<="1111101"; 	--6
WHEN "0111"=>DOUT7<="0000111"; 	--7
WHEN "1000"=>DOUT7<="1111111"; 	--8
WHEN "1001"=>DOUT7<="1101111"; 	--9
WHEN "1010"=>DOUT7<="1011110"; 	--d
WHEN "1011"=>DOUT7<="1011100"; 	--o
WHEN "1100"=>DOUT7<="1010100"; 	--n
WHEN "1101"=>DOUT7<="1111001"; 	--E
WHEN OTHERS=>DOUT7<="0000000";
END CASE;
  END PROCESS;
END ARCHITECTURE ART;