// license:BSD-3-Clause
// copyright-holders:Aaron Giles
/*************************************************************************
Sega vector hardware
*************************************************************************/
#include "emu.h"
#include "audio/segag80.h"
#include "audio/nl_astrob.h"
#include "audio/nl_elim.h"
#include "audio/nl_spacfury.h"
#include "includes/segag80v.h"
#include "sound/samples.h"
/*************************************
*
* Base class
*
*************************************/
segag80_audio_device_base::segag80_audio_device_base(const machine_config &mconfig, device_type type, const char *tag, device_t *owner, u32 clock, u8 lomask, u8 himask, bool haspsg, netlist_ptr netlist, double output_scale) :
device_t(mconfig, type, tag, owner, clock),
device_mixer_interface(mconfig, *this),
m_lo_input(*this, "sound_nl:lo_%u", 0),
m_hi_input(*this, "sound_nl:hi_%u", 0),
m_psg(*this, "psg"),
m_lo_mask(lomask),
m_hi_mask(himask),
m_has_psg(haspsg),
m_netlist(netlist),
m_output_scale(output_scale)
{
}
void segag80_audio_device_base::device_add_mconfig(machine_config &config)
{
NETLIST_SOUND(config, "sound_nl", 48000)
.set_source(m_netlist)
.add_route(ALL_OUTPUTS, *this, 1.0);
if (BIT(m_lo_mask, 0))
NETLIST_LOGIC_INPUT(config, m_lo_input[0], "I_LO_D0.IN", 0);
if (BIT(m_lo_mask, 1))
NETLIST_LOGIC_INPUT(config, m_lo_input[1], "I_LO_D1.IN", 0);
if (BIT(m_lo_mask, 2))
NETLIST_LOGIC_INPUT(config, m_lo_input[2], "I_LO_D2.IN", 0);
if (BIT(m_lo_mask, 3))
NETLIST_LOGIC_INPUT(config, m_lo_input[3], "I_LO_D3.IN", 0);
if (BIT(m_lo_mask, 4))
NETLIST_LOGIC_INPUT(config, m_lo_input[4], "I_LO_D4.IN", 0);
if (BIT(m_lo_mask, 5))
NETLIST_LOGIC_INPUT(config, m_lo_input[5], "I_LO_D5.IN", 0);
if (BIT(m_lo_mask, 6))
NETLIST_LOGIC_INPUT(config, m_lo_input[6], "I_LO_D6.IN", 0);
if (BIT(m_lo_mask, 7))
NETLIST_LOGIC_INPUT(config, m_lo_input[7], "I_LO_D7.IN", 0);
if (BIT(m_hi_mask, 0))
NETLIST_LOGIC_INPUT(config, m_hi_input[0], "I_HI_D0.IN", 0);
if (BIT(m_hi_mask, 1))
NETLIST_LOGIC_INPUT(config, m_hi_input[1], "I_HI_D1.IN", 0);
if (BIT(m_hi_mask, 2))
NETLIST_LOGIC_INPUT(config, m_hi_input[2], "I_HI_D2.IN", 0);
if (BIT(m_hi_mask, 3))
NETLIST_LOGIC_INPUT(config, m_hi_input[3], "I_HI_D3.IN", 0);
if (BIT(m_hi_mask, 4))
NETLIST_LOGIC_INPUT(config, m_hi_input[4], "I_HI_D4.IN", 0);
if (BIT(m_hi_mask, 5))
NETLIST_LOGIC_INPUT(config, m_hi_input[5], "I_HI_D5.IN", 0);
if (BIT(m_hi_mask, 6))
NETLIST_LOGIC_INPUT(config, m_hi_input[6], "I_HI_D6.IN", 0);
if (BIT(m_hi_mask, 7))
NETLIST_LOGIC_INPUT(config, m_hi_input[7], "I_HI_D7.IN", 0);
if (m_has_psg)
{
AY8912(config, m_psg, VIDEO_CLOCK/4/2);
m_psg->set_flags(AY8910_RESISTOR_OUTPUT);
m_psg->set_resistors_load(10000.0, 10000.0, 10000.0);
m_psg->add_route(0, "sound_nl", 1.0, 0);
m_psg->add_route(1, "sound_nl", 1.0, 1);
m_psg->add_route(2, "sound_nl", 1.0, 2);
NETLIST_STREAM_INPUT(config, "sound_nl:cin0", 0, "R_PSG_1.R");
NETLIST_STREAM_INPUT(config, "sound_nl:cin1", 1, "R_PSG_2.R");
NETLIST_STREAM_INPUT(config, "sound_nl:cin2", 2, "R_PSG_3.R");
}
NETLIST_STREAM_OUTPUT(config, "sound_nl:cout0", 0, "OUTPUT").set_mult_offset(m_output_scale, 0.0);
}
void segag80_audio_device_base::device_start()
{
}
void segag80_audio_device_base::write(offs_t addr, uint8_t data)
{
addr &= 1;
auto &inputs = (addr == 0) ? m_lo_input : m_hi_input;
auto &mask = (addr == 0) ? m_lo_mask : m_hi_mask;
for (int bit = 0; bit < 8; bit++)
if (BIT(mask, bit))
inputs[bit]->write_line(BIT(data, bit));
}
void segag80_audio_device_base::write_ay(offs_t addr, uint8_t data)
{
assert(m_has_psg);
m_psg->address_data_w(addr, data);
}
/*************************************
*
* Eliminator
*
*************************************/
DEFINE_DEVICE_TYPE(ELIMINATOR_AUDIO, elim_audio_device, "elim_audio", "Eliminator Sound Board")
elim_audio_device::elim_audio_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock) :
segag80_audio_device_base(mconfig, ELIMINATOR_AUDIO, tag, owner, clock, 0xfe, 0xff, false, NETLIST_NAME(elim), 0.15)
{
}
/*************************************
*
* Zektor
*
*************************************/
DEFINE_DEVICE_TYPE(ZEKTOR_AUDIO, zektor_audio_device, "zektor_audio", "Zektor Sound Board")
zektor_audio_device::zektor_audio_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock) :
segag80_audio_device_base(mconfig, ZEKTOR_AUDIO, tag, owner, clock, 0xfe, 0xff, true, NETLIST_NAME(zektor), 0.15)
{
}
/*************************************
*
* Space Fury
*
*************************************/
DEFINE_DEVICE_TYPE(SPACE_FURY_AUDIO, spacfury_audio_device, "spcfury_audio", "Space Fury Sound Board")
spacfury_audio_device::spacfury_audio_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock) :
segag80_audio_device_base(mconfig, SPACE_FURY_AUDIO, tag, owner, clock, 0xc7, 0x3f, false, NETLIST_NAME(spacfury), 2.0)
{
}
/*************************************
*
* Astro Blaster
*
*************************************/
DEFINE_DEVICE_TYPE(ASTRO_BLASTER_AUDIO, astrob_audio_device, "astrob_audio", "Astro Blaster Sound Board")
astrob_audio_device::astrob_audio_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock) :
segag80_audio_device_base(mconfig, ASTRO_BLASTER_AUDIO, tag, owner, clock, 0xff, 0xff, false, NETLIST_NAME(astrob), 1.0)
{
}