summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/machine/lsasquad.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/machine/lsasquad.c')
-rw-r--r--src/mame/machine/lsasquad.c192
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;
+}