when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\ when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\ when others =>hang<=\ end case; when 8 =>
case dz_kongzhi is
when 0 =>hang<=\
lieh<=\ when 1 =>hang<=\
lieh<=\ when 2 =>hang<=\
lieh<=\ when 3 =>hang<=\
lieh<=\ when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\ when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\ when others =>hang<=\ end case; when 9 =>
case dz_kongzhi is
when 0 =>hang<=\
lieh<=\ when 1 =>hang<=\
lieh<=\ when 2 =>hang<=\
lieh<=\ when 3 =>hang<=\
lieh<=\ when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\
when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\ when others =>hang<=\ end case; when 10 =>
case dz_kongzhi is
when 0 =>hang<=\
lieh<=\ when 1 =>hang<=\
lieh<=\ when 2 =>hang<=\
lieh<=\ when 3 =>hang<=\
lieh<=\ when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\ when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\ when others =>hang<=\ end case; when 11 =>
case dz_kongzhi is
when 0 =>hang<=\
lieh<=\ when 1 =>hang<=\
lieh<=\ when 2 =>hang<=\
lieh<=\ when 3 =>hang<=\
lieh<=\ when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\ when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\
when others =>hang<=\ end case; when 12 =>
case dz_kongzhi is
when 0 =>hang<=\
lieh<=\ when 1 =>hang<=\
lieh<=\ when 2 =>hang<=\
lieh<=\ when 3 =>hang<=\
lieh<=\ when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\ when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\ when others =>hang<=\ end case; when 13 =>
case dz_kongzhi is
when 0 =>hang<=\
lieh<=\ when 1 =>hang<=\
lieh<=\ when 2 =>hang<=\
lieh<=\ when 3 =>hang<=\
lieh<=\ when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\ when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\ when others =>hang<=\ end case; when 14 =>
case dz_kongzhi is
when 0 =>hang<=\
lieh<=\ when 1 =>hang<=\
lieh<=\ when 2 =>hang<=\
lieh<=\ when 3 =>hang<=\
lieh<=\ when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\ when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\ when others =>hang<=\ end case; when 15 =>
case dz_kongzhi is
when 0 =>hang<=\
lieh<=\ when 1 =>hang<=\
lieh<=\ when 2 =>hang<=\
lieh<=\ when 3 =>hang<=\
lieh<=\ when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\ when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\ when others =>hang<=\ end case; when 16 =>
case dz_kongzhi is
when 0 =>hang<=\
lieh<=\ when 1 =>hang<=\
lieh<=\
when 2 =>hang<=\
lieh<=\ when 3 =>hang<=\
lieh<=\ when 4 =>hang<=\
lieh<=\ when 5 =>hang<=\
lieh<=\ when 6 =>hang<=\
lieh<=\ when 7 =>hang<=\
lieh<=\ when others =>hang<=\ end case;
end case; end process ; end;
五、功能说明及资源利用情况：
本次实验完成了题目的所有基本要求以及调节速度的提高要求，即用8*8双色点阵模拟了电子沙漏，实现了沙粒的流动；用拨码开关sw1模拟了重力感应器；用DISP0~DISP1模拟了60秒计时器；用按键btn0控制启动和暂停，btn1实现复位，btn2实现三种速度的切换。
器件资源使用情况如下：
Total logic elements：2721270（21%） Total pins：42/116(36%)