From 501157fbeda6735c02ed5350722e7115496dc2b5 Mon Sep 17 00:00:00 2001
From: arbee <rb6502@users.noreply.github.com>
Date: Sun, 23 Aug 2020 12:02:42 -0400
Subject: [PATCH] apple2: add SC-01 speech to the Mockingboard emulation [R.
 Belmont, O. Galibert]

---
 src/devices/bus/a2bus/a2mockingboard.cpp | 66 +++++++++++++++++++++++-
 src/devices/bus/a2bus/a2mockingboard.h   | 14 +++++
 2 files changed, 78 insertions(+), 2 deletions(-)

diff --git a/src/devices/bus/a2bus/a2mockingboard.cpp b/src/devices/bus/a2bus/a2mockingboard.cpp
index 93d8ba084c9..167c7dc2f6f 100644
--- a/src/devices/bus/a2bus/a2mockingboard.cpp
+++ b/src/devices/bus/a2bus/a2mockingboard.cpp
@@ -30,7 +30,7 @@
 //  GLOBAL VARIABLES
 //**************************************************************************
 
-DEFINE_DEVICE_TYPE(A2BUS_MOCKINGBOARD, a2bus_mockingboard_device, "a2mockbd", "Sweet Micro Systems Mockingboard")
+DEFINE_DEVICE_TYPE(A2BUS_MOCKINGBOARD, a2bus_mockingboard_device, "a2mockbd", "Sweet Micro Systems Mockingboard Sound/Speech I")
 DEFINE_DEVICE_TYPE(A2BUS_PHASOR,       a2bus_phasor_device,       "a2phasor", "Applied Engineering Phasor")
 DEFINE_DEVICE_TYPE(A2BUS_ECHOPLUS,     a2bus_echoplus_device,     "a2echop",  "Street Electronics Echo Plus")
 
@@ -64,6 +64,22 @@ void a2bus_ayboard_device::device_add_mconfig(machine_config &config)
 	m_ay2->add_route(ALL_OUTPUTS, "rspeaker", 1.0);
 }
 
+void a2bus_mockingboard_device::device_add_mconfig(machine_config &config)
+{
+	add_common_devices(config);
+
+	m_via1->writepb_handler().set(FUNC(a2bus_mockingboard_device::via1_out_b));
+	m_via1->cb2_handler().set(FUNC(a2bus_mockingboard_device::write_via1_cb2));
+
+	AY8913(config, m_ay2, 1022727);
+	m_ay2->add_route(ALL_OUTPUTS, "rspeaker", 1.0);
+
+	VOTRAX_SC01(config, m_sc01, 1022727);
+	m_sc01->ar_callback().set(m_via1, FUNC(via6522_device::write_cb1));
+	m_sc01->add_route(ALL_OUTPUTS, "lspeaker", 1.0);
+	m_sc01->add_route(ALL_OUTPUTS, "rspeaker", 1.0);
+}
+
 void a2bus_phasor_device::device_add_mconfig(machine_config &config)
 {
 	add_common_devices(config);
@@ -111,7 +127,8 @@ a2bus_ayboard_device::a2bus_ayboard_device(const machine_config &mconfig, device
 }
 
 a2bus_mockingboard_device::a2bus_mockingboard_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) :
-	a2bus_ayboard_device(mconfig, A2BUS_MOCKINGBOARD, tag, owner, clock)
+	a2bus_ayboard_device(mconfig, A2BUS_MOCKINGBOARD, tag, owner, clock),
+	m_sc01(*this, "sc01")
 {
 }
 
@@ -429,3 +446,48 @@ void a2bus_echoplus_device::write_c0nx(uint8_t offset, uint8_t data)
 			break;
 	}
 }
+
+void a2bus_mockingboard_device::device_reset()
+{
+	m_porta1 = m_porta2 = m_portb1 = 0;
+	m_last_cb2_state = ASSERT_LINE;
+}
+
+WRITE_LINE_MEMBER( a2bus_mockingboard_device::write_via1_cb2 )
+{
+	if ((state == CLEAR_LINE) && (m_last_cb2_state == ASSERT_LINE))
+	{
+		m_sc01->write(m_portb1);
+	}
+	m_last_cb2_state = state;
+}
+
+void a2bus_mockingboard_device::via1_out_b(uint8_t data)
+{
+	m_portb1 = data;
+
+	if (!BIT(data, 2))
+	{
+		m_ay1->reset_w();
+	}
+	else
+	{
+		switch (data & 3)
+		{
+			case 0: // BDIR=0, BC1=0 (inactive)
+				break;
+
+			case 1: // BDIR=0, BC1=1 (read PSG)
+				m_porta1 = m_ay1->data_r();
+				break;
+
+			case 2: // BDIR=1, BC1=0 (write PSG)
+				m_ay1->data_w(m_porta1);
+				break;
+
+			case 3: // BDIR=1, BC1=1 (latch)
+				m_ay1->address_w(m_porta1);
+				break;
+		}
+	}
+}
diff --git a/src/devices/bus/a2bus/a2mockingboard.h b/src/devices/bus/a2bus/a2mockingboard.h
index a7287f8e734..6d4aa8e73af 100644
--- a/src/devices/bus/a2bus/a2mockingboard.h
+++ b/src/devices/bus/a2bus/a2mockingboard.h
@@ -15,6 +15,7 @@
 #include "machine/6522via.h"
 #include "sound/ay8910.h"
 #include "sound/tms5220.h"
+#include "sound/votrax.h"
 
 //**************************************************************************
 //  TYPE DEFINITIONS
@@ -61,6 +62,19 @@ class a2bus_mockingboard_device : public a2bus_ayboard_device
 {
 public:
 	a2bus_mockingboard_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock);
+
+	virtual void via1_out_b(uint8_t data) override;
+protected:
+	virtual void device_add_mconfig(machine_config &config) override;
+	virtual void device_reset() override;
+
+	required_device<votrax_sc01_device> m_sc01;
+
+private:
+	DECLARE_WRITE_LINE_MEMBER(write_via1_cb2);
+
+	uint8_t m_portb1;
+	int m_last_cb2_state;
 };
 
 class a2bus_phasor_device : public a2bus_ayboard_device