/
castle.cpp
139 lines (94 loc) · 4.03 KB
/
castle.cpp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
// license:BSD-3-Clause
// copyright-holders:David Haywood
/* Castle Mach2000 Hardware
Mechanical Fruit Machines with DMD display
motherboard pic:
http://mamedev.emulab.it/haze/source_refs/mach2000.jpg
videos:
http://www.youtube.com/watch?v=jNx1OwwS58I
http://www.youtube.com/watch?v=m1QKaYh64-o
*/
/*
There are two distinctly different revisions of this PCB, which have incompatible cartridges / hardware (physical connector is very different)
CASTLE. MACH2000 MCU BOARD VERSION 1 REVISION E (C)DJP
CASTLE. MACH2000 MCU BOARD VERSION 2 REVISION A (C)DJP
One significant difference is that the V1 REV E board has *2* 6303 CPUs
whereas the V2 REV A board only has a single 6303
CPUs PIA? SOUND CMOSRAM RTC REEL CONTROLLER
V1 rv E - 2x6303YP + HD6321 + 2xAY-3-8912A + 2xTC5516 + ICM7170 + 68705
V2 rv A - 1x6303YP + HD468821P/HD68821P + 2xAY-3-8912A + TC5564 + none? + 68705
In both cases the 68705 is marked the same way
'REEL CONTROLLER V1 (C) CASTLE (1987) MACH 2000 SYSTEM'
It is not dumped
It is said that one of these boards would go on to become the spACE system, although I don't know if that means exactly the same board
was used, or if modifications were made. Based on the CPU configuraiton it looks most likely that it was the V2 rv A board.
*/
/*
Known but not dumped:
Cashbolt
*/
#include "emu.h"
#include "cpu/m6800/m6801.h"
#include "machine/6821pia.h"
namespace {
class castle_state : public driver_device
{
public:
castle_state(const machine_config &mconfig, device_type type, const char *tag)
: driver_device(mconfig, type, tag),
m_maincpu(*this, "maincpu")
{ }
void castle_V1rvE(machine_config &config);
void castle_V2rvA(machine_config &config);
void V1rvE_mastermap(address_map &map);
void V1rvE_slavemap(address_map &map);
void V2rvA_map(address_map &map);
protected:
// devices
required_device<cpu_device> m_maincpu;
};
void castle_state::V1rvE_mastermap(address_map &map)
{
map(0x8000, 0xffff).rom();
}
void castle_state::V1rvE_slavemap(address_map &map)
{
map(0x8000, 0xffff).rom();
}
static INPUT_PORTS_START( castrev )
INPUT_PORTS_END
void castle_state::castle_V1rvE(machine_config &config)
{
HD6303Y(config, m_maincpu, 1000000);
m_maincpu->set_addrmap(AS_PROGRAM, &castle_state::V1rvE_mastermap);
hd6303y_cpu_device &slavecpu(HD6303Y(config, "slavecpu", 1000000));
slavecpu.set_addrmap(AS_PROGRAM, &castle_state::V1rvE_slavemap);
}
void castle_state::V2rvA_map(address_map &map)
{
map(0x0038, 0x003b).rw("pia", FUNC(pia6821_device::read), FUNC(pia6821_device::write));
map(0x0040, 0x1fff).ram();
map(0x2000, 0xffff).rom();
}
void castle_state::castle_V2rvA(machine_config &config)
{
HD6303Y(config, m_maincpu, 1000000);
m_maincpu->set_addrmap(AS_PROGRAM, &castle_state::V2rvA_map);
PIA6821(config, "pia");
}
ROM_START( castrev )
ROM_REGION( 0x10000, "maincpu", 0 )
ROM_LOAD( "castlerevolutionp2.bin", 0x8000, 0x8000, CRC(cb3bea7f) SHA1(0bffbf53f52ad6dbd9832cae05ed8b55d0cc11d4) )
ROM_REGION( 0x10000, "slavecpu", 0 )
ROM_LOAD( "castlerevolutionp1.bin", 0x8000, 0x8000, CRC(99ecc2ff) SHA1(8d66c81da13c88dc9ed10d75d24a2eaf448d6c6d) )
ROM_END
ROM_START( castfpt )
ROM_REGION( 0x10000, "maincpu", 0 )
ROM_LOAD( "fp2.bin", 0x0000, 0x008000, CRC(c49138d1) SHA1(e7813703e57b2f356aff7a17152c03af70b00683) )
ROM_LOAD( "fp1.bin", 0x8000, 0x008000, CRC(fb458850) SHA1(71343099c7b83db1a4e093f546e5061b9761aa3a) )
ROM_END
} // anonymous namespace
// 4.00 JACKPOT. VERSION 1 (for revision E CPU) Written by and copyright of David John Powell - 25th February 1987
GAME( 1987, castrev, 0, castle_V1rvE, castrev, castle_state, empty_init, ROT0, "Castle","Revolution (Castle) (MACH2000 V1rvE)", MACHINE_IS_SKELETON_MECHANICAL )
// I'm *guessing* this is on MACH2000 V2rvA hardware, it contains strings saying 'MACH 2000 test' and is designed for a single CPU.
GAME( 198?, castfpt, 0, castle_V2rvA, castrev, castle_state, empty_init, ROT0, "Castle","Fortune Pot (Castle) (MACH2000 V2rvA)", MACHINE_IS_SKELETON_MECHANICAL )