1 // license:BSD-3-Clause
2 // copyright-holders:Angelo Salese
3 /********************************************************************************************************************
4
5 Tournament Solitaire (c) 1995 Dynamo
6
7 Unmodified 486 PC-AT HW.
8
9 Jet Way Information Co. OP495SLC motherboard
10 - AMD Am486-DX40 CPU
11 - Trident TVGA9000i video card
12 - Breve Technologies audio adapter, WSS+Sound Blaster
13 - CH Products RollerMouse serial trackball, Mouse Systems compatible
14
15 preliminary driver by Angelo Salese
16
17 Notes:
18 Data from the 99378275.SN file on the rom filesystem is scrambled and written to DF80:0000-0100 then read back.
19 If the output isn't satisfactory, it prints "I/O BOARD FAILURE".
20
21 ********************************************************************************************************************/
22
23 #include "emu.h"
24
25 #include "cpu/i386/i386.h"
26 #include "machine/pcshare.h"
27 #include "machine/bankdev.h"
28 #include "machine/ds128x.h"
29 #include "machine/ins8250.h"
30 #include "machine/nvram.h"
31 #include "sound/ad1848.h"
32
33 #include "bus/isa/isa.h"
34 #include "bus/isa/sblaster.h"
35 #include "bus/isa/trident.h"
36 #include "bus/rs232/hlemouse.h"
37 #include "bus/rs232/rs232.h"
38
39 #include "screen.h"
40
41
42 class pcat_dyn_state : public pcat_base_state
43 {
44 public:
pcat_dyn_state(const machine_config & mconfig,device_type type,const char * tag)45 pcat_dyn_state(const machine_config &mconfig, device_type type, const char *tag)
46 : pcat_base_state(mconfig, type, tag)
47 , m_isabus(*this, "isa")
48 , m_prgbank(*this, "prgbank")
49 , m_nvram_bank(*this, "nvram_bank")
50 , m_nvram_mem(0x2000){ }
51
52 void pcat_dyn(machine_config &config);
53
54 private:
55 required_device<isa8_device> m_isabus;
56 required_memory_bank m_prgbank;
57 required_memory_bank m_nvram_bank;
58 std::vector<uint8_t> m_nvram_mem;
59 void bank1_w(uint8_t data);
60 void bank2_w(uint8_t data);
61 uint8_t audio_r(offs_t offset);
62 void dma8237_1_dack_w(uint8_t data);
63 virtual void machine_start() override;
64 void nvram_init(nvram_device &nvram, void *base, size_t size);
65 static void pcat_dyn_sb_conf(device_t *device);
66 void pcat_io(address_map &map);
67 void pcat_map(address_map &map);
68 };
69
machine_start()70 void pcat_dyn_state::machine_start()
71 {
72 m_prgbank->configure_entries(0, 256, memregion("game_prg")->base(), 0x1000);
73 m_nvram_bank->configure_entries(0, 2, &m_nvram_mem[0], 0x1000);
74 subdevice<nvram_device>("nvram")->set_base(&m_nvram_mem[0], 0x2000);
75 }
76
nvram_init(nvram_device & nvram,void * base,size_t size)77 void pcat_dyn_state::nvram_init(nvram_device &nvram, void *base, size_t size)
78 {
79 memcpy(base, memregion("nvram")->base(), size);
80 }
81
audio_r(offs_t offset)82 uint8_t pcat_dyn_state::audio_r(offs_t offset)
83 {
84 switch(offset)
85 {
86 case 3:
87 return 4;
88 }
89 return 0;
90 }
91
bank1_w(uint8_t data)92 void pcat_dyn_state::bank1_w(uint8_t data)
93 {
94 m_prgbank->set_entry(data);
95 }
96
bank2_w(uint8_t data)97 void pcat_dyn_state::bank2_w(uint8_t data)
98 {
99 m_nvram_bank->set_entry(data & 1);
100 }
101
pcat_map(address_map & map)102 void pcat_dyn_state::pcat_map(address_map &map)
103 {
104 map(0x00000000, 0x0009ffff).ram();
105 map(0x000a0000, 0x000bffff).rw("vga", FUNC(trident_vga_device::mem_r), FUNC(trident_vga_device::mem_w));
106 map(0x000c0000, 0x000c7fff).rom().region("video_bios", 0);
107 map(0x000d0000, 0x000d0fff).rom().region("game_prg", 0x0000).w(FUNC(pcat_dyn_state::bank1_w));
108 map(0x000d1000, 0x000d1fff).rom().region("game_prg", 0x1000).w(FUNC(pcat_dyn_state::bank2_w));
109 map(0x000d2000, 0x000d2fff).bankr("prgbank");
110 map(0x000d3000, 0x000d3fff).bankrw("nvram_bank");
111 map(0x000df400, 0x000df8ff).ram(); //I/O board?
112 map(0x000f0000, 0x000fffff).rom().region("bios", 0);
113 map(0x00100000, 0x001fffff).ram();
114 map(0xffff0000, 0xffffffff).rom().region("bios", 0);
115 }
116
pcat_io(address_map & map)117 void pcat_dyn_state::pcat_io(address_map &map)
118 {
119 pcat32_io_common(map);
120 map(0x03b0, 0x03bf).rw("vga", FUNC(trident_vga_device::port_03b0_r), FUNC(trident_vga_device::port_03b0_w));
121 map(0x03c0, 0x03cf).rw("vga", FUNC(trident_vga_device::port_03c0_r), FUNC(trident_vga_device::port_03c0_w));
122 map(0x03d0, 0x03df).rw("vga", FUNC(trident_vga_device::port_03d0_r), FUNC(trident_vga_device::port_03d0_w));
123 map(0x03f8, 0x03ff).rw("ns16550", FUNC(ns16550_device::ins8250_r), FUNC(ns16550_device::ins8250_w));
124 map(0x0530, 0x0533).r(FUNC(pcat_dyn_state::audio_r));
125 map(0x0534, 0x0537).rw("ad1848", FUNC(ad1848_device::read), FUNC(ad1848_device::write));
126 }
127
128 //TODO: use atmb device
dma8237_1_dack_w(uint8_t data)129 void pcat_dyn_state::dma8237_1_dack_w(uint8_t data) { m_isabus->dack_w(1, data); }
130
131 static INPUT_PORTS_START( pcat_dyn )
132 // M,N,Numpad 6 -- Hang
133 // Enter,Numpad 4 -- 5 Credits
134 PORT_START("pc_keyboard_0")
135 PORT_BIT(0x0200, IP_ACTIVE_HIGH, IPT_SERVICE) PORT_NAME("Bookkeeping")
136
137 PORT_START("pc_keyboard_1")
138 PORT_BIT(0x1000, IP_ACTIVE_HIGH, IPT_BILL1)
139
140 PORT_START("pc_keyboard_2")
141 // Don't use IPT_BUTTON1 or the mouse axes are mapped incorrectly
PORT_CODE(MOUSECODE_BUTTON1)142 PORT_BIT(0x0002, IP_ACTIVE_HIGH, IPT_OTHER) PORT_NAME("Mouse Button") PORT_CODE(MOUSECODE_BUTTON1)
143 PORT_BIT(0x0040, IP_ACTIVE_HIGH, IPT_COIN1)
144 INPUT_PORTS_END
145
146 static void pcat_dyn_com(device_slot_interface &device)
147 {
148 device.option_add("msmouse", MSYSTEMS_HLE_SERIAL_MOUSE);
149 }
150
pcat_dyn_isa8_cards(device_slot_interface & device)151 static void pcat_dyn_isa8_cards(device_slot_interface &device)
152 {
153 device.option_add("sb15", ISA8_SOUND_BLASTER_1_5);
154 }
155
156 static DEVICE_INPUT_DEFAULTS_START( pcat_dyn_sb_def )
157 DEVICE_INPUT_DEFAULTS("CONFIG", 0x03, 0x01)
158 DEVICE_INPUT_DEFAULTS_END
159
pcat_dyn_sb_conf(device_t * device)160 void pcat_dyn_state::pcat_dyn_sb_conf(device_t *device)
161 {
162 device->subdevice<pc_joy_device>("pc_joy")->set_default_option(nullptr); // remove joystick
163 }
164
pcat_dyn(machine_config & config)165 void pcat_dyn_state::pcat_dyn(machine_config &config)
166 {
167 /* basic machine hardware */
168 I486(config, m_maincpu, 40000000); /* Am486 DX-40 */
169 m_maincpu->set_addrmap(AS_PROGRAM, &pcat_dyn_state::pcat_map);
170 m_maincpu->set_addrmap(AS_IO, &pcat_dyn_state::pcat_io);
171 m_maincpu->set_irq_acknowledge_callback("pic8259_1", FUNC(pic8259_device::inta_cb));
172
173 /* video hardware */
174 pcvideo_trident_vga(config);
175 subdevice<screen_device>("screen")->set_refresh_hz(60);
176 TVGA9000_VGA(config.replace(), "vga", 0);
177
178 pcat_common(config);
179
180 DS12885(config.replace(), m_mc146818);
181 m_mc146818->irq().set("pic8259_2", FUNC(pic8259_device::ir0_w));
182 m_mc146818->set_century_index(0x32);
183
184 ad1848_device &ad1848(AD1848(config, "ad1848", 0));
185 ad1848.irq().set("pic8259_1", FUNC(pic8259_device::ir5_w));
186 ad1848.drq().set("dma8237_1", FUNC(am9517a_device::dreq0_w));
187
188 m_dma8237_1->out_iow_callback<0>().set("ad1848", FUNC(ad1848_device::dack_w));
189 m_dma8237_1->out_iow_callback<1>().set(FUNC(pcat_dyn_state::dma8237_1_dack_w));
190
191 NVRAM(config, "nvram").set_custom_handler(FUNC(pcat_dyn_state::nvram_init));
192
193 ns16550_device &uart(NS16550(config, "ns16550", XTAL(1'843'200)));
194 uart.out_tx_callback().set("serport", FUNC(rs232_port_device::write_txd));
195 uart.out_dtr_callback().set("serport", FUNC(rs232_port_device::write_dtr));
196 uart.out_rts_callback().set("serport", FUNC(rs232_port_device::write_rts));
197 uart.out_int_callback().set("pic8259_1", FUNC(pic8259_device::ir4_w));
198
199 rs232_port_device &serport(RS232_PORT(config, "serport", pcat_dyn_com, "msmouse"));
200 serport.set_fixed(true);
201 serport.rxd_handler().set("ns16550", FUNC(ins8250_uart_device::rx_w));
202 serport.dcd_handler().set("ns16550", FUNC(ins8250_uart_device::dcd_w));
203 serport.dsr_handler().set("ns16550", FUNC(ins8250_uart_device::dsr_w));
204 serport.ri_handler().set("ns16550", FUNC(ins8250_uart_device::ri_w));
205 serport.cts_handler().set("ns16550", FUNC(ins8250_uart_device::cts_w));
206
207 ISA8(config, m_isabus, 0);
208 m_isabus->set_memspace("maincpu", AS_PROGRAM);
209 m_isabus->set_iospace("maincpu", AS_IO);
210 m_isabus->irq2_callback().set("pic8259_2", FUNC(pic8259_device::ir2_w));
211 m_isabus->irq3_callback().set("pic8259_1", FUNC(pic8259_device::ir3_w));
212 //m_isabus->irq4_callback().set("pic8259_1", FUNC(pic8259_device::ir4_w));
213 //m_isabus->irq5_callback().set("pic8259_1", FUNC(pic8259_device::ir5_w));
214 m_isabus->irq6_callback().set("pic8259_1", FUNC(pic8259_device::ir6_w));
215 m_isabus->irq7_callback().set("pic8259_1", FUNC(pic8259_device::ir7_w));
216 m_isabus->drq1_callback().set("dma8237_1", FUNC(am9517a_device::dreq1_w));
217 m_isabus->drq2_callback().set("dma8237_1", FUNC(am9517a_device::dreq2_w));
218 m_isabus->drq3_callback().set("dma8237_1", FUNC(am9517a_device::dreq3_w));
219
220 // FIXME: determine ISA bus clock
221 isa8_slot_device &isa1(ISA8_SLOT(config, "isa1", 0, "isa", pcat_dyn_isa8_cards, "sb15", true));
222 isa1.set_option_device_input_defaults("sb15", DEVICE_INPUT_DEFAULTS_NAME(pcat_dyn_sb_def));
223 isa1.set_option_machine_config("sb15", pcat_dyn_sb_conf);
224 }
225
226 /***************************************
227 *
228 * ROM definitions
229 *
230 ***************************************/
231
232 ROM_START(toursol)
233 ROM_REGION32_LE(0x10000, "bios", 0) /* Motherboard BIOS */
234 ROM_LOAD("prom.mb", 0x000000, 0x10000, CRC(e44bfd3c) SHA1(c07ec94e11efa30e001f39560010112f73cc0016) )
235
236 ROM_REGION32_LE(0x20000, "video_bios", 0) /* Trident TVGA9000 BIOS */
237 ROM_LOAD16_BYTE("prom.vid", 0x00000, 0x04000, CRC(ad7eadaf) SHA1(ab379187914a832284944e81e7652046c7d938cc) )
238 ROM_CONTINUE( 0x00001, 0x04000 )
239
240 ROM_REGION32_LE(0x100000, "game_prg", 0) /* PromStor 32, mapping unknown */
241 ROM_LOAD("sol.u21", 0x00000, 0x40000, CRC(e97724d9) SHA1(995b89d129c371b815c6b498093bd1bbf9fd8755))
242 ROM_LOAD("sol.u22", 0x40000, 0x40000, CRC(69d42f50) SHA1(737fe62f3827b00b4f6f3b72ef6c7b6740947e95))
243 ROM_LOAD("sol.u23", 0x80000, 0x40000, CRC(d1e39bd4) SHA1(39c7ee43cddb53fba0f7c0572ddc40289c4edd07))
244 ROM_LOAD("sol.u24", 0xc0000, 0x40000, CRC(555341e0) SHA1(81fee576728855e234ff7aae06f54ae9705c3ab5))
245 ROM_FILL(0x2a3e6, 1, 0xeb) // skip prot(?) check
246 ROM_FILL(0x51bd2, 2, 0x90) // opl2 probe expects timer expiration too quickly
247
248 ROM_REGION(0x2000, "nvram", 0)
249 ROM_LOAD("sol.u28", 0, 0x2000, CRC(c9374d50) SHA1(49173bc69f70bb2a7e8af9d03e2538b34aa881d8))
250
251 ROM_REGION(128, "rtc", 0)
252 ROM_LOAD("rtc", 0, 128, BAD_DUMP CRC(732f64c8) SHA1(5386eac3afef9b16af8dd7766e577f7ac700d9cc))
253 ROM_END
254
255
256 ROM_START(toursol1)
257 ROM_REGION32_LE(0x10000, "bios", 0) /* Motherboard BIOS */
258 ROM_LOAD("prom.mb", 0x000000, 0x10000, CRC(e44bfd3c) SHA1(c07ec94e11efa30e001f39560010112f73cc0016) )
259
260 ROM_REGION32_LE(0x20000, "video_bios", 0) /* Trident TVGA9000 BIOS */
261 ROM_LOAD16_BYTE("prom.vid", 0x00000, 0x04000, CRC(ad7eadaf) SHA1(ab379187914a832284944e81e7652046c7d938cc) )
262 ROM_CONTINUE( 0x00001, 0x04000 )
263
264 ROM_REGION32_LE(0x100000, "game_prg", 0) /* PromStor 32, mapping unknown */
265 ROM_LOAD("prom.0", 0x00000, 0x40000, CRC(f26ce73f) SHA1(5516c31aa18716a47f46e412fc273ae8784d2061))
266 ROM_LOAD("prom.1", 0x40000, 0x40000, CRC(8f96e2a8) SHA1(bc3ce8b99e6ff40e355df2c3f797f1fe88b3b219))
267 ROM_LOAD("prom.2", 0x80000, 0x40000, CRC(8b0ac5cf) SHA1(1c2b6a53c9ff4d18a5227d899facbbc719f40205))
268 ROM_LOAD("prom.3", 0xc0000, 0x40000, CRC(9352e965) SHA1(2bfb647ec27c60a8c821fdf7483199e1a444cea8))
269 ROM_FILL(0x334f6, 1, 0xeb) // skip prot(?) check
270
271 ROM_REGION(0x2000, "nvram", 0)
272 ROM_LOAD("prom.7", 0, 0x2000, CRC(154c8092) SHA1(4439ee82f36d5d5c334494ba7bb4848e839213a7))
273
274 ROM_REGION(128, "rtc", 0)
275 ROM_LOAD("rtc", 0, 128, BAD_DUMP CRC(732f64c8) SHA1(5386eac3afef9b16af8dd7766e577f7ac700d9cc))
276 ROM_END
277
278
279 GAME( 1995, toursol, 0, pcat_dyn, pcat_dyn, pcat_dyn_state, empty_init, ROT0, "Dynamo", "Tournament Solitaire (V1.06, 08/03/95)", MACHINE_UNEMULATED_PROTECTION )
280 GAME( 1995, toursol1, toursol, pcat_dyn, pcat_dyn, pcat_dyn_state, empty_init, ROT0, "Dynamo", "Tournament Solitaire (V1.04, 06/22/95)", MACHINE_NOT_WORKING|MACHINE_NO_SOUND )
281