掷骰子游戏电路的设计与实现实验报告

掷骰子游戏电路的设计与实现实验报告内容摘要：

else y=y+1。 end if。 end if。 end process p1。 p2:process(btn0,clk_dou)btn0 键防抖 begin if clk_dou39。 event and clk_dou=39。 139。 then q3=q2。 q2=q1。 q1=btn0。 q4=q1 and q2 and q3。 经过三个防抖信号周期 （ ）， q4 变为 1，作为按键信号输出 end if。 end process p2。 p3:process(btn1,clk_dou)btn1 键防抖 begin if clk_dou39。 event and clk_dou=39。 139。 then q7=q6。 q6=q5。 q5=btn1。 q8=q5 and q6 and q7。 end if。 end process p3。 p4:process(q4,reset) begin if reset=39。 139。 then如果复位信号为 1，局数归零 ju=0。 elsif q439。 event and q4=39。 139。 thenq4 为甲按键防抖后输出信号 xx=(x rem 6)+1。 产生第一位随机数 yy=(y rem 6)+1。 产生第二位随机数 if ju=6 then局数统计 ju=1。 else ju=ju+1。 end if。 end if。 case xx is when 6 =qout1=0110。 译码输出 when 5 =qout1=0101。 when 4 =qout1=0100。 when 3 =qout1=0011。 when 2 =qout1=0010。 when 1 =qout1=0001。 when others=qout1=0001。 end case。 case yy is when 6 =qout2=0110。 when 5 =qout2=0101。 when 4 =qout2=0100。 when 3 =qout2=0011。 when 2 =qout2=0010。 when 1 =qout2=0001。 when others=qout2=0001。 end case。 case ju is when 6 =qout5=0110。 when 5 =qout5=0101。 when 4 =qout5=0100。 when 3 =qout5=0011。 when 2 =qout5=0010。 when 1 =qout5=0001。 when 0 =qout5=0000。 when others=qout5=0000。 end case。 end process p4。 p5:process(q8)产生乙方的随机数 begin if q839。 event and q8=39。 139。 then xx1=(x rem 6)+1。 yy1=(y rem 6)+1。 end if。 case xx1 is when 6 =qout3=0110。 when 5 =qout3=0101。 when 4 =qout3=0100。 when 3 =qout3=0011。 when 2 =qout3=0010。 when 1 =qout3=0001。 when others=qout3=0001。 end case。 case yy1 is when 6 =qout4=0110。 when 5 =qout4=0101。 when 4 =qout4=0100。 when 3 =qout4=0011。 when 2 =qout4=0010。 when 1 =qout4=0001。 when others=qout4=0001。 end case。 end process p5。 end a。 数码管模块 library ieee。 use。 ENTITY shumaguan IS PORT( clk_shu:in std_logic。 数码管扫描频率 qin1,qin2,qin3,qin4,qin5:IN STD_LOGIC_VECTOR(3 DOWNTO 0)。 随机数输入信号 g:OUT STD_LOGIC_VECTOR(6 DOWNTO 0)。 段选输出信号 cat:OUT STD_LOGIC_VECTOR(5 DOWNTO 0))。 位选输出信号 END shumaguan。 ARCHITECTURE a OF shumaguan IS SIGNAL tmpg:STD_LOGIC_VECTOR(6 DOWNTO 0)。 SIGNAL tmpn:STD_LOGIC_VECTOR(3 DOWNTO 0)。 SIGNAL tmpc:INTEGER RANGE 0 TO 4。 BEGIN p1:PROCESS(clk_shu) 0 到 4 计数器 BEGIN if(clk_shu39。 event and clk_shu=39。 139。 )then if tmpc = 4 then tmpc=0。 else tmpc=tmp。