EDA实验报告OCMJ.docxVIP

EDA实验报告数码管显示时钟班级：电技141 姓名：吴世辉学号： 2014301030128一．实验目的1.学习OCMJ显示的译码方法 2.掌握如何利用系统时钟进行分频 3.学习掌握本次试验的程序 4.学习掌握对时钟的运用 5.掌握OCMJ的工作原理，各引脚的作用及编程语句 6.掌握EDA试验箱的使用方法二．实验原理框图三．VHDL清单分或秒：library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_unsigned.all;entity make_time isport(clk:in std_logic;data_out:out std_logic_vector(7 downto 0);clk_out:out std_logic);end;architecture WYB of make_time isbeginprocess(clk)variable temp:std_logic_vector(7 downto 0);beginif rising_edge(clk)thenif temp=x59thentemp:=X00;elseif temp(3 downto 0)=1001thentemp(7 downto 4):=temp(7 downto 4)+1;temp(3 downto 0):=0000;elsetemp(3 downto 0):=temp(3 downto 0)+1;end if;end if;end if;if temp=x59 thenclk_out=1;elseclk_out=0;end if;data_out=temp;end process;end WYB;时：library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_unsigned.all;entity make_time_24 isport(clk:in std_logic;data_out:out std_logic_vector(7 downto 0)--clk_out:out std_logic);end;architecture WYB of make_time_24 isbeginprocess(clk)variable temp:std_logic_vector(7 downto 0);beginif rising_edge(clk)thenif temp=x23thentemp:=X00;elseif temp(3 downto 0)=1001thentemp(7 downto 4):=temp(7 downto 4)+1;temp(3 downto 0):=0000;elsetemp(3 downto 0):=temp(3 downto 0)+1;end if;end if;end if;----if temp=x23 then--clk_out=1;--else--clk_out=0;--end if;data_out=temp;end process;end WYB;分频：library ieee;use ieee.std_logic_1164.all;use ieee.std_logic_unsigned.all;use ieee.std_logic_arith.all;entity make_clk isport(reset_n:in std_logic;sys_clk:in std_logic;--系统时钟clk_1Hz: out std_logic);end make_clk;architecture WYB of make_clk isbeginprocess(sys_clk,reset_n)variable temp: integer range 0 to--1Hzvariable clk: std_logic;beginif reset_n=0 then temp:=0;elsifrising_edge(sys_clk)thenif temp1 thentemp:=0;elsetemp:=temp+1;end if;--end if;if temp2-1 thenclk:=0; elseclk:=1; end if;--clk_1Hz=clk;end if;end process;end WYB;译码：library ieee;use ieee.std_logic_1164.all; entity data_decoder is port (sec:instd_logic_vector(7 downto