summaryrefslogtreecommitdiffstatshomepage
path: root/src/devices/bus/bbc/analogue/cfa3000a.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/devices/bus/bbc/analogue/cfa3000a.cpp')
-rw-r--r--src/devices/bus/bbc/analogue/cfa3000a.cpp100
1 files changed, 100 insertions, 0 deletions
diff --git a/src/devices/bus/bbc/analogue/cfa3000a.cpp b/src/devices/bus/bbc/analogue/cfa3000a.cpp
new file mode 100644
index 00000000000..da163200c2c
--- /dev/null
+++ b/src/devices/bus/bbc/analogue/cfa3000a.cpp
@@ -0,0 +1,100 @@
+// license:BSD-3-Clause
+// copyright-holders:Nigel Barnes
+/**********************************************************************
+
+ Henson CFA 3000 Analogue
+
+**********************************************************************/
+
+
+#include "emu.h"
+#include "cfa3000a.h"
+
+//**************************************************************************
+// DEVICE DEFINITIONS
+//**************************************************************************
+
+DEFINE_DEVICE_TYPE(CFA3000_ANLG, cfa3000_anlg_device, "cfa3000a", "Henson CFA 3000 Analogue")
+
+
+//-------------------------------------------------
+// INPUT_PORTS( cfa3000a )
+//-------------------------------------------------
+
+static INPUT_PORTS_START( cfa3000a )
+ PORT_START("CHANNEL0")
+ PORT_BIT(0xff, 0x80, IPT_PADDLE) PORT_NAME("Background Intensity") PORT_SENSITIVITY(25) PORT_KEYDELTA(5) PORT_CENTERDELTA(0) PORT_REVERSE
+
+ PORT_START("CHANNEL1")
+ PORT_BIT(0xff, 0x00, IPT_UNKNOWN)
+
+ PORT_START("CHANNEL2")
+ PORT_BIT(0xff, 0x80, IPT_PADDLE) PORT_NAME("Age") PORT_SENSITIVITY(25) PORT_KEYDELTA(5) PORT_CENTERDELTA(0) PORT_REVERSE
+
+ PORT_START("CHANNEL3")
+ PORT_BIT(0xff, 0x00, IPT_UNKNOWN)
+
+ PORT_START("BUTTONS")
+ PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_UNKNOWN)
+ PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_UNKNOWN)
+INPUT_PORTS_END
+
+
+//-------------------------------------------------
+// input_ports - device-specific input ports
+//-------------------------------------------------
+
+ioport_constructor cfa3000_anlg_device::device_input_ports() const
+{
+ return INPUT_PORTS_NAME( cfa3000a );
+}
+
+
+//**************************************************************************
+// LIVE DEVICE
+//**************************************************************************
+
+//-------------------------------------------------
+// cfa3000_anlg_device - constructor
+//-------------------------------------------------
+
+cfa3000_anlg_device::cfa3000_anlg_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) :
+ device_t(mconfig, CFA3000_ANLG, tag, owner, clock),
+ device_bbc_analogue_interface(mconfig, *this),
+ m_channel(*this, "CHANNEL%u", 0),
+ m_buttons(*this, "BUTTONS")
+{
+}
+
+
+//-------------------------------------------------
+// device_start - device-specific startup
+//-------------------------------------------------
+
+void cfa3000_anlg_device::device_start()
+{
+}
+
+
+//-------------------------------------------------
+// device_reset - device-specific reset
+//-------------------------------------------------
+
+void cfa3000_anlg_device::device_reset()
+{
+}
+
+
+//**************************************************************************
+// IMPLEMENTATION
+//**************************************************************************
+
+uint8_t cfa3000_anlg_device::ch_r(int channel)
+{
+ return m_channel[channel]->read();
+}
+
+uint8_t cfa3000_anlg_device::pb_r()
+{
+ return m_buttons->read();
+}