void bally_as3022_device::device_add_mconfig(machine_config &config)
{
M6808(config, m_cpu, DERIVED_CLOCK(1, 1));
m_cpu->set_addrmap(AS_PROGRAM, &bally_as3022_device::as3022_map);
PIA6821(config, m_pia, 0);
m_pia->readpa_handler().set(FUNC(bally_as3022_device::pia_porta_r));
m_pia->writepa_handler().set(FUNC(bally_as3022_device::pia_porta_w));
m_pia->writepb_handler().set(FUNC(bally_as3022_device::pia_portb_w));
m_pia->cb2_handler().set(FUNC(bally_as3022_device::pia_cb2_w));
m_pia->irqa_handler().set(FUNC(bally_as3022_device::irq_w));
m_pia->irqb_handler().set(FUNC(bally_as3022_device::irq_w));
AY8910(config, m_ay, DERIVED_CLOCK(1, 4));
m_ay->port_a_read_callback().set(FUNC(bally_as3022_device::ay_io_r));
m_ay->add_route(ALL_OUTPUTS, *this, 0.33, AUTO_ALLOC_INPUT, 0);
}
void s4_state::s4a(machine_config &config)
{
s4(config);
/* Add the soundcard */
M6808(config, m_audiocpu, 3580000);
m_audiocpu->set_addrmap(AS_PROGRAM, &s4_state::s4_audio_map);
MCFG_MACHINE_RESET_OVERRIDE(s4_state, s4a)
SPEAKER(config, "speaker").front_center();
MC1408(config, "dac", 0).add_route(ALL_OUTPUTS, "speaker", 0.5);
voltage_regulator_device &vref(VOLTAGE_REGULATOR(config, "vref"));
vref.add_route(0, "dac", 1.0, DAC_VREF_POS_INPUT);
vref.add_route(0, "dac", -1.0, DAC_VREF_NEG_INPUT);
PIA6821(config, m_pias, 0);
m_pias->readpb_handler().set(FUNC(s4_state::sound_r));
m_pias->writepa_handler().set("dac", FUNC(dac_byte_interface::data_w));
m_pias->irqa_handler().set_inputline("audiocpu", M6808_IRQ_LINE);
m_pias->irqb_handler().set_inputline("audiocpu", M6808_IRQ_LINE);
}
void goupil_base_state::base(machine_config &config)
{
M6808(config, m_maincpu, CPU_CLOCK);
SCREEN(config, m_screen, SCREEN_TYPE_RASTER);
m_screen->set_refresh_hz(50);
// TODO: sound hardware
ACIA6850(config, m_acia, 0);
// TODO: Is this specific to the G1?
VIA6522(config, m_via_video, CPU_CLOCK / 4);
VIA6522(config, m_via_keyb, CPU_CLOCK / 4);
m_via_keyb->irq_handler().set_inputline(m_maincpu, M6808_IRQ_LINE);
VIA6522(config, m_via_modem, CPU_CLOCK / 4);
m_via_modem->irq_handler().set_inputline(m_maincpu, M6808_IRQ_LINE);
/* Floppy */
FD1791(config, m_fdc, 8_MHz_XTAL);
FLOPPY_CONNECTOR(config, m_floppy0, goupil_floppies, "525qd", floppy_image_device::default_floppy_formats);
FLOPPY_CONNECTOR(config, m_floppy1, goupil_floppies, "525qd", floppy_image_device::default_floppy_formats);
i8279_device &i8279_kb1(I8279(config, "i8279_kb1", CPU_CLOCK));
i8279_kb1.out_sl_callback().set(FUNC(goupil_g1_state::scanlines_kbd1_w)); // scan SL lines
i8279_kb1.in_rl_callback().set(FUNC(goupil_g1_state::kbd1_r)); // kbd RL lines
i8279_kb1.in_shift_callback().set(FUNC(goupil_g1_state::shift_kb1_r));
i8279_kb1.in_ctrl_callback().set(FUNC(goupil_g1_state::ctrl_kb1_r));
i8279_kb1.out_irq_callback().set(m_via_keyb, FUNC(via6522_device::write_ca1));
i8279_device &i8279_kb2(I8279(config, "i8279_kb2", CPU_CLOCK));
i8279_kb2.out_sl_callback().set(FUNC(goupil_g1_state::scanlines_kbd2_w)); // scan SL lines
i8279_kb2.in_rl_callback().set(FUNC(goupil_g1_state::kbd2_r)); // kbd RL lines
i8279_kb2.in_shift_callback().set_constant(1);
i8279_kb2.in_ctrl_callback().set_constant(1);
}
void s6_state::s6(machine_config &config)
{
/* basic machine hardware */
M6808(config, m_maincpu, 3580000); // 6802 or 6808 could be used here
m_maincpu->set_addrmap(AS_PROGRAM, &s6_state::s6_main_map);
MCFG_MACHINE_RESET_OVERRIDE(s6_state, s6)
/* Video */
config.set_default_layout(layout_s6);
/* Sound */
genpin_audio(config);
/* Devices */
PIA6821(config, m_pia22, 0);
m_pia22->writepa_handler().set(FUNC(s6_state::sol0_w));
m_pia22->writepb_handler().set(FUNC(s6_state::sol1_w));
m_pia22->ca2_handler().set(FUNC(s6_state::pia22_ca2_w));
m_pia22->cb2_handler().set(FUNC(s6_state::pia22_cb2_w));
m_pia22->irqa_handler().set(FUNC(s6_state::pia_irq));
m_pia22->irqb_handler().set(FUNC(s6_state::pia_irq));
PIA6821(config, m_pia24, 0);
m_pia24->writepa_handler().set(FUNC(s6_state::lamp0_w));
m_pia24->writepb_handler().set(FUNC(s6_state::lamp1_w));
m_pia24->ca2_handler().set(FUNC(s6_state::pia24_ca2_w));
m_pia24->cb2_handler().set(FUNC(s6_state::pia24_cb2_w));
m_pia24->irqa_handler().set(FUNC(s6_state::pia_irq));
m_pia24->irqb_handler().set(FUNC(s6_state::pia_irq));
PIA6821(config, m_pia28, 0);
m_pia28->readpa_handler().set(FUNC(s6_state::dips_r));
m_pia28->writepa_handler().set(FUNC(s6_state::dig0_w));
m_pia28->writepb_handler().set(FUNC(s6_state::dig1_w));
m_pia28->ca2_handler().set(FUNC(s6_state::pia28_ca2_w));
m_pia28->cb2_handler().set(FUNC(s6_state::pia28_cb2_w));
m_pia28->irqa_handler().set(FUNC(s6_state::pia_irq));
m_pia28->irqb_handler().set(FUNC(s6_state::pia_irq));
PIA6821(config, m_pia30, 0);
m_pia30->readpa_handler().set(FUNC(s6_state::switch_r));
m_pia30->writepb_handler().set(FUNC(s6_state::switch_w));
m_pia30->ca2_handler().set(FUNC(s6_state::pia30_ca2_w));
m_pia30->cb2_handler().set(FUNC(s6_state::pia30_cb2_w));
m_pia30->irqa_handler().set(FUNC(s6_state::pia_irq));
m_pia30->irqb_handler().set(FUNC(s6_state::pia_irq));
NVRAM(config, "nvram", nvram_device::DEFAULT_ALL_0);
/* Add the soundcard */
M6802(config, m_audiocpu, 3580000);
m_audiocpu->set_addrmap(AS_PROGRAM, &s6_state::s6_audio_map);
SPEAKER(config, "speaker").front_center();
MC1408(config, "dac", 0).add_route(ALL_OUTPUTS, "speaker", 0.5);
voltage_regulator_device &vref(VOLTAGE_REGULATOR(config, "vref"));
vref.add_route(0, "dac", 1.0, DAC_VREF_POS_INPUT);
vref.add_route(0, "dac", -1.0, DAC_VREF_NEG_INPUT);
SPEAKER(config, "speech").front_center();
HC55516(config, m_hc55516, 0).add_route(ALL_OUTPUTS, "speech", 1.00);
PIA6821(config, m_pias, 0);
m_pias->readpb_handler().set(FUNC(s6_state::sound_r));
m_pias->writepa_handler().set("dac", FUNC(dac_byte_interface::data_w));
m_pias->ca2_handler().set(m_hc55516, FUNC(hc55516_device::digit_w));
m_pias->cb2_handler().set(m_hc55516, FUNC(hc55516_device::clock_w));
m_pias->irqa_handler().set_inputline(m_audiocpu, M6802_IRQ_LINE); // FIXME: needs an input merger
m_pias->irqb_handler().set_inputline(m_audiocpu, M6802_IRQ_LINE);
}