// license:BSD-3-Clause // copyright-holders:hap // thanks-to:yoyo_chessboard /****************************************************************************** Fidelity Sensory Chess Challenger 8 Hardware notes: - Z80A CPU @ 3.9MHz - 4KB ROM(MOS 2732), 256 bytes RAM(35391CP) - chessboard buttons, 8*8+1 leds - PCB label 510-1011 REV.2 ******************************************************************************/ #include "emu.h" #include "cpu/z80/z80.h" #include "machine/sensorboard.h" #include "sound/dac.h" #include "sound/volt_reg.h" #include "video/pwm.h" #include "speaker.h" // internal artwork #include "fidel_sc8.lh" // clickable namespace { class scc_state : public driver_device { public: scc_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag), m_maincpu(*this, "maincpu"), m_board(*this, "board"), m_display(*this, "display"), m_dac(*this, "dac"), m_inputs(*this, "IN.0") { } // machine drivers void scc(machine_config &config); protected: virtual void machine_start() override; private: // devices/pointers required_device m_maincpu; required_device m_board; required_device m_display; required_device m_dac; required_ioport m_inputs; // address maps void main_map(address_map &map); void main_io(address_map &map); // I/O handlers DECLARE_READ8_MEMBER(input_r); DECLARE_WRITE8_MEMBER(control_w); u8 m_inp_mux; u8 m_led_data; }; void scc_state::machine_start() { // zerofill m_inp_mux = 0; m_led_data = 0; // register for savestates save_item(NAME(m_inp_mux)); save_item(NAME(m_led_data)); } /****************************************************************************** I/O ******************************************************************************/ // TTL WRITE8_MEMBER(scc_state::control_w) { // a0-a2,d7: led data u8 mask = 1 << (offset & 7); m_led_data = (m_led_data & ~mask) | ((data & 0x80) ? mask : 0); // d0-d3: led select, input mux (row 9 is speaker out) // d4: corner led(direct) m_inp_mux = data & 0xf; u16 sel = 1 << m_inp_mux; m_dac->write(BIT(sel, 9)); m_display->matrix((sel & 0xff) | (data << 4 & 0x100), m_led_data); } READ8_MEMBER(scc_state::input_r) { u8 data = 0; // d0-d7: multiplexed inputs (active low) // read chessboard sensors if (m_inp_mux < 8) data = m_board->read_file(m_inp_mux); // read button panel else if (m_inp_mux == 8) data = m_inputs->read(); return ~data; } /****************************************************************************** Address Maps ******************************************************************************/ void scc_state::main_map(address_map &map) { map(0x0000, 0x0fff).rom(); map(0x5000, 0x50ff).ram(); } void scc_state::main_io(address_map &map) { map.global_mask(0x07); map(0x00, 0x07).rw(FUNC(scc_state::input_r), FUNC(scc_state::control_w)); } /****************************************************************************** Input Ports ******************************************************************************/ static INPUT_PORTS_START( scc ) PORT_START("IN.0") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_1) PORT_CODE(KEYCODE_1_PAD) PORT_NAME("Pawn") PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_2) PORT_CODE(KEYCODE_2_PAD) PORT_NAME("Rook") PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_3) PORT_CODE(KEYCODE_3_PAD) PORT_NAME("Knight") PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_4) PORT_CODE(KEYCODE_4_PAD) PORT_NAME("Bishop") PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_5) PORT_CODE(KEYCODE_5_PAD) PORT_NAME("Queen") PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_6) PORT_CODE(KEYCODE_6_PAD) PORT_NAME("King") PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_DEL) PORT_NAME("CL") PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_R) PORT_NAME("RE") INPUT_PORTS_END /****************************************************************************** Machine Drivers ******************************************************************************/ void scc_state::scc(machine_config &config) { /* basic machine hardware */ Z80(config, m_maincpu, 3.9_MHz_XTAL); m_maincpu->set_addrmap(AS_PROGRAM, &scc_state::main_map); m_maincpu->set_addrmap(AS_IO, &scc_state::main_io); SENSORBOARD(config, m_board).set_type(sensorboard_device::BUTTONS); m_board->init_cb().set(m_board, FUNC(sensorboard_device::preset_chess)); m_board->set_delay(attotime::from_msec(100)); /* video hardware */ PWM_DISPLAY(config, m_display).set_size(9, 8); config.set_default_layout(layout_fidel_sc8); /* sound hardware */ SPEAKER(config, "speaker").front_center(); DAC_1BIT(config, m_dac).add_route(ALL_OUTPUTS, "speaker", 0.25); VOLTAGE_REGULATOR(config, "vref").add_route(0, "dac", 1.0, DAC_VREF_POS_INPUT); } /****************************************************************************** ROM Definitions ******************************************************************************/ ROM_START( fscc8 ) // model SCC ROM_REGION( 0x10000, "maincpu", 0 ) ROM_LOAD( "101-32017", 0x0000, 0x1000, CRC(5340820d) SHA1(e3494c7624b3cacbbb9a0a8cc9e1ed3e00326dfd) ) // 2732 ROM_END } // anonymous namespace /****************************************************************************** Drivers ******************************************************************************/ // YEAR NAME PARENT CMP MACHINE INPUT STATE INIT COMPANY, FULLNAME, FLAGS CONS( 1980, fscc8, 0, 0, scc, scc, scc_state, empty_init, "Fidelity Electronics", "Sensory Chess Challenger 8", MACHINE_SUPPORTS_SAVE | MACHINE_CLICKABLE_ARTWORK )