1
/***************************************************************************
3
Cyberball 68000 sound simulator
5
****************************************************************************/
9
#include "sound/2151intf.h"
10
#include "machine/atarigen.h"
11
#include "includes/cyberbal.h"
14
static void update_sound_68k_interrupts(running_machine &machine);
18
void cyberbal_sound_reset(running_machine &machine)
20
cyberbal_state *state = machine.driver_data<cyberbal_state>();
22
/* reset the sound system */
23
state->m_bank_base = &machine.region("audiocpu")->base()[0x10000];
24
memory_set_bankptr(machine, "soundbank", &state->m_bank_base[0x0000]);
25
state->m_fast_68k_int = state->m_io_68k_int = 0;
26
state->m_sound_data_from_68k = state->m_sound_data_from_6502 = 0;
27
state->m_sound_data_from_68k_ready = state->m_sound_data_from_6502_ready = 0;
32
/*************************************
34
* 6502 Sound Interface
36
*************************************/
38
READ8_HANDLER( cyberbal_special_port3_r )
40
cyberbal_state *state = space->machine().driver_data<cyberbal_state>();
41
int temp = input_port_read(space->machine(), "JSAII");
42
if (!(input_port_read(space->machine(), "IN0") & 0x8000)) temp ^= 0x80;
43
if (state->m_cpu_to_sound_ready) temp ^= 0x40;
44
if (state->m_sound_to_cpu_ready) temp ^= 0x20;
49
READ8_HANDLER( cyberbal_sound_6502_stat_r )
51
cyberbal_state *state = space->machine().driver_data<cyberbal_state>();
53
if (state->m_sound_data_from_6502_ready) temp ^= 0x80;
54
if (state->m_sound_data_from_68k_ready) temp ^= 0x40;
59
WRITE8_HANDLER( cyberbal_sound_bank_select_w )
61
cyberbal_state *state = space->machine().driver_data<cyberbal_state>();
62
memory_set_bankptr(space->machine(), "soundbank", &state->m_bank_base[0x1000 * ((data >> 6) & 3)]);
63
coin_counter_w(space->machine(), 1, (data >> 5) & 1);
64
coin_counter_w(space->machine(), 0, (data >> 4) & 1);
65
cputag_set_input_line(space->machine(), "dac", INPUT_LINE_RESET, (data & 0x08) ? CLEAR_LINE : ASSERT_LINE);
66
if (!(data & 0x01)) devtag_reset(space->machine(), "ymsnd");
70
READ8_HANDLER( cyberbal_sound_68k_6502_r )
72
cyberbal_state *state = space->machine().driver_data<cyberbal_state>();
73
state->m_sound_data_from_68k_ready = 0;
74
return state->m_sound_data_from_68k;
78
WRITE8_HANDLER( cyberbal_sound_68k_6502_w )
80
cyberbal_state *state = space->machine().driver_data<cyberbal_state>();
82
state->m_sound_data_from_6502 = data;
83
state->m_sound_data_from_6502_ready = 1;
85
if (!state->m_io_68k_int)
87
state->m_io_68k_int = 1;
88
update_sound_68k_interrupts(space->machine());
94
/*************************************
96
* 68000 Sound Interface
98
*************************************/
100
static void update_sound_68k_interrupts(running_machine &machine)
102
cyberbal_state *state = machine.driver_data<cyberbal_state>();
103
cputag_set_input_line(machine, "dac", 6, state->m_fast_68k_int ? ASSERT_LINE : CLEAR_LINE);
104
cputag_set_input_line(machine, "dac", 2, state->m_io_68k_int ? ASSERT_LINE : CLEAR_LINE);
108
INTERRUPT_GEN( cyberbal_sound_68k_irq_gen )
110
cyberbal_state *state = device->machine().driver_data<cyberbal_state>();
111
if (!state->m_fast_68k_int)
113
state->m_fast_68k_int = 1;
114
update_sound_68k_interrupts(device->machine());
119
WRITE16_HANDLER( cyberbal_io_68k_irq_ack_w )
121
cyberbal_state *state = space->machine().driver_data<cyberbal_state>();
122
if (state->m_io_68k_int)
124
state->m_io_68k_int = 0;
125
update_sound_68k_interrupts(space->machine());
130
READ16_HANDLER( cyberbal_sound_68k_r )
132
cyberbal_state *state = space->machine().driver_data<cyberbal_state>();
133
int temp = (state->m_sound_data_from_6502 << 8) | 0xff;
135
state->m_sound_data_from_6502_ready = 0;
137
if (state->m_sound_data_from_6502_ready) temp ^= 0x08;
138
if (state->m_sound_data_from_68k_ready) temp ^= 0x04;
143
WRITE16_HANDLER( cyberbal_sound_68k_w )
145
cyberbal_state *state = space->machine().driver_data<cyberbal_state>();
146
if (ACCESSING_BITS_8_15)
148
state->m_sound_data_from_68k = (data >> 8) & 0xff;
149
state->m_sound_data_from_68k_ready = 1;
154
WRITE16_HANDLER( cyberbal_sound_68k_dac_w )
156
cyberbal_state *state = space->machine().driver_data<cyberbal_state>();
157
device_t *dac = space->machine().device((offset & 8) ? "dac2" : "dac1");
158
dac_data_16_w(dac, (((data >> 3) & 0x800) | ((data >> 2) & 0x7ff)) << 4);
160
if (state->m_fast_68k_int)
162
state->m_fast_68k_int = 0;
163
update_sound_68k_interrupts(space->machine());