EDA课程设计_数字钟.doc

数字钟一、 原理图：二、 模块说明：该模块实现分频即将24M时钟源分频为1HZ信号。该分频器由D触发器和计数器构成，每个D触发器的输出信号频率为输入信号频率的一半从而实现分频，COUNTER为计数器，配合D触发器进行进一步分频最终达到合适的频率。对二分频器进行波形仿真为对COUNTER即87计数器仿真为即输入89个时钟脉冲后输出才为一。对COUNTER1即80计数器仿真为即输入80个时钟脉冲后输出为一。Second模块实现秒计数为六十进制计数模式，当计数达到59后如再来一个时钟脉冲则进位即分钟加一，秒位清零即为00。Minute模块实现分计数也为六十进制计数模式，当计数达到59时再来一个脉冲则进位即时钟加一，分位清零即为00。Hour模块实现时计数为二十四进制计数模式，当计数达到23时再来一个脉冲则复位即为00。Link模块实现隔离即将分与秒，时与分隔开。分隔符表现形式为“”，用了此模块后时钟显示更直观。Sel_clock模块实现扫描显示即每一瞬间输出的数据为秒的个位或十位，或者为分的个位或十位，或者时的个位或十位。因该试验增加了一些功能，所以该模块要做相应修改增加为八位显示。此时连线时应注意各模块的个位十位接线和分隔符接线。Deled模块为字符译码模块即将十六进制字符翻译为七段数码管相应段位亮灭从而实现字符译码。该模块也要作少许修改，如把hf=1,0,0,0,1,1,1；改为了hf=0,0,0,0,0,0,1;这样显示后就起到分隔的作用了。当然这也不是唯一的修改方法，关键是修改要和你的link模块相匹配。Alert为整点报时模块，呐叭发声为脉冲激发，不同频率的信号会得到不同音调的声音，如果不停的改变信号频率就会得到一串抑扬顿挫的声音。对second模块仿真为对minute模块进行仿真为：对hour模块进行仿真：对deled字符译码模块仿真该模块将字符转换成数码管相应的段码以便数码管能显示为人们习惯的字符。三、管脚分配：四、AHDL源程序： 1：counter,tdfSUBDESIGN counter (CLK : INPUT;CLKOUT : OUTPUT;)VARIABLEcount13.0: DFF; count23.0: DFF; SS :DFF;BEGINcount1.clk = clk;count2.clk = clk; SS.CLK = CLK;SS = B0; IF COUNT1=B0111 AND COUNT2=B1000 then SS=B1;END IF; IF count1=B1001 THEN count1 =B0000; ELSE count1.d = count1.q + 1; END IF; IF count1=B1001 THEN IF count2=B1000 THEN count2 =B0000;ELSE count2.d = count2.q + 1; END if; ELSE count2.d = count2.q; END IF; clkout=ss; END;2:counter1.tdfSUBDESIGN counter1 (CLK : INPUT;CLKOUT : OUTPUT;)VARIABLEcount13.0: DFF; count23.0: DFF; SS :DFF;BEGINcount1.clk = clk;count2.clk = clk; SS.CLK = CLK;SS = B0; IF COUNT1=B1001 AND COUNT2=B0111 then SS=B1;END IF; IF count1=B1001 THEN count1 =B0000; ELSE count1.d = count1.q + 1; END IF; IF count1=B1001 THEN IF count2=B0111 THEN count2 =B0000;ELSE count2.d = count2.q + 1; END if; ELSE count2.d = count2.q; END IF; clkout=ss; END;3:linkSUBDESIGN link(-CLK,RESET : INPUT;G3.0,H3.0: OUTPUT;)BEGIN G3.0 = B1111;H3.0 = B1111;END;4: Second.tdf 秒钟模块60进制SUBDESIGN Second (CLK,RESET : INPUT;A3.0,B3.0,CKMIN: OUTPUT;)VARIABLEcount13.0: DFF; count23.0: DFF;SS:DFF;BEGINcount1.clk = clk;count1.clrn = RESET;count2.clk = clk;count2.clrn = RESET;SS.CLK = CLK;SS.CLRN = RESET;SS = B0; IF COUNT1=B1001 AND COUNT2=B0101 THENSS=B1;END IF; IF count1=B1001 THEN count1 =B0000; ELSE count1.d = count1.q + 1; END IF; IF count1=B1001 THEN IF count2=B0101 THEN count2 =B0000;ELSE count2.d = count2.q + 1; END if; ELSE count2.d = count2.q; END IF;a3.0 = count1;b3.0 = count2;CKMIN = SS; END;5: Minute.tdf 分钟模块 60进制SUBDESIGN Minute (CKMIN,RESET,SETMIN : INPUT;A3.0,B3.0,CKHOUR : OUTPUT;)VARIABLEcount13.0: DFF; count23.0: DFF;count3: DFF;BEGINcount1.clk = CKMIN OR !SETMIN; count1.clrn = RESET;count2.clk = CKMIN OR !SETMIN;count2.clrn = RESET;count3.clk = CKMIN OR !SETMIN;count3.clrn = RESET;count3=B0; IF COUNT1=B1001 ANDCOUNT2=B0101 THENCOUNT3=B1;END IF; IF count1=B1001 then count1 =B0000; ELSE count1.d = count1.q + 1; END IF; IF count1=B1001 then IF count2=B0101 THEN count2 =B0000;ELSE count2.d = count2.q + 1; END if; ELSE count2.d = count2.q; END IF;a3.0 = count1;b3.0 = count2; CKHOUR = count3; END;6: Hour.tdf 小时模块24进制SUBDESIGN Hour (CKHOUR,RESET,SETHOUR : INPUT;A3.0,B1.0 : OUTPUT;)VARIABLEcount13.0: DFF; count21.0: DFF;BEGINcount1.clk = CKHOUR OR !SETHOUR;count1.clrn = RESET;count2.clk = CKHOUR OR !SETHOUR;count2.clrn = RESET;IF count2ss=s1;WHEN s1 =ss=s2; WHEN s2 =ss=s3;WHEN s3 =ss=s4;WHEN s4 =ss=s5;WHEN s5 =ss=s6;WHEN s6 =ss=s7; WHEN s7 =ss=s0;WHEN OTHERS =ss=s0; END CASE;ELSESS=S0;SPEAK=GND;END IF; END; 9：deled %字符译码器%subdesign deled(num3.0:input;a,b,c,d,e,f,g:output;)begin tablenum3.0=a,b,c,d,e,f,g;h0=1,1,1,1,1,1,0;h1=0,1,1,0,0,0,0;h2=1,1,0,1,1,0,1;h3=1,1,1,1,0,0,1;h4=0,1,1,0,0,1,1;h5=1,0,1,1,0,1,1;h6=1,0,1,1,1,1,1;h7=1,1,1,0,0,0,0;h8=1,1,1,1,1,1,1;h9=1,1,1,1,0,1,1;ha=1,1,1,0,1,1,1;hb=0,0,1,1,1,1,1;hc=1,0,0,1,1,1,0;hd=0,1,1,1,1,0,1;he=1,0,0,1,1,1,1;hf=0,0,0,0,0,0,1; end table;end;五、一点体会：