static INTERRUPT_GEN( update_pia_1 )
{
/* update the different PIA pins from the input ports */
/* CA1 - copy of PA0 (COIN1) */
pia_1_ca1_w(machine, 0, input_port_read_indexed(machine, 0) & 0x01);
/* CA2 - copy of PA1 (SERVICE1) */
pia_1_ca2_w(machine, 0, input_port_read_indexed(machine, 0) & 0x02);
/* CB1 - (crosshatch) */
pia_1_cb1_w(machine, 0, input_port_read_indexed(machine, 5));
/* CB2 - NOT CONNECTED */
}
int spiders_timed_irq(void)
{
/* Update CA1 on PIA1 - copy of PA0 (COIN1?) */
pia_1_ca1_w(0 , input_port_0_r(0)&0x01);
/* Update CA2 on PIA1 - copy of PA0 (PS2) */
pia_1_ca2_w(0 , input_port_0_r(0)&0x02);
/* Update CA1 on PIA1 - copy of PA0 (COIN1?) */
pia_1_cb1_w(0 , input_port_6_r(0));
/* Update CB2 on PIA1 - NOT CONNECTED */
return ignore_interrupt();
}