- 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
vhdl乒乓球比赛游戏讲述
可编程专用集成电路和硬件描述语言实验
乒乓球电路
李万鹏
电子与通信工程
1120092029
乒乓球游戏机
设计任务与要求:
设计一个能够模拟乒乓球比赛的基本过程和规则,并能自动裁判和记分的乒乓球游戏机。要求:比赛时甲乙双方各在不同的位置发球或击球;根据球的位置发出相应的动作,提前击球或出界均判失分;乒乓球的位置和移动方向有灯亮及依次点亮的方向决定;甲乙双方设置各自的记分牌,任何一方先记满21分该方就算胜了此局;当记分牌清零后,又可开始新的一局比赛。
总体框图
乒乓球游戏机的总体框图如下图所示:
片选信号产生模块
核心模块
七段译码器
数据转换模块
设计思路及各模块功能:
设计思路:
用8个发光二极管代表乒乓球台,在游戏机的两侧各设置两个开关,一个是发球开关,一个是击球开关。甲方按动发球开关时,靠近甲方的第一盏灯亮,然后发光二极管由甲向乙依次点亮,代表乒乓球在移动。当球过网后,按设计者规定的球位乙方就可以击球。若乙方提前击球或没有击到球,则判乙方失分,甲方自动加分,重新发球比赛继续进行到一方记分到21分,该局结束,记分牌清零,可以开始新的一局比赛。
(1)片选信号产生模块
片选信号产生模块是用来产生数码管的片选信号,将产生的片选信号输送
到数据转换模块,以便其对输入数据进行选择。
(2)核心模块
核心模块有两个功能,第一个是实现逻辑功能,即对甲方乙方的发球击球
情况进行判断,然后再对双方谁得分进行记录;第二个是将整数得计分转换成十进制数,以便译码显示。
(3)数据转换模块
数据转换模块是将核心模块输送过来的数据通过片选信号对其进行选择,
并将符合要求的数据输送出去。
(4)七段译码器
七段译码器用来将输入数据进行翻译,便于数码管显示出数据。
三、实验程序及原理图
(1)片选信号产生模块
library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_unsigned.all;
entity sel is
port(clk:in std_logic;
sell:out std_logic_vector(2 downto 0));
end sel;
architecture sel_arc of sel is
begin
process(clk)
variable tmp:std_logic_vector(2 downto 0);
begin
if(clkevent and clk=1)then
if(tmp=000)then
tmp:=001;
elsif tmp=001then
tmp:=100;
elsif tmp=100then
tmp:=101;
elsif tmp=101then
tmp:=000;
end if;
end if;sell=tmp;
end process;
end sel_arc;
仿真波形:
(2)核心模块
library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_unsigned.all;
entity coma is
port(clr,af,aj,bf,bj,clk:in std_logic;
shift:out std_logic_vector(7 downto 0);
ah,al,bh,bl:out std_logic_vector(3 downto 0));
end coma;
architecture com_arc of coma is
signal amark,bmark:integer;
begin
process(clr,clk)
variable a,b:std_logic;
variable she:std_logic_vector(7 downto 0);
begin
if clr=1then
a:=0;
b:=0;
she:
amark=0;
bmark=0;
elsif clkevent and clk=1then
if a=0 and b=0 and af=1then
a:=1;
she:
elsif a=0 and b=0 and bf=1 then
b:=1;
she:
elsif a=1 and b=0then
if she8 then
if bj=1then
amark=amark+1;
a:=0;
文档评论(0)