【正文】
”000000000”。 END IF。 ELSE Q500=39。 IF(S0=0001 OR S0=0011 OR S0=0101 OR S0=0111) THEN Q500=39。 WHEN OTHERS=LAMP=000000000。 WHEN1000=LAMP=010000000。 WHEN0110=LAMP=000100000。 WHEN0100=LAMP=000001000。 WHEN0010=LAMP=000000010。139。 PROCESS(CLKSP) BEGIN IF (CLKSP39。 S1=SECOND(7 DOWNTO 4)。 BEGIN M1=MINUTE(7 DOWNTO 4)。 ARCHITECTURE ART OF ALERT IS SIGNAL Q500,QLK:STD_LOGIC。 LAMP:OUT STD_LOGIC_VECTOR(8 DOWNTO 0))。 SECOND,MINUTE:IN STD_LOGIC_VECTOR(7 DOWNTO 0)。 USE 。 程序如下: LIBRARY IEEE。 Alert 模塊產(chǎn)生整點報時的驅(qū)動信號 speak 和 LED 燈花樣顯示信號lamp[8..0]。 END ART。 END PROCESS。 WHEN OTHERS=DAOUT=0000。 WHEN 100=DAOUT=HOUR(3 DOWNTO 0)。 WHEN 010=DAOUT=MINUTE(3 DOWNTO 0)。 PROCESS(SEC,SECOND,MINUTE,HOUR) BEGIN CASE SEC IS WHEN 000=DAOUT=SECOND(3 DOWNTO 0)。 END IF。 ELSE SEC=SEC+1。139。 ELSIF(CKDSP39。039。 ARCHITECTURE ART OF SELTIME IS SIGNAL SEC:STD_LOGIC_VECTOR(2 DOWNTO 0)。 SEL:OUT STD_LOGIC_VECTOR(2 DOWNTO 0))。 HOUR:IN STD_LOGIC_VECTOR(7 DOWNTO 0)。 SECOND:IN STD_LOGIC_VECTOR(7 DOWNTO 0)。 USE 。 USE 。 END ART。CNT0。 END IF。 END IF。 ELSE CNT0:=CNT0+1。 ELSE IF CNT0=1001 THEN CNT1:=CNT1+1。 ELSE CNT0:=CNT0+1。 THEN if CNT1=0010 THEN if CNT0=0011 THEN CNT1:=0000。) THEN IF EN=39。EVENT AND CLK=39。 ARCHITECTURE ART OF HOUR IS BEGIN PROCESS(CLK) VARIABLE CNT1,CNT0:STD_LOGIC_VECTOR(3 DOWNTO 0)。 DAOUT:OUT STD_LOGIC_VECTOR(7 DOWNTO 0))。 USE 。 LIBRARY IEEE。 END ART。 END PROCESS。 DAOUT=CNT1amp。 END IF。 END IF。139。 CNT1:=0000。039。 END IF。 CNT1:=CNT1+1。139。139。 BEGIN IF(CLK39。 ARCHITECTURE ART OF MINUTE IS SIGNAL CC:STD_LOGIC。