top.txt

具有多种功能的电子钟：闹钟

library ieee;
use ieee.std_logic_1164.all;
entity clock_top is
port ( clk,reset,setmin,sethour,clkdsp:in std_logic;
      speaker: out std_logic;
      sel:     out std_logic_vector (2 downto 0);
      a,b,c,d,e,f,g, dpout: out std_logic);
end clock_top;
architecture a of clock_top is
COMPONENT second
   PORT (
       clk,reset,setmin: IN STD_LOGIC;
       daout: out std_logic_vector (6 downto 0);
       enmin: OUT STD_LOGIC);
END COMPONENT;
COMPONENT minute
   PORT ( 
       clk,clk1,reset,sethour: IN STD_LOGIC;
       enhour: OUT STD_LOGIC;
       daout: out std_logic_vector (6 downto 0));
END COMPONENT; 
COMPONENT hour
   PORT ( 
       clk,reset: in std_logic;
       daout: out std_logic_vector (5 downto 0));
END COMPONENT;
COMPONENT alert
   PORT ( 
       clk: in STD_LOGIC;
       dain: in std_logic_vector (6 downto 0);
       speak: out std_logic);
END COMPONENT;
COMPONENT seltime
   PORT ( 
       clk1,reset: in  std_logic;
       sec,min   : in  std_logic_vector (6 downto 0);
       hour      : in  std_logic_vector (5 downto 0);
       dp        : out std_logic;
       daout     : out std_logic_vector (3 downto 0);   
       sel       : out std_logic_vector (2 downto 0));
END COMPONENT;
COMPONENT deled
   PORT ( 
       num: in STD_LOGIC_vector (3 downto 0);
       led: out std_logic_vector (6 downto 0));
END COMPONENT;
signal enmin_re, enhour_re: std_logic;
signal second_daout,minute_daout: std_logic_vector (6 downto 0);
signal hour_daout: std_logic_vector (5 downto 0);
signal seltime_daout: std_logic_vector (3 downto 0);
signal ledout: std_logic_vector (6 downto 0);
begin
a<=ledout(6); b<=ledout(5); c<=ledout(4); d<=ledout(3); e<=ledout(2);
f<=ledout(1); g<=ledout(0);
u1: second port map (reset=>reset,
                     clk=>clk,
                     setmin=>setmin,
                     enmin=>enmin_re,
                     daout=>second_daout);
u2: minute port map (clk=>enmin_re,
                     clk1=>clk,
                     reset=>reset,
                     sethour=>sethour,
                     enhour=>enhour_re,
                     daout=>minute_daout); 
u3: hour port map (clk=>enhour_re,
                     reset=>reset, 
                     daout=>hour_daout);
u4: alert port map (clk=>clk,
                     dain=>minute_daout,
                     speak=>speaker);
u5: seltime port map (clk1=>clkdsp,
                     reset=>reset,
                     sec=>second_daout,
                     min=>minute_daout,
                     hour=>hour_daout,   
                     daout=>seltime_daout,
                     dp=>dpout,
                     sel=>sel); 
u6: deled port map (num=>seltime_daout,
                    led=>ledout); 
end a;