github.com/Gehstock.Mist_FPGA
1
0
Fork 0
mirror of https://github.com/Gehstock/Mist_FPGA.git synced 2026-01-27 04:12:10 +00:00
Code Issues Releases Wiki Activity

Scramble HW: use ARC files to select the game

Browse Source
This commit is contained in:
Gyorgy Szombathelyi
2020-02-01 22:17:40 +01:00
parent 81e7d690ba
commit 05170088f7
14 changed files with 118 additions and 62 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Amidar.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=1

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Anteater.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=10

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Armored Car.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=5

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Calipso.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=8

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Frogger.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=2

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Lost Tomb.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=11

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Moon War.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=6

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Scramble.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=0

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Speed Coin.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=7

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Super Cobra.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=3

1
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/meta/Tazzmania.arc Normal file
View File

@@ -0,0 +1 @@
SCRAMBLE=4

162
Arcade_MiST/Konami Scramble Hardware/Scramble_MiST/rtl/ScrambleMist.sv
View File

@@ -51,75 +51,112 @@ module ScrambleMist
`include "rtl\build_id.v"
//`define CORE_NAME "SCRAMBLE"
//`define CORE_NAME "AMIDAR"
//`define CORE_NAME "FROGGER"
//`define CORE_NAME "SCOBRA"
//`define CORE_NAME "TAZMANIA"
//`define CORE_NAME "ARMORCAR"
//`define CORE_NAME "MOONWAR"
//`define CORE_NAME "SPDCOIN"
//`define CORE_NAME "CALIPSO"
//`define CORE_NAME "DARKPLNT" // video problem
//`define CORE_NAME "ANTEATER"
`define CORE_NAME "LOSTTOMB"
integer hwsel = 0;
reg [7:0] input0;
reg [7:0] input1;
reg [7:0] input2;
wire [6:0] core_mod;
reg [8*8-1:0] core_name;
reg [7:0] input0;
reg [7:0] input1;
reg [7:0] input2;
always @(*) begin
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_fireA, 1'b0, m_fireB, m_up2 };
input1 = ~{ m_one_player, m_two_players, m_left2, m_right2, m_fire2A, m_fire2B, 2'b10 };
input2 = ~{ 1'b1, m_down, 1'b1, m_up, 3'b111, m_down2 };
if (`CORE_NAME == "SCRAMBLE" || `CORE_NAME == "AMIDAR") begin
hwsel = 0;
end else if (`CORE_NAME == "FROGGER") begin
hwsel = 1;
end else if (`CORE_NAME == "SCOBRA" || `CORE_NAME == "ARMORCAR") begin
hwsel = 2;
end else if (`CORE_NAME == "TAZMANIA") begin
hwsel = 2;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_down, m_up, m_fireA, m_fireB };
input1 = ~{ m_fire2A, m_fire2B, m_left2, m_right2, m_up2, m_down2, 2'b11 };
input2 = ~{ 1'b1, m_two_players, 2'b10, 3'b111, m_one_player };
end else if (`CORE_NAME == "MOONWAR") begin
hwsel = 2;
input0 = ~{ m_coin1, m_coin2, 1'b0, dial };
input1 = ~{ m_fireA, m_fireB, m_fireC, m_fireD, m_two_players, m_one_player, 2'b01 }; // lives
input2 = ~{ 4'h0, 1'b1, 2'b11, 1'b0 }; // 4xunused, cabinet, coinage, p2fire(cocktail)
end else if (`CORE_NAME == "CALIPSO") begin
hwsel = 3;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_down, m_up, 1'b1, m_two_players|m_fire2A }; // coin1, coin2, left, right, down, up, unused, start 2p / player2 fire
input1 = ~{ 1'b1, 1'b1, m_left2, m_right2, m_down2, m_up2, 1'b1, 1'b1 }; // unused, unused, left, right, down, up, demo sounds, lives 3/5
input2 = ~{ 5'b0, 2'b10, m_fireA | m_one_player }; // unused[7:3], coin dip[2:1], start 1p / player1 fire
end else if (`CORE_NAME == "SPDCOIN") begin
hwsel = 2;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_two_players, 1'b0, m_one_player, 1'b0 };
input1 = { 4'hf, 2'b00, 1'b0, 1'b0 }; // 6xunused, freeplay, freeze
input2 = { 4'hf, 1'b0, 1'b0, 1'b1, 1'b1}; // 4xunused, lives, difficulty, unknown, unused
end else if (`CORE_NAME == "DARKPLNT") begin
hwsel = 4;
input0 = ~{ m_coin1, m_coin2, 3'b000, m_two_players | m_fireB, m_one_player | m_fireA, m_fireC };
input1 = 8'h00;
input2 = 8'h00;
end else if (`CORE_NAME == "ANTEATER") begin
hwsel = 5;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_down, m_up, m_fireA, m_fireB };
input1 = ~{ m_fire2A, m_fire2B, m_left2, m_right2, m_up2, m_down2, 2'b11 };
input2 = ~{ 1'b1, m_two_players, 2'b10, 3'b111, m_one_player };
end else if (`CORE_NAME == "LOSTTOMB") begin
hwsel = 6;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_down, m_up, m_one_player, m_two_players };
input1 = ~{ 1'b0, m_fireA, m_left2, m_right2, m_down2, m_up2, 2'b01 };
input2 = ~{ 4'h0, 1'b0, 2'b10, 1'b0 }; //4xunused, demo sounds, 2xcoinage, unused
end
case (core_mod)
6'h0:
begin
core_name = "SCRAMBLE";
hwsel = 0;
end
6'h1:
begin
core_name = "AMIDAR ";
hwsel = 0;
end
6'h2:
begin
core_name = "FROGGER ";
hwsel = 1;
end
6'h3:
begin
core_name = "SCOBRA ";
hwsel = 2;
end
6'h4:
begin
core_name = "TAZMANIA";
hwsel = 2;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_down, m_up, m_fireA, m_fireB };
input1 = ~{ m_fire2A, m_fire2B, m_left2, m_right2, m_up2, m_down2, 2'b11 };
input2 = ~{ 1'b1, m_two_players, 2'b10, 3'b111, m_one_player };
end
6'h5:
begin
core_name = "ARMORCAR";
hwsel = 2;
end
6'h6:
begin
core_name = "MOONWAR";
hwsel = 2;
input0 = ~{ m_coin1, m_coin2, 1'b0, dial };
input1 = ~{ m_fireA, m_fireB, m_fireC, m_fireD, m_two_players, m_one_player, 2'b01 }; // lives
input2 = ~{ 4'h0, 1'b1, 2'b11, 1'b0 }; // 4xunused, cabinet, coinage, p2fire(cocktail)
end
6'h7:
begin
core_name = "SPDCOIN ";
hwsel = 2;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_two_players, 1'b0, m_one_player, 1'b0 };
input1 = { 4'hf, 2'b00, 1'b0, 1'b0 }; // 6xunused, freeplay, freeze
input2 = { 4'hf, 1'b0, 1'b0, 1'b1, 1'b1}; // 4xunused, lives, difficulty, unknown, unused
end
6'h8:
begin
core_name = "CALIPSO ";
hwsel = 3;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_down, m_up, 1'b1, m_two_players|m_fire2A }; // coin1, coin2, left, right, down, up, unused, start 2p / player2 fire
input1 = ~{ 1'b1, 1'b1, m_left2, m_right2, m_down2, m_up2, 1'b1, 1'b1 }; // unused, unused, left, right, down, up, demo sounds, lives 3/5
input2 = ~{ 5'b0, 2'b10, m_fireA | m_one_player }; // unused[7:3], coin dip[2:1], start 1p / player1 fire
end
6'h9:
begin
// buggy
core_name = "DARKPLNT";
hwsel = 4;
input0 = ~{ m_coin1, m_coin2, 3'b000, m_two_players | m_fireB, m_one_player | m_fireA, m_fireC };
input1 = 8'h00;
input2 = 8'h00;
end
6'hA:
begin
core_name = "ANTEATER";
hwsel = 5;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_down, m_up, m_fireA, m_fireB };
input1 = ~{ m_fire2A, m_fire2B, m_left2, m_right2, m_up2, m_down2, 2'b11 };
input2 = ~{ 1'b1, m_two_players, 2'b10, 3'b111, m_one_player };
end
6'hB:
begin
core_name = "LOSTTOMB";
hwsel = 6;
input0 = ~{ m_coin1, m_coin2, m_left, m_right, m_down, m_up, m_one_player, m_two_players };
input1 = ~{ 1'b0, m_fireA, m_left2, m_right2, m_down2, m_up2, 2'b01 };
input2 = ~{ 4'h0, 1'b0, 2'b10, 1'b0 }; //4xunused, demo sounds, 2xcoinage, unused
end
default:
begin
hwsel = 0;
core_name = "SCRAMBLE";
end
endcase
end
localparam CONF_STR = {
`CORE_NAME,";ROM;",
// `CORE_NAME,";ROM;",
";ROM;",
"O2,Rotate Controls,Off,On;",
"O34,Scanlines,Off,25%,50%,75%;",
"O5,Blending,Off,On;",
@@ -171,15 +208,16 @@ wire [7:0] joystick_0;
wire [7:0] joystick_1;
wire scandoublerD;
wire ypbpr;
wire no_csync;
wire key_strobe;
wire key_pressed;
wire [7:0] key_code;
user_io #(
.STRLEN(($size(CONF_STR)>>3)))
.STRLEN(((8*8+$size(CONF_STR))>>3)))
user_io(
.clk_sys (clk_sys ),
.conf_str (CONF_STR ),
.conf_str ({core_name, CONF_STR}),
.SPI_CLK (SPI_SCK ),
.SPI_SS_IO (CONF_DATA0 ),
.SPI_MISO (SPI_DO ),
@@ -188,6 +226,8 @@ user_io(
.switches (switches ),
.scandoubler_disable (scandoublerD ),
.ypbpr (ypbpr ),
.no_csync (no_csync ),
.core_mod (core_mod ),
.key_strobe (key_strobe ),
.key_pressed (key_pressed ),
.key_code (key_code ),

1
common/mist/mist.vhd
View File

@@ -32,6 +32,7 @@ port (
scandoubler_disable : out std_logic;
ypbpr : out std_logic;
no_csync : out std_logic;
core_mod : out std_logic_vector(6 downto 0);
sd_lba : in std_logic_vector(31 downto 0) := (others => '0');
sd_rd : in std_logic := '0';

6
common/mist/user_io.v
View File

@@ -46,6 +46,7 @@ module user_io #(parameter STRLEN=0, parameter PS2DIV=100, parameter ROM_DIRECT_
output ypbpr,
output no_csync,
output reg [31:0] status,
output reg [6:0] core_mod, // core variant, sent before the config string is requested
// connection to sd card emulation
input [31:0] sd_lba,
@@ -479,7 +480,10 @@ always @(posedge clk_sys) begin
// status, 32bit version
8'h1e: if(abyte_cnt<5) status[(abyte_cnt-1)<<3 +:8] <= spi_byte_in;
endcase
// core variant
8'h21: core_mod <= spi_byte_in[6:0];
endcase
end
end
end