diff options
Diffstat (limited to 'src/mame/machine/lsasquad.c')
-rw-r--r-- | src/mame/machine/lsasquad.c | 192 |
1 files changed, 192 insertions, 0 deletions
diff --git a/src/mame/machine/lsasquad.c b/src/mame/machine/lsasquad.c new file mode 100644 index 00000000000..cd054fe2f9b --- /dev/null +++ b/src/mame/machine/lsasquad.c @@ -0,0 +1,192 @@ +#include "driver.h" +#include "cpu/z80/z80.h" + + +/* coin inputs are inverted in storming */ +int lsasquad_invertcoin; + + +/*************************************************************************** + + main <-> sound CPU communication + +***************************************************************************/ + +static int sound_nmi_enable,pending_nmi,sound_cmd,sound_result; +int lsasquad_sound_pending; + +static TIMER_CALLBACK( nmi_callback ) +{ + if (sound_nmi_enable) cpunum_set_input_line(1,INPUT_LINE_NMI,PULSE_LINE); + else pending_nmi = 1; +} + +WRITE8_HANDLER( lsasquad_sh_nmi_disable_w ) +{ + sound_nmi_enable = 0; +} + +WRITE8_HANDLER( lsasquad_sh_nmi_enable_w ) +{ + sound_nmi_enable = 1; + if (pending_nmi) + { + cpunum_set_input_line(1,INPUT_LINE_NMI,PULSE_LINE); + pending_nmi = 0; + } +} + +WRITE8_HANDLER( lsasquad_sound_command_w ) +{ + lsasquad_sound_pending |= 0x01; + sound_cmd = data; +//logerror("%04x: sound cmd %02x\n",activecpu_get_pc(),data); + timer_call_after_resynch(data,nmi_callback); +} + +READ8_HANDLER( lsasquad_sh_sound_command_r ) +{ + lsasquad_sound_pending &= ~0x01; +//logerror("%04x: read sound cmd %02x\n",activecpu_get_pc(),sound_cmd); + return sound_cmd; +} + +WRITE8_HANDLER( lsasquad_sh_result_w ) +{ + lsasquad_sound_pending |= 0x02; +//logerror("%04x: sound res %02x\n",activecpu_get_pc(),data); + sound_result = data; +} + +READ8_HANDLER( lsasquad_sound_result_r ) +{ + lsasquad_sound_pending &= ~0x02; +//logerror("%04x: read sound res %02x\n",activecpu_get_pc(),sound_result); + return sound_result; +} + +READ8_HANDLER( lsasquad_sound_status_r ) +{ + /* bit 0: message pending for sound cpu */ + /* bit 1: message pending for main cpu */ + return lsasquad_sound_pending; +} + + +READ8_HANDLER( daikaiju_sh_sound_command_r ) +{ + lsasquad_sound_pending &= ~0x01; + lsasquad_sound_pending |= 0x02; +//logerror("%04x: read sound cmd %02x\n",activecpu_get_pc(),sound_cmd); + return sound_cmd; +} + +READ8_HANDLER( daikaiju_sound_status_r ) +{ + /* bit 0: message pending for sound cpu */ + /* bit 1: message pending for main cpu */ + return lsasquad_sound_pending^3; +} + + +/*************************************************************************** + + LSA Squad 68705 protection interface + + The following is ENTIRELY GUESSWORK!!! + +***************************************************************************/ + +static UINT8 from_main,from_mcu; +static int mcu_sent = 0,main_sent = 0; + +static UINT8 portA_in,portA_out,ddrA; + +READ8_HANDLER( lsasquad_68705_portA_r ) +{ +//logerror("%04x: 68705 port A read %02x\n",activecpu_get_pc(),portA_in); + return (portA_out & ddrA) | (portA_in & ~ddrA); +} + +WRITE8_HANDLER( lsasquad_68705_portA_w ) +{ +//logerror("%04x: 68705 port A write %02x\n",activecpu_get_pc(),data); + portA_out = data; +} + +WRITE8_HANDLER( lsasquad_68705_ddrA_w ) +{ + ddrA = data; +} + + + +/* + * Port B connections: + * + * all bits are logical 1 when read (+5V pullup) + * + * 1 W when 1->0, enables latch which brings the command from main CPU (read from port A) + * 2 W when 0->1, copies port A to the latch for the main CPU + */ + +static UINT8 portB_in,portB_out,ddrB; + +READ8_HANDLER( lsasquad_68705_portB_r ) +{ + return (portB_out & ddrB) | (portB_in & ~ddrB); +} + +WRITE8_HANDLER( lsasquad_68705_portB_w ) +{ +//logerror("%04x: 68705 port B write %02x\n",activecpu_get_pc(),data); + + if ((ddrB & 0x02) && (~data & 0x02) && (portB_out & 0x02)) + { + portA_in = from_main; + if (main_sent) cpunum_set_input_line(2,0,CLEAR_LINE); + main_sent = 0; +//logerror("read command %02x from main cpu\n",portA_in); + } + if ((ddrB & 0x04) && (data & 0x04) && (~portB_out & 0x04)) + { +//logerror("send command %02x to main cpu\n",portA_out); + from_mcu = portA_out; + mcu_sent = 1; + } + + portB_out = data; +} + +WRITE8_HANDLER( lsasquad_68705_ddrB_w ) +{ + ddrB = data; +} + +WRITE8_HANDLER( lsasquad_mcu_w ) +{ +//logerror("%04x: mcu_w %02x\n",activecpu_get_pc(),data); + from_main = data; + main_sent = 1; + cpunum_set_input_line(2,0,ASSERT_LINE); +} + +READ8_HANDLER( lsasquad_mcu_r ) +{ +//logerror("%04x: mcu_r %02x\n",activecpu_get_pc(),from_mcu); + mcu_sent = 0; + return from_mcu; +} + +READ8_HANDLER( lsasquad_mcu_status_r ) +{ + int res = input_port_3_r(0); + + /* bit 0 = when 1, mcu is ready to receive data from main cpu */ + /* bit 1 = when 0, mcu has sent data to the main cpu */ +//logerror("%04x: mcu_status_r\n",activecpu_get_pc()); + if (!main_sent) res |= 0x01; + if (!mcu_sent) res |= 0x02; + + return res ^ lsasquad_invertcoin; +} |