【正文】 S8 : in std_logic。 復(fù)位輸入 S1,S2 : in std_logic。 Change Hour, Minute S3,S4,S5 : in std_logic。 Change Year, Month and Day spk : out std_logic。 蜂鳴器 led : out std_logic_vector(3 downto 0)。 整點輸報時輸出 Display : out std_logic_vector(7 downto 0)。 七段碼管顯示輸出 SEG_SEL : buffer std_logic_vector(2 downto 0)。 七段碼管掃描驅(qū)動 keyc : out std_logic_vector(3 downto 0)。 keyr : out std_logic_vector(15 downto 0)。 K1 : in std_logic 顯示切換 )。 end zjh。architecture behave of zjh is signal Disp_Temp : integer range 0 to 15。 signal Disp_Decode : std_logic_vector(7 downto 0)。 signal SEC1,SEC10 : integer range 0 to 9。 signal MIN1,MIN10 : integer range 0 to 9。 signal HOUR1,HOUR10 : integer range 0 to 9。 signal Year1,Year10 : integer range 0 to 9。 signal Month1,Month10: integer range 0 to 9。 signal Day1,Day10 : integer range 0 to 9。 signal Music_Count : std_logic_vector(2 downto 0)。 signal Clk_Count1 : std_logic_vector(13 downto 0)。 產(chǎn)生1Hz時鐘的分頻計數(shù)器 signal Clk1Hz : std_logic。 signal led_count : std_logic_vector(2 downto 0)。 signal led_display : std_logic_vector(3 downto 0)。 signal cdount : std_logic_vector(3 downto 0)。 signal dount : std_logic_vector(12 downto 0)。 signal s : std_logic_vector(3 downto 0)。 signal m,d,y : integer range 0 to 31。 begin process(Clk) begin if(Clk39。event and Clk=39。139。) then if(Clk_Count110000) then Clk_Count1=Clk_Count1+1。 else Clk_Count1=00000000000001。 end if。 end if。 end process。 Clk1Hz=Clk_Count1(13)。 process(Clk1Hz,S8) begin if(S8=39。039。) then 系統(tǒng)復(fù)位 SEC1=0。 SEC10=0。 MIN1=0。 MIN10=0。 HOUR1=0。 HOUR10=0。 Year10 = 1。 Year1 = 3。 Month10 = 0。 Month1 = 1。 Day10 = 0。 Day1 = 1。 elsif(Clk1Hz39。event and Clk1Hz=39。139。) then 正常運(yùn)行 if (K1= 39。139。) then if(S3=39。039。) then 調(diào)節(jié)年 if(Year1=9) then Year1=0。 Year10=Year10+1。 elsif(Year10=9 and Year1=9) then Year1=0。 Year10=0。 else Year1=Year1+1。 end if。 end if。 if(S4=39。039。) then 調(diào)節(jié)月 if(Month1=9) then Month1=0。 Month10=Month10+1。 elsif(Month10=1 and Month1=2) then Month1=0。 Month10=0。 Year1=Year1+1。 else Month1=Month1+1。 end if。 end if。 if(S5=39。039。) then 調(diào)節(jié)日 if(Day1=9) then Day1=0。 Day10=Day10+1。 elsif(Day10=3 and Day1=1) then Day1=0。 Day10=0。 Month1=Month1+1。 else Day1=Day1+1。 end if。 end if。 elsif (K1 = 39。039。) then if(S1=39。039。) then 調(diào)節(jié)小時 if(HOUR1=9) then HOUR1=0。 HOUR10=HOUR10+1。 elsif(HOUR10=2 and HOUR1=3) then HOUR1=0。 HOUR10=0。 Day1=Day1+1。 else HOUR1=HOUR1+1。 end if。 elsif(S2=39。039。) then 調(diào)節(jié)分鐘 if(MIN1=9) then MIN1=0。 if(MIN10=5) then MIN10=0。 HOUR1=HOUR1+1。 else MIN10=MIN10+1。 end if。 else MIN1=MIN1+1。 end if。 end if。 end if。 if(SEC1=9) then SEC1=0。 if(SEC10=5) then SEC10=0。 if(MIN1=9) then MIN1=0。 if(MIN10=5) then MIN10=0。 if (HOUR10 = 2 and HOUR1 = 3) then HOUR10 = 0。 HOUR1 = 0。 Day += 1。 if (Day10 = 3 and Day1 = 0) then Day10 = 0。 Day1 = 1。 Month += 1。 if (Month10 = 1 and Month1 = 2) then Month10 = 0。 Month1 = 1。 Year += 1。 if (Year10 = 9 and Year1 = 9) then Year10 = 0。 Year1 = 0。 end if。 if (Year1 9) then Year1 = Year1 + 1。 elsif (Year1 = 9) then Year10 = Year10 + 1。 Year1 = 0。 end if。 end if。 if (Month1 9) then Month1 = Month1 + 1。 elsif (Month1 = 9) then Month10 = Month10 + 1。 Month1 = 0。 end if。 end if。 if (Day1 9) then Day1 = Day1 + 1。 elsif (Day1 = 9) then Day10 = Day10 + 1。 Day1 = 0。 end if。 elsif (HOUR1 9) then HOUR1 = HO