summaryrefslogtreecommitdiffstatshomepage
diff options
context:
space:
mode:
author mooglyguy <therealmogminer@gmail.com>2019-06-03 18:13:19 +0200
committer MooglyGuy <therealmogminer@gmail.com>2019-06-03 18:14:00 +0200
commit90e4cae77e089747d4ad7fb9410bdeda670cc2fa (patch)
tree075af80d9420b67628dc4ae3c36344fe8ce81058
parent3dcc58e3313eb3e1d07e231848ba3a387b6d8074 (diff)
New machines marked as NOT_WORKING
----------- Quantel DPB-7000 [Ryan Holtz, Mark Nias]
-rw-r--r--scripts/target/mame/mess.lua1
-rw-r--r--src/devices/machine/com8116.cpp6
-rw-r--r--src/devices/machine/com8116.h13
-rw-r--r--src/emu/xtal.cpp1
-rw-r--r--src/mame/drivers/dpb7000.cpp196
-rw-r--r--src/mame/mame.lst3
6 files changed, 219 insertions, 1 deletions
diff --git a/scripts/target/mame/mess.lua b/scripts/target/mame/mess.lua
index be788659990..78dd31a5065 100644
--- a/scripts/target/mame/mess.lua
+++ b/scripts/target/mame/mess.lua
@@ -3865,6 +3865,7 @@ files {
MAME_DIR .. "src/mame/drivers/dmv.cpp",
MAME_DIR .. "src/mame/machine/dmv_keyb.cpp",
MAME_DIR .. "src/mame/machine/dmv_keyb.h",
+ MAME_DIR .. "src/mame/drivers/dpb7000.cpp",
MAME_DIR .. "src/mame/drivers/dps1.cpp",
MAME_DIR .. "src/mame/drivers/dsb46.cpp",
MAME_DIR .. "src/mame/drivers/dual68.cpp",
diff --git a/src/devices/machine/com8116.cpp b/src/devices/machine/com8116.cpp
index 06ebfb2f5b0..7847c496b61 100644
--- a/src/devices/machine/com8116.cpp
+++ b/src/devices/machine/com8116.cpp
@@ -26,6 +26,7 @@ DEFINE_DEVICE_TYPE(COM8116_003, com8116_003_device, "com8116_003", "COM8116-003
DEFINE_DEVICE_TYPE(COM5016_5, com5016_5_device, "com5016_5", "COM5016-5 Dual BRG")
DEFINE_DEVICE_TYPE(COM5016_013, com5016_013_device, "com5016_013", "COM5016-013 Dual BRG")
DEFINE_DEVICE_TYPE(COM8116_020, com8116_020_device, "com8116_020", "COM8116-020 Dual BRG")
+DEFINE_DEVICE_TYPE(K1135AB, k1135ab_device, "k1135ab", "K1135A/B Dual BRG")
// Parts with T after the number do not have an internal oscillator and require an external clock source
// The SMC/COM 5xxx parts are all dual 5v/12v parts, while the 8xxx parts are 5v only
@@ -131,6 +132,11 @@ com8116_020_device::com8116_020_device(const machine_config &mconfig, const char
{
}
+k1135ab_device::k1135ab_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) :
+ com8116_device(mconfig, K1135AB, tag, owner, clock, divisors_16X_5_0688MHz)
+{
+}
+
//-------------------------------------------------
// device_start - device-specific startup
diff --git a/src/devices/machine/com8116.h b/src/devices/machine/com8116.h
index d073ceac91f..990a0e5db77 100644
--- a/src/devices/machine/com8116.h
+++ b/src/devices/machine/com8116.h
@@ -37,7 +37,7 @@ class com8116_device : public device_t
{
public:
// construction/destruction
- com8116_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock);
+ com8116_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock = 0);
auto fx4_handler() { return m_fx4_handler.bind(); }
auto fr_handler() { return m_fr_handler.bind(); }
@@ -132,11 +132,22 @@ public:
};
+// ======================> com8116_003_device
+
+class k1135ab_device : public com8116_device
+{
+public:
+ // construction/destruction
+ k1135ab_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock);
+};
+
+
// device type definition
DECLARE_DEVICE_TYPE(COM8116, com8116_device)
DECLARE_DEVICE_TYPE(COM8116_003, com8116_003_device)
DECLARE_DEVICE_TYPE(COM5016_5, com5016_5_device)
DECLARE_DEVICE_TYPE(COM5016_013, com5016_013_device)
DECLARE_DEVICE_TYPE(COM8116_020, com8116_020_device)
+DECLARE_DEVICE_TYPE(K1135AB, k1135ab_device)
#endif // MAME_MACHINE_COM8116_H
diff --git a/src/emu/xtal.cpp b/src/emu/xtal.cpp
index 3b7763c6e50..f454535a9e2 100644
--- a/src/emu/xtal.cpp
+++ b/src/emu/xtal.cpp
@@ -279,6 +279,7 @@ const double XTAL::known_xtals[] = {
22'032'000, /* 22.032_MHz_XTAL Intellec Series II I/O controller */
22'096'000, /* 22.096_MHz_XTAL ADDS Viewpoint 122 */
22'118'400, /* 22.1184_MHz_XTAL Amusco Poker */
+ 22'248'000, /* 22.248_MHz_XTAL Quantel DPB-7000 */
22'321'000, /* 22.321_MHz_XTAL Apple LaserWriter II NT */
22'464'000, /* 22.464_MHz_XTAL CIT-101 132-column display clock */
22'656'000, /* 22.656_MHz_XTAL Super Pinball Action (~1440x NTSC line rate) */
diff --git a/src/mame/drivers/dpb7000.cpp b/src/mame/drivers/dpb7000.cpp
new file mode 100644
index 00000000000..4e6fdbed0f0
--- /dev/null
+++ b/src/mame/drivers/dpb7000.cpp
@@ -0,0 +1,196 @@
+// license:BSD-3-Clause
+// copyright-holders:Ryan Holtz
+/***************************************************************************
+
+ DPB-7001 (c) 1981 Quantel
+
+ Skeleton Driver
+
+***************************************************************************/
+
+#include "emu.h"
+#include "bus/rs232/rs232.h"
+#include "cpu/m68000/m68000.h"
+#include "machine/6850acia.h"
+#include "machine/com8116.h"
+#include "machine/input_merger.h"
+#include "video/mc6845.h"
+#include "screen.h"
+
+class dpb7000_state : public driver_device
+{
+public:
+ dpb7000_state(const machine_config &mconfig, device_type type, const char *tag)
+ : driver_device(mconfig, type, tag)
+ , m_maincpu(*this, "maincpu")
+ , m_acia(*this, "fd%u", 0U)
+ , m_p_int(*this, "p_int")
+ , m_brg(*this, "brg")
+ , m_rs232(*this, "rs232")
+ , m_crtc(*this, "crtc")
+ , m_baud_dip(*this, "BAUD")
+ {
+ }
+
+ void dpb7000(machine_config &config);
+
+private:
+ void main_map(address_map &map);
+
+ virtual void machine_start() override;
+ virtual void machine_reset() override;
+
+ DECLARE_READ16_MEMBER(bus_error_r);
+ DECLARE_WRITE16_MEMBER(bus_error_w);
+ MC6845_UPDATE_ROW(crtc_update_row);
+ MC6845_ON_UPDATE_ADDR_CHANGED(crtc_addr_changed);
+
+ required_device<m68000_base_device> m_maincpu;
+ required_device_array<acia6850_device, 3> m_acia;
+ required_device<input_merger_device> m_p_int;
+ required_device<com8116_device> m_brg;
+ required_device<rs232_port_device> m_rs232;
+ required_device<sy6545_1_device> m_crtc;
+ required_ioport m_baud_dip;
+};
+
+void dpb7000_state::main_map(address_map &map)
+{
+ map(0x000000, 0x07ffff).rom().region("monitor", 0);
+ map(0xb00000, 0xb7ffff).rw(FUNC(dpb7000_state::bus_error_r), FUNC(dpb7000_state::bus_error_w));
+ map(0xb80000, 0xbfffff).ram(); // NB: There's probably more RAM than this.
+ map(0xfff801, 0xfff801).rw(m_crtc, FUNC(sy6545_1_device::status_r), FUNC(sy6545_1_device::address_w)).cswidth(16);
+ map(0xfff803, 0xfff803).rw(m_crtc, FUNC(sy6545_1_device::register_r), FUNC(sy6545_1_device::register_w)).cswidth(16);
+ map(0xfff805, 0xfff805).rw(m_acia[0], FUNC(acia6850_device::status_r), FUNC(acia6850_device::control_w)).cswidth(16);
+ map(0xfff807, 0xfff807).rw(m_acia[0], FUNC(acia6850_device::data_r), FUNC(acia6850_device::data_w)).cswidth(16);
+ map(0xfff811, 0xfff811).rw(m_acia[1], FUNC(acia6850_device::status_r), FUNC(acia6850_device::control_w)).cswidth(16);
+ map(0xfff813, 0xfff813).rw(m_acia[1], FUNC(acia6850_device::data_r), FUNC(acia6850_device::data_w)).cswidth(16);
+ map(0xfff815, 0xfff815).rw(m_acia[2], FUNC(acia6850_device::status_r), FUNC(acia6850_device::control_w)).cswidth(16);
+ map(0xfff817, 0xfff817).rw(m_acia[2], FUNC(acia6850_device::data_r), FUNC(acia6850_device::data_w)).cswidth(16);
+}
+
+static INPUT_PORTS_START( dpb7000 )
+ PORT_START("BAUD")
+ PORT_DIPNAME( 0x0f, 0x0e, "Baud Rate for Terminal")
+ PORT_DIPSETTING( 0x00, "50")
+ PORT_DIPSETTING( 0x01, "75")
+ PORT_DIPSETTING( 0x02, "110")
+ PORT_DIPSETTING( 0x03, "134.5")
+ PORT_DIPSETTING( 0x04, "150")
+ PORT_DIPSETTING( 0x05, "300")
+ PORT_DIPSETTING( 0x06, "600")
+ PORT_DIPSETTING( 0x07, "1200")
+ PORT_DIPSETTING( 0x08, "1800")
+ PORT_DIPSETTING( 0x09, "2000")
+ PORT_DIPSETTING( 0x0a, "2400")
+ PORT_DIPSETTING( 0x0b, "3600")
+ PORT_DIPSETTING( 0x0c, "4800")
+ PORT_DIPSETTING( 0x0e, "9600")
+ PORT_DIPSETTING( 0x0f, "19200")
+INPUT_PORTS_END
+
+void dpb7000_state::machine_start()
+{
+}
+
+void dpb7000_state::machine_reset()
+{
+ m_brg->stt_w(m_baud_dip->read());
+}
+
+MC6845_UPDATE_ROW(dpb7000_state::crtc_update_row)
+{
+}
+
+MC6845_ON_UPDATE_ADDR_CHANGED(dpb7000_state::crtc_addr_changed)
+{
+}
+
+READ16_MEMBER(dpb7000_state::bus_error_r)
+{
+ if(!machine().side_effects_disabled())
+ {
+ m_maincpu->set_buserror_details(0xb00000 + offset*2, true, m_maincpu->get_fc());
+ m_maincpu->set_input_line(M68K_LINE_BUSERROR, ASSERT_LINE);
+ m_maincpu->set_input_line(M68K_LINE_BUSERROR, CLEAR_LINE);
+ }
+ return 0xff;
+}
+
+WRITE16_MEMBER(dpb7000_state::bus_error_w)
+{
+ if(!machine().side_effects_disabled())
+ {
+ m_maincpu->set_buserror_details(0xb00000 + offset*2, false, m_maincpu->get_fc());
+ m_maincpu->set_input_line(M68K_LINE_BUSERROR, ASSERT_LINE);
+ m_maincpu->set_input_line(M68K_LINE_BUSERROR, CLEAR_LINE);
+ }
+}
+
+void dpb7000_state::dpb7000(machine_config &config)
+{
+ M68000(config, m_maincpu, 16_MHz_XTAL / 2);
+ m_maincpu->set_addrmap(AS_PROGRAM, &dpb7000_state::main_map);
+
+ INPUT_MERGER_ANY_HIGH(config, m_p_int).output_handler().set_inputline(m_maincpu, 3);
+
+ ACIA6850(config, m_acia[0], 0);
+ m_acia[0]->txd_handler().set(m_rs232, FUNC(rs232_port_device::write_txd));
+ m_acia[0]->rts_handler().set(m_rs232, FUNC(rs232_port_device::write_rts));
+ m_acia[0]->irq_handler().set_inputline(m_maincpu, 6);
+
+ ACIA6850(config, m_acia[1], 0);
+ m_acia[1]->irq_handler().set(m_p_int, FUNC(input_merger_device::in_w<0>));
+
+ ACIA6850(config, m_acia[2], 0);
+ m_acia[2]->irq_handler().set(m_p_int, FUNC(input_merger_device::in_w<1>));
+
+ RS232_PORT(config, m_rs232, default_rs232_devices, "terminal");
+ m_rs232->rxd_handler().set(m_acia[0], FUNC(acia6850_device::write_rxd));
+ m_rs232->dcd_handler().set(m_acia[0], FUNC(acia6850_device::write_dcd));
+ m_rs232->cts_handler().set(m_acia[0], FUNC(acia6850_device::write_cts));
+
+ COM8116(config, m_brg, 5.0688_MHz_XTAL); // K1355A/B
+ m_brg->ft_handler().set(m_acia[0], FUNC(acia6850_device::write_txc));
+ m_brg->ft_handler().append(m_acia[0], FUNC(acia6850_device::write_rxc));
+ m_brg->ft_handler().append(m_acia[1], FUNC(acia6850_device::write_txc));
+ m_brg->ft_handler().append(m_acia[1], FUNC(acia6850_device::write_rxc));
+ m_brg->ft_handler().append(m_acia[2], FUNC(acia6850_device::write_txc));
+ m_brg->ft_handler().append(m_acia[2], FUNC(acia6850_device::write_rxc));
+
+ screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER));
+ screen.set_refresh_hz(60);
+ screen.set_size(640, 480);
+ screen.set_visarea(0, 639, 0, 479); // Not accurate
+ screen.set_screen_update("crtc", FUNC(mc6845_device::screen_update));
+
+ SY6545_1(config, m_crtc, 22.248_MHz_XTAL / 8);
+ m_crtc->set_char_width(9);
+ m_crtc->set_show_border_area(false);
+ m_crtc->set_screen("screen");
+ m_crtc->set_update_row_callback(FUNC(dpb7000_state::crtc_update_row), this);
+ m_crtc->set_on_update_addr_change_callback(FUNC(dpb7000_state::crtc_addr_changed), this);
+}
+
+
+ROM_START( dpb7000 )
+ ROM_REGION16_BE(0x80000, "monitor", 0)
+ ROM_LOAD16_BYTE("01616a-nad-4af2.bin", 0x00001, 0x8000, CRC(a42eace6) SHA1(78c629a8afb48a95fc0a86ca762cc5b84bd9929b))
+ ROM_LOAD16_BYTE("01616a-ncd-58de.bin", 0x00000, 0x8000, CRC(f70fff2a) SHA1(a6f85d086a0c53d156eeeb157184ebcad4adecb3))
+ ROM_LOAD16_BYTE("01616a-mad-f512.bin", 0x10001, 0x8000, CRC(4c3e39f6) SHA1(443095c56481fbcadd4dcec1757d889c8f78805d))
+ ROM_LOAD16_BYTE("01616a-mcd-91f2.bin", 0x10000, 0x8000, CRC(4b6b6eb3) SHA1(1bef443d78197d33e44c708ead9604020881f67f))
+ ROM_LOAD16_BYTE("01616a-lad-0059.bin", 0x20001, 0x8000, CRC(0daf670d) SHA1(2342a43054ed141de298a1c1a6867949297bb52a))
+ ROM_LOAD16_BYTE("01616a-lcd-5639.bin", 0x20000, 0x8000, CRC(c8977d3f) SHA1(4ee9f3a883400b4771e6ae33c6e4edcd5c0b49e7))
+ ROM_LOAD16_BYTE("01616a-kad-1d9b.bin", 0x30001, 0x8000, CRC(bda7e309) SHA1(377edf2675a6736fe7ec775894858967b0e9247e))
+ ROM_LOAD16_BYTE("01616a-kcd-e51c.bin", 0x30000, 0x8000, CRC(aa05a5cc) SHA1(85dce335a72643f7640524b18cfe480a3c299f23))
+ ROM_LOAD16_BYTE("01616a-jad-47a8.bin", 0x40001, 0x8000, CRC(60fff4c9) SHA1(ba60281c0dd8627dffe07e7ea66f4eb688e74001))
+ ROM_LOAD16_BYTE("01616a-jcd-7825.bin", 0x40000, 0x8000, CRC(bb258ede) SHA1(ab8042391cd361bcd874b2f9d8fcaf20d4b2ebe7))
+ ROM_LOAD16_BYTE("01616a-iad-73a8.bin", 0x50001, 0x8000, CRC(98709fd2) SHA1(bd0f4689600e9fc49dbd8f2f326e18f8d602825e))
+ ROM_LOAD16_BYTE("01616a-icd-0562.bin", 0x50000, 0x8000, CRC(bab5274e) SHA1(3e51977da3dfe8fda089b9d2c3199acb4fed3212))
+ ROM_LOAD16_BYTE("01616a-had-d6fa.bin", 0x60001, 0x8000, CRC(70d791c5) SHA1(c281e4f27404e58ad5a80d6de1c5583cd9f3fe0e))
+ ROM_LOAD16_BYTE("01616a-hcd-9c0e.bin", 0x60000, 0x8000, CRC(938cb614) SHA1(ea7ea8a13e0ab1497691bab53090296ba51d271f))
+ ROM_LOAD16_BYTE("01616a-gcd-3ab8.bin", 0x70001, 0x8000, CRC(e9c21438) SHA1(1784ab2de1bb6023565b2e27872a0fcda25e1b1f))
+ ROM_LOAD16_BYTE("01616a-gad-397d.bin", 0x70000, 0x8000, CRC(0b95f9ed) SHA1(77126ee6c1f3dcdb8aa669ab74ff112e3f01918a))
+ROM_END
+
+COMP( 1981, dpb7000, 0, 0, dpb7000, dpb7000, dpb7000_state, empty_init, "Quantel", "DPB-7000", MACHINE_NOT_WORKING | MACHINE_NO_SOUND_HW )
diff --git a/src/mame/mame.lst b/src/mame/mame.lst
index a90af48efe3..c74398709a2 100644
--- a/src/mame/mame.lst
+++ b/src/mame/mame.lst
@@ -11828,6 +11828,9 @@ dotrikun // cabinet test board
dotrikun2 // cabinet test board
dotriman
+@source:dpb7000.cpp
+dpb7000 //
+
@source:dps1.cpp
dps1 //