Quartus電子拔河游戲VHDL代碼開發(fā)板

名稱：Quartus電子拔河游戲VHDL代碼開發(fā)板

軟件：Quartus

語言：VHDL

代碼功能：

設計一個能進行拔河游戲的電路。

電路使用15個(或9個)發(fā)光二極管表示拔河的“電子繩”,開機后只有中間一個發(fā)亮,此即拔河的中心點。

游戲甲乙雙方各持一個按鈕,迅速地、不斷地按動產生脈沖,誰按得快,亮點向誰方向移動,每按一次,亮點移動次。

亮點移到任一方終端二極管,這一方就獲勝,此時雙方按鈕均無作用,輸出保持,只有復位后才使亮點恢復到中心。

由裁判下達比賽開始命令后,甲乙雙方才能輸入信號,否則輸入信號無效。

用數(shù)碼管顯示獲勝者的盤數(shù),每次比賽結束自動給獲勝方加分。

FPGA代碼Verilog/VHDL代碼資源下載：www.hdlcode.com

本代碼已在開發(fā)板驗證，開發(fā)板如下，其他開發(fā)板可以修改管腳適配：

演示視頻：

設計文檔：

1. 工程文件

2. 程序文件

3. 程序編譯

4. RTL圖

狀態(tài)圖

5. 管腳分配

6. 仿真圖

部分代碼展示:

LIBRARY?ieee;
???USE?ieee.std_logic_1164.all;
???USE?ieee.std_logic_unsigned.all;
--控制模塊
ENTITY?bahe_ctrl?IS
???PORT?(
??????clk???????:?IN?STD_LOGIC;--標準時鐘
??????reset_n????????:?IN?STD_LOGIC;--復位信號，低有效?
reset_cnt????????:?IN?STD_LOGIC;--計數(shù)復位信號，低有效?
??????shift1???????:?IN?STD_LOGIC;--選手1
??????shift2???????:?IN?STD_LOGIC;--選手2
??????led????????????:?OUT?STD_LOGIC_VECTOR(6?DOWNTO?0);--7個led
led_flash??????:?OUT?STD_LOGIC;
???win1_times?????:OUT?STD_LOGIC_VECTOR(15?DOWNTO?0);--1號獲勝次數(shù)
???win2_times?????:OUT?STD_LOGIC_VECTOR(15?DOWNTO?0)--2號獲勝次數(shù)
???);
END?bahe_ctrl;
ARCHITECTURE?behave?OF?bahe_ctrl?IS
???
???TYPE?State_type?IS?(s_idle,?s_start,?s_left_shift,?s_right_shift,?s_win_1,?s_win_2);??--?定義狀態(tài)
???SIGNAL?state?:?State_Type;????--?創(chuàng)建信號
???SIGNAL?game_led??????:?STD_LOGIC_VECTOR(6?DOWNTO?0)?:=?"0001000";
SIGNAL?win1_num??????:?STD_LOGIC_VECTOR(15?DOWNTO?0)?:=?"0000000000000000";
SIGNAL?win2_num??????:?STD_LOGIC_VECTOR(15?DOWNTO?0)?:=?"0000000000000000";
???SIGNAL?cnt1?:?STD_LOGIC_VECTOR(31?DOWNTO?0)?:=?"00000000000000000000000000000000";
???SIGNAL?clk1?:?STD_LOGIC?:=?'0';
BEGIN
???PROCESS?(clk)
???BEGIN
??????IF?(clk'EVENT?AND?clk?=?'1')?THEN
?????????IF?((NOT(reset_n))?=?'1')?THEN
????????????state?<=?s_idle;
?????????ELSE
????????????CASE?state?IS
???????????????WHEN?s_idle?=>--復位狀態(tài)
?????????????????????state?<=?s_start;
???????????????WHEN?s_start?=>--游戲中
??????????????????IF?(game_led?=?"1000000")?THEN
?????????????????????state?<=?s_win_1;--1號贏
??????????????????ELSIF?(game_led?=?"0000001")?THEN
?????????????????????state?<=?s_win_2;--2號贏
??????????????????ELSIF?(shift1?=?'1')?THEN
?????????????????????state?<=?s_left_shift;--led左移
??????????????????ELSIF?(shift2?=?'1')?THEN
?????????????????????state?<=?s_right_shift;--led右移
??????????????????ELSE
?????????????????????state?<=?s_start;
??????????????????END?IF;
???????????????WHEN?s_left_shift?=>--led左移
??????????????????state?<=?s_start;
???????????????WHEN?s_right_shift?=>--led右移
??????????????????state?<=?s_start;
???????????????WHEN?s_win_1?=>
??????????????????state?<=?s_win_1;--1號贏
???????????????WHEN?s_win_2?=>
??????????????????state?<=?s_win_2;--2號贏
???????????????WHEN?OTHERS?=>
????????????END?CASE;
?????????END?IF;
??????END?IF;
???END?PROCESS;
???
???
???PROCESS?(clk)
???BEGIN
??????IF?(clk'EVENT?AND?clk?=?'1')?THEN
?????????IF?((NOT(reset_n))?=?'1')?THEN--復位
????????????game_led?<=?"0001000";
?????????ELSIF?(state?=?s_left_shift)?THEN
????????????game_led?<=?(game_led(5?DOWNTO?0)?&?'0');--led左移
?????????ELSIF?(state?=?s_right_shift)?THEN
????????????game_led?<=?('0'?&?game_led(6?DOWNTO?1));--led右移
?????????END?IF;
??????END?IF;
???END?PROCESS;
???PROCESS?(clk)
???BEGIN
??????IF?(clk'EVENT?AND?clk?=?'1')?THEN
?????????IF?((NOT(reset_cnt))?=?'1')?THEN--復位
????????????win1_num?<=?"0000000000000000";
?????????ELSIF?(state?=?s_start?and?game_led?=?"1000000")?THEN----1號贏
????????????win1_num?<=win1_num+?"0000000000000001";--加1
?????????ELSE
win1_num?<=win1_num;
?????????END?IF;
??????END?IF;
???END?PROCESS;???
???PROCESS?(clk)
???BEGIN
??????IF?(clk'EVENT?AND?clk?=?'1')?THEN
?????????IF?((NOT(reset_cnt))?=?'1')?THEN--復位
????????????win2_num?<=?"0000000000000000";
?????????ELSIF?(state?=?s_start?and?game_led?=?"0000001")?THEN----2號贏
????????????win2_num?<=win2_num+?"0000000000000001";--加1
?????????ELSE
win2_num?<=win2_num;
?????????END?IF;
??????END?IF;
???END?PROCESS;
???PROCESS?(clk)
???BEGIN
??????IF?(clk'EVENT?AND?clk?=?'1')?THEN
?????????IF?(cnt1?>=?"00000000001111010000100100000000")?THEN
????????????cnt1?<=?"00000000000000000000000000000000";
????????????clk1?<=?NOT(clk1);
?????????ELSE
????????????cnt1?<=?cnt1?+?"00000000000000000000000000000001";
?????????END?IF;
??????END?IF;
???END?PROCESS;
--輸出
win1_times<=win1_num;
win2_times<=win2_num;
???led?<=?game_led;
led_flash<=clk1;
END?behave;

點擊鏈接獲取代碼文件：http://www.hdlcode.com/index.php?m=home&c=View&a=index&aid=418