EDA数字钟设计报告

1、EDA技术课程设计报告 题目：多功能数字时钟 学院：物电学院 专业班级：2012级电产 学号：50028姓名：桂鹏彬 2014.11.18目录一 摘要-二 设计正文（一）课程设计目标- （二）课程设计实现的功能-（三）设计原理- 三、总结- 一，摘要数字钟的设计实验让我们更加了解了verilog语言，培养了我们动手操作的能力，通过本次实验基本掌握了Verilog语言中的数据类型，数据定义以及常见语句，比如case语句，if语句以及状态机的使用，同样还学会了模块的组成，如何使模块例化，模块的调用等等。二 设计正文（一）课程设计目标设计一个数字钟。要求： （1）能正常走时，时分秒各占 2 个数码管

2、，时分秒之间用小时个位和分钟个位所在数码管的小数点隔开； （2）能用按键调时调分； （3）能整点报时，到达整点时，蜂鸣器响一秒； （4）拓展功能：秒表，闹钟，闹钟可调。（二）课程设计实验的功能 ：设计一个数字钟。要求： （1）能正常走时，时分秒各占 2 个数码管，时分秒之间用小时个位和分钟个位所在数码管的小数点隔开； （2）能用按键调时调分； （3）能整点报时，到达整点时，蜂鸣器响一秒；（三）设计原理 module led(iclk50m,oclk1hz,oclk10khz);input iclk50m;output oclk1hz,oclk10khz;reg oclk1hz,oclk10kh

3、z;reg31:0cnt1;reg31:0cnt2;always(posedge iclk50m)beginif(cnt1)cnt1=cnt1+1;elsebegincnt1=0;oclk1hz=oclk1hz;endendalways(posedge iclk50m)beginif(cnt22500)cnt2=cnt2+1;elsebegincnt2=0;oclk10khz2)status=0;endalways (posedge iclk_1hz)begincase(status)0:begin osec=osec+1;if(osec=59) begin osec=0; omin=omin

4、+1; if(omin=59) begin omin=0; ohour=ohour+1;if(ohour=23)ohour=0; end end end 1:begin osec=osec;omin=omin;if(!k1)beginomin58)omin=0;end if(!k2)begin omin=omin-1;if(omin=0)omin=59;endend 2:begin osec=osec;if(!k1)beginohour22)ohour=0;end if(!k2)beginohour=ohour-1;if(ohour=0)ohour=23;end end endcaseende

5、ndmodulemodule seg7(iclk10khz,oseg,wela,isec,imin,ihour,oFM);input iclk10khz;input5:0ihour;input5:0imin;input5:0isec;output7:0oseg;output5:0wela;output oFM;reg7:0oseg;reg3:0os1,os2,om1,om2,oh1,oh2;reg3:0status;reg3:0a;reg5:0wela;reg oFM;always(posedge iclk10khz)begin status10) status=0;endalways(sta

6、tus)begin case(status) 0:begin a=4b1010; end 1:begin wela=6b;a=os1;end 2:begin a=4b1010;end 3:begin wela=6b; a=os2; end 4:begin a=4b1010; end 5:beginwela=6b; a=om1; end6:begin a=4b1010; end 7:beginwela=6b; a=om2; end 8:begin a=4b1010; end 9:beginwela=6b; a=oh1; end 10:begin a=4b1010; end 11:beginwel

7、a=6b; a=oh2; end12:begin a=4b1010; end endcaseend always(isec) begin os1=isec%10; os2=isec/10; endalways(imin) begin om1=imin%10; om2=imin/10; endalways(ihour) begin oh1=ihour%10; oh2=ihour/10;end always(isec or imin or ihour)beginif (isec=59&imin=59) oFM=0;elseoFM=1;endalways(a)begin case(a)4b0000:oseg=8b;4b0001:oseg=8b;4b0010:oseg=8b;4b0011:oseg=8b;4b0100:oseg=8b;4b0101:oseg=8b;4b0110:o