void cardinal_state::p1_w(u8 data) { m_eeprom->cs_write(BIT(data, 0)); m_eeprom->di_write(BIT(data, 4)); m_eeprom->clk_write(BIT(data, 3)); m_address_select = BIT(data, 1); m_speaker->level_w(!BIT(data, 2)); m_rs232->write_rts(BIT(data, 7)); }