基于EP2C8Q208C8的数字闹钟程序.docx_第1页
基于EP2C8Q208C8的数字闹钟程序.docx_第2页
基于EP2C8Q208C8的数字闹钟程序.docx_第3页
基于EP2C8Q208C8的数字闹钟程序.docx_第4页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_arith.all;use ieee.std_logic_unsigned.all;entity stopwatch is port( Clk : in std_logic; -时钟输入 reset: in std_logic; -复位输入 start,over: in std_logic; -秒表控制输入 LED4_1: OUT STD_LOGIC_VECTOR(4 DOWNTO 1); MUSIC:OUT STD_LOGIC ; ledag: out std_logic_vector(6 downto 0); -七段码管显示输出 SEL:buffer std_logic_vector(1 downto 0) -七段码管扫描驱动); end stopwatch;architecture behave of stopwatch is signal Disp_Temp : integer range 0 to 15; Signal Disp_Decode:std_logic_vector(6 downto 0); signal mSEC1,mSEC10 : integer range 0 to 9; signal SEC1,SEC10 : integer range 0 to 9; signal Clk1kHz : std_logic; signal Clk1Hz : std_logic; signal Start_Flag : std_logic; SIGNAL PLED: STD_LOGIC_VECTOR(4 DOWNTO 1); begin PROCESS(clk) -generate 1hz clock signal variable cnt : INTEGER RANGE 0 TO 49999999;-产生1Hz时钟的分频计数器 BEGIN IF clk=1 AND clkevent THEN IF cnt=49999999 THEN cnt:=0; ELSE IF cnt25000000 THEN clk1hz=1; ELSE clk1hz=0; END IF; cnt:=cnt+1; END IF; END IF; END PROCESS; PROCESS(clk) -generate 1khz clock signal variable cnt1 : INTEGER RANGE 0 TO 49999;-产生1kHz时钟的分频计数器 BEGIN IF clk=1 AND clkevent THEN IF cnt1=49999 THEN cnt1:=0; ELSE IF cnt125000 THEN clk1khz=1; ELSE clk1khz=0; END IF; cnt1:=cnt1+1; END IF; END IF; END PROCESS; process(Clk1Hz) begin if(RESET=0) then -系统复位 MUSIC=1; mSEC1=0; mSEC10=0; SEC1=0; SEC10=0; Start_Flag=0; ELSif(start=0 and Start_Flag=0) then Start_Flag=1; elsif(over=0 and Start_Flag=1) then Start_Flag=0; elsif(Clk1Hzevent and Clk1Hz=1) then -正常运行 if(Start_Flag=1) then if(mSEC1=9) then mSEC1=0; if(mSEC10=5) then mSEC10=0; if(SEC1=9) then SEC1=0; if(SEC10=5) then SEC10=0; else SEC10=SEC10+1; end if; else SEC1=SEC1+1; end if; else mSEC10=mSEC10+1; end if; else mSEC1=mSEC1+1; end if; end if; end if;IF(MSEC1=0 AND MSEC10=0 AND RESET=1) THENMUSIC=0;ELSEMUSICPLEDPLEDPLEDPLEDDisp_TempDisp_TempDisp_TempDisp_Temp=mSEC1; end case; end process; process(Clk1khz) begin if(Clk1khzevent and Clk1khz=1) then -扫描累加 SEL=SEL+1;LED4_1=PLED; ledagDisp_DecodeDisp_DecodeDisp_DecodeDisp_DecodeDisp_DecodeDisp_DecodeDisp_DecodeDisp_D

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论