数字钟(综合实验

1、实验九 数字钟（综合实验）一、设计要求（数字钟的功能）1、具有时、分、秒计数显示功能，以二十四小时循环计时。2、具有清零，调节小时，分钟的功能。3、具有整点报时同时LED灯花样显示的功能。二、实验目的1、掌握多位计数器相连的设计方法。2、掌握十进制，六进制，二十四进制计数器的设计方法。3、继续巩固多位共阴极扫描显示数码管的驱动，及编码。4、掌握扬声器的驱动。5、LED灯的花样显示。6、掌握CPLD技术的层次化设计方法。三、硬件要求1、主芯片Altera EPM7128SLC84-15。2、8个LED灯。3、扬声器。4、8位8段扫描共阴极数码显示管。5、三个按键开关（清零，调小时，调分钟）。四、

2、实验原理在同一CPLD芯片上集成了如下电路模块：1、时钟计数：秒60进制BCD码计数。 分60进制BCD码计数。 时24进制BCD码计数。同时整个计数器有清零、调时、调分功能。在接近整数时能提供报时信号。2、具有驱动8位8段共阴极扫描数码管的片选驱动信号输出和8段字形译码输出。编码和扫描可参考“实验四”。3、扬声器在整点时有报时驱动信号产生（响声持续多长时间？）。4、LED灯按个人口味在整点时有花样显示信号产生。五、实验内容及步骤1、根据电路特点，可在教师指导下用层次设计概念。将此设计任务分成若干模块，规定每一模块的功能和各模块之间的接口。让几个学生分做和调试其中之一，然后再将各模块和起来联试

3、。以培养学生之间的合作精神，同时加深层次化设计概念。2、了解软件的元件管理深层含义，以及模块元件之间的连接概念，对于不同目录下的同一设计，如何熔合。六、原理图 如图9-1所示（模块化设计）图9-1 （Clock.gdf）模块说明各种进制的计数及时钟控制模块（10进制、六进制、24进制）；扫描分时显示，译码模块；彩灯，扬声器编码模块；各模块都是AHDL语言编写。七、实验连线输入接口：1、代表清零、调时、调分信号RESET、SETHOUR、SETMIN的管脚分别连接按键开关。2、代表计数时钟信号CLK和扫描时钟信号CKDSP的管脚分别同1Hz时钟源和32Hz（或更高）时钟源相连。输出接口：1、代表

4、扫描显示的驱动信号管脚SEL2、SEL1、SEL0和a,b,c,d,e,f,g参照实验四的连法。2、代表扬声器驱动信号的管脚SPEAK同扬声器驱动接口SPEAKER相连。3、代表花样灯显示信号管脚LAMP0、LAMP1、LAMP2同3个LED灯相连。八、实验报告让学生体会CPLD整个设计的优点，以及用扫描电路实现显示功能的潜在好处。然后集体讨论交流，相互加深对CPLD芯片设计过程的理解。附：AHDL源程序1、Second.tdf 秒钟模块60进制SUBDESIGN Second (CLK,RESET : INPUT;A3.0,B3.0,CKMIN: OUTPUT;)VARIABLEcount1

5、3.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 = B"0" IF COUNT1=B"1001" AND COUNT2=B"0101" THENSS=B"1"END IF; IF count1=B"1001" THEN count1 =B"0000&q

6、uot; ELSE count1.d = count1.q + 1; END IF; IF count1=B"1001" THEN IF count2=B"0101" THEN count2 =B"0000"ELSE count2.d = count2.q + 1; END if; ELSE count2.d = count2.q; END IF; a3.0 = count1;b3.0 = count2;CKMIN = SS; END;2、Minute.tdf 分钟模块 60进制SUBDESIGN Minute (CKMIN,RESE

7、T,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=B"0" IF COUNT1=B"1001"

8、 ANDCOUNT2=B"0101" THENCOUNT3=B"1"END IF; IF count1=B"1001" then count1 =B"0000" ELSE count1.d = count1.q + 1; END IF; IF count1=B"1001" then IF count2=B"0101" THEN count2 =B"0000"ELSE count2.d = count2.q + 1; END if; ELSE count2.

9、d = count2.q; END IF;a3.0 = count1;b3.0 = count2; CKHOUR = count3; END;3、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 = RES

10、ET;IF count2<B"10" THENIF count1=B"1001" THEN count1 =B"0000"count2.d =count2.q+1; ELSE count1.d = count1.q + 1; count2.d = count2.q; END IF; ELSIF count2= B"10" THENIF count1=B"0011" THENcount1 =B"0000"count2 =B"00"ELSEcount1.

11、d = count1.q + 1;count2.d =count2.q; END IF;END IF; a3.0 = count1;b1.0 = count2; END;4、Sel_clock.tdf 显示扫描模块SUBDESIGN SEL_clock (A3.0,B3.0,C3.0 : INPUT;D3.0,E3.0,F1.0 : INPUT;CKDSP: INPUT;OUT3.0,SEL2.0 :OUTPUT;)VARIABLECOUNT2.0 : DFF;BEGINcount.clk = CKDSP;IF COUNT = B"101" THENCOUNT= B&quo

12、t;000"ELSEcount.d = count.q + 1;END IF; IF COUNT=B"000" thenout3.0= A3.0; ELSIF COUNT=B"001" thenout3.0= B3.0;ELSIF COUNT=B"010" thenout3.0= C3.0;ELSIF COUNT=B"011" thenout3.0= D3.0;ELSIF COUNT=B"100" thenout3.0= E3.0;ELSIF COUNT=B"101"

13、; thenout1.0= F1.0;out3.2= B"00"END IF;SEL2.0=COUNT;END;5、Alert.tdf 报时模块SUBDESIGN alert ( CKSP,DAIN7.0 : INPUT; SPEAK,LAMP3.0 : OUTPUT;)VARIABLE s: DFF; ss:MACHINE OF BITS (lamp3.0) WITH STATES( s0=B"0000", s1=B"0001", s2=B"0010", s3=B"0100", s4=B"1000");BEGINIF dain7.0=B"00000000" THEN SS.clk=cks