当前位置:首页 > 《EDA技术》实验指导书
if(MIN1=9) then MIN1<=0;
if(MIN10=5) then MIN10<=0;
if(HOUR1=9) then HOUR1<=0;
HOUR10<=HOUR10+1;
elsif(HOUR10=2 and HOUR1=3) then HOUR1<=0; HOUR10<=0; else
HOUR1<=HOUR1+1; end if; else
MIN10<=MIN10+1; end if; else
MIN1<=MIN1+1; end if; else
SEC10<=SEC10+1; end if; else
SEC1<=SEC1+1; end if; end if; end process;
process(Clk) begin
if(Clk'event and Clk='1') then
Music_Count<=Music_Count+1;
if(MIN10=5 and MIN1=9 and SEC10=5) then --在59分50秒开始提示 if((SEC1 MOD 2)=0) then --在偶数秒开始发声 SPK<=Music_Count(2); --嘀 else
SPK<='0'; end if;
elsif(MIN10=0 and MIN1=0 and SEC10=0 and SEC1=0) then SPK<=Music_Count(1); --嗒 else
SPK<='0'; end if; end if;
end process;
process(SEG_SEL) begin
case (SEG_SEL+1) is
when \ when \ when \ when \ when \ when \ when \ when \ end case; end process;
process(Clk) begin
if(Clk'event and Clk='1') then --扫描累加 SEG_SEL<=SEG_SEL+1; Display<=Disp_Decode; end if; end process;
process(Disp_Temp) --显示转换 begin
case Disp_Temp is
when 0=>Disp_Decode<=\ --0 when 1=>Disp_Decode<=\ --1 when 2=>Disp_Decode<=\ --2 when 3=>Disp_Decode<=\ --3 when 4=>Disp_Decode<=\ --4 when 5=>Disp_Decode<=\ --5 when 6=>Disp_Decode<=\ --6 when 7=>Disp_Decode<=\ --7 when 8=>Disp_Decode<=\ --8 when 9=>Disp_Decode<=\ --9 when 10=>Disp_Decode<=\ ---
when others=>Disp_Decode<=\ --全灭 end case; end process;
end behave;
共分享92篇相关文档