diff options
author | 2021-06-21 13:53:49 -0700 | |
---|---|---|
committer | 2021-06-21 13:53:49 -0700 | |
commit | 32dbba7d2d4513774b2d877b4c88f2d0760bcf54 (patch) | |
tree | f9e6426cf8dc28413c456bdbcd450c85cb302422 /src/devices/bus/coco/dragon_claw.cpp | |
parent | 5522729235b3ce81c839f3932c1aadc14de59e2b (diff) | |
parent | 2709c0143a8c7009715242c135b28403eeffce8b (diff) |
Merge branch 'master' into deprecateddeprecated
Diffstat (limited to 'src/devices/bus/coco/dragon_claw.cpp')
-rw-r--r-- | src/devices/bus/coco/dragon_claw.cpp | 212 |
1 files changed, 212 insertions, 0 deletions
diff --git a/src/devices/bus/coco/dragon_claw.cpp b/src/devices/bus/coco/dragon_claw.cpp new file mode 100644 index 00000000000..a4c00b0f71a --- /dev/null +++ b/src/devices/bus/coco/dragon_claw.cpp @@ -0,0 +1,212 @@ +// license:BSD-3-Clause +// copyright-holders:Nigel Barnes +/*************************************************************************** + + The Dragon's Claw from Lucidata + + http://archive.worldofdragon.org/index.php?title=The_Dragon%27s_Claw + + The Dragon's Claw is an extension cartridge for the Dragon by Lucidata. + It features two parallel I/O ports. One with the BBC User Port pinout, + and the second with a Centronics Printer Port pinout. + +***************************************************************************/ + +#include "emu.h" +#include "dragon_claw.h" +#include "bus/bbc/userport/userport.h" +#include "bus/centronics/ctronics.h" + + +//************************************************************************** +// GLOBAL VARIABLES +//************************************************************************** + +DEFINE_DEVICE_TYPE_PRIVATE(DRAGON_CLAW, device_cococart_interface, dragon_claw_device, "dragon_claw", "The Dragon's Claw") + +//------------------------------------------------- +// INPUT_PORTS( claw ) +//------------------------------------------------- + +INPUT_PORTS_START(claw) + PORT_START("LINKS") + PORT_CONFNAME(0x03, 0x00, "L1 Address Selection") + PORT_CONFSETTING(0x00, "$FF80") + PORT_CONFSETTING(0x01, "$FF90") + PORT_CONFSETTING(0x02, "$FFA0") + PORT_CONFSETTING(0x03, "$FFB0") + PORT_CONFNAME(0x04, 0x00, "L2 Interrupt Line") + PORT_CONFSETTING(0x00, "NMI") + PORT_CONFSETTING(0x04, "CART") +INPUT_PORTS_END + + +//------------------------------------------------- +// input_ports - device-specific input ports +//------------------------------------------------- + +ioport_constructor dragon_claw_device::device_input_ports() const +{ + return INPUT_PORTS_NAME(claw); +} + + +//************************************************************************** +// LIVE DEVICE +//************************************************************************** + +//------------------------------------------------- +// dragon_claw_device - constructor +//------------------------------------------------- + +dragon_claw_device::dragon_claw_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock) + : device_t(mconfig, DRAGON_CLAW, tag, owner, clock) + , device_cococart_interface(mconfig, *this ) + , m_via(*this, "via") + , m_slot(*this, "slot") + , m_links(*this, "LINKS") +{ +} + +//------------------------------------------------- +// device_start - device-specific startup +//------------------------------------------------- + +void dragon_claw_device::device_start() +{ +} + +//------------------------------------------------- +// device_reset - device-specific reset +//------------------------------------------------- + +void dragon_claw_device::device_reset() +{ + uint8_t addr = (m_links->read() & 0x03) << 8; + + install_readwrite_handler(0xff80 | addr, 0xff8f | addr, read8sm_delegate(*m_via, FUNC(via6522_device::read)), write8sm_delegate(*m_via, FUNC(via6522_device::write))); +} + +static void dragon_cart(device_slot_interface &device) +{ + dragon_cart_add_basic_devices(device); + dragon_cart_add_fdcs(device); +} + +//------------------------------------------------- +// device_add_mconfig - add device configuration +//------------------------------------------------- + +void dragon_claw_device::device_add_mconfig(machine_config &config) +{ + MOS6522(config, m_via, DERIVED_CLOCK(1, 1)); + m_via->writepa_handler().set("cent_data_out", FUNC(output_latch_device::write)); + m_via->readpb_handler().set("userport", FUNC(bbc_userport_slot_device::pb_r)); + m_via->writepb_handler().set("userport", FUNC(bbc_userport_slot_device::pb_w)); + m_via->ca2_handler().set("centronics", FUNC(centronics_device::write_strobe)); + m_via->cb1_handler().set("userport", FUNC(bbc_userport_slot_device::write_cb1)); + m_via->cb2_handler().set("userport", FUNC(bbc_userport_slot_device::write_cb2)); + m_via->irq_handler().set(FUNC(dragon_claw_device::irq_w)); // link L2 selects either NMI or CART line + + bbc_userport_slot_device &userport(BBC_USERPORT_SLOT(config, "userport", bbc_userport_devices, nullptr)); + userport.cb1_handler().set(m_via, FUNC(via6522_device::write_cb1)); + userport.cb2_handler().set(m_via, FUNC(via6522_device::write_cb2)); + + centronics_device ¢ronics(CENTRONICS(config, "centronics", centronics_devices, nullptr)); + centronics.ack_handler().set(m_via, FUNC(via6522_device::write_ca1)); + output_latch_device &latch(OUTPUT_LATCH(config, "cent_data_out")); + centronics.set_output_latch(latch); + + COCOCART_SLOT(config, m_slot, DERIVED_CLOCK(1, 1), dragon_cart, nullptr); + m_slot->cart_callback().set([this](int state) { set_line_value(line::CART, state); }); + m_slot->nmi_callback().set([this](int state) { set_line_value(line::NMI, state); }); + m_slot->halt_callback().set([this](int state) { set_line_value(line::HALT, state); }); +} + +WRITE_LINE_MEMBER(dragon_claw_device::irq_w) +{ + if (m_links->read() & 0x04) + set_line_value(line::CART, state); + else + set_line_value(line::NMI, state); +} + + +//------------------------------------------------- +// set_sound_enable +//------------------------------------------------- + +void dragon_claw_device::set_sound_enable(bool sound_enable) +{ + m_slot->set_line_value(line::SOUND_ENABLE, sound_enable ? line_value::ASSERT : line_value::CLEAR); +} + + +//------------------------------------------------- +// get_cart_base +//------------------------------------------------- + +u8 *dragon_claw_device::get_cart_base() +{ + return m_slot->get_cart_base(); +} + + +//------------------------------------------------- +// get_cart_size +//------------------------------------------------- + +u32 dragon_claw_device::get_cart_size() +{ + return m_slot->get_cart_size(); +} + + +//------------------------------------------------- +// cts_read +//------------------------------------------------- + +u8 dragon_claw_device::cts_read(offs_t offset) +{ + return m_slot->cts_read(offset); +} + + +//------------------------------------------------- +// cts_write +//------------------------------------------------- + +void dragon_claw_device::cts_write(offs_t offset, u8 data) +{ + m_slot->cts_write(offset, data); +} + + +//------------------------------------------------- +// scs_read +//------------------------------------------------- + +u8 dragon_claw_device::scs_read(offs_t offset) +{ + return m_slot->scs_read(offset); +} + + +//------------------------------------------------- +// scs_write +//------------------------------------------------- + +void dragon_claw_device::scs_write(offs_t offset, u8 data) +{ + m_slot->scs_write(offset, data); +} + + +//------------------------------------------------- +// cartridge_space +//------------------------------------------------- + +address_space &dragon_claw_device::cartridge_space() +{ + return device_cococart_interface::cartridge_space(); +} |