// license:BSD-3-Clause // copyright-holders:hap // thanks-to:yoyo_chessboard /****************************************************************************** Fidelity Sensory Chess Challenger 6 (model SC6) Hardware notes: - PCB label 510-1045B01 - INS8040N-11 MCU, 11MHz XTAL - external 4KB ROM 2332 101-1035A01, in module slot - buzzer, 2 7seg LEDs, 8*8 chessboard buttons released modules, * denotes not dumped yet: - *BO6: Book Openings I - *CG6: Greatest Chess Games 1 - SC6: pack-in, original program SC6 program is contained in BO6 and CG6. ******************************************************************************/ #include "emu.h" #include "cpu/mcs48/mcs48.h" #include "machine/sensorboard.h" #include "sound/dac.h" #include "sound/volt_reg.h" #include "video/pwm.h" #include "bus/generic/slot.h" #include "bus/generic/carts.h" #include "softlist.h" #include "speaker.h" // internal artwork #include "fidel_sc6.lh" // clickable namespace { class sc6_state : public driver_device { public: sc6_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_cart(*this, "cartslot"), m_inputs(*this, "IN.0") { } // machine drivers void sc6(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_device m_cart; required_ioport m_inputs; // address maps void main_map(address_map &map); DECLARE_DEVICE_IMAGE_LOAD_MEMBER(cart_load); // I/O handlers void update_display(); DECLARE_WRITE8_MEMBER(mux_w); DECLARE_WRITE8_MEMBER(select_w); u8 read_inputs(); DECLARE_READ8_MEMBER(input_r); DECLARE_READ_LINE_MEMBER(input6_r); DECLARE_READ_LINE_MEMBER(input7_r); u8 m_led_select; u8 m_inp_mux; }; void sc6_state::machine_start() { // zerofill m_led_select = 0; m_inp_mux = 0; // register for savestates save_item(NAME(m_led_select)); save_item(NAME(m_inp_mux)); } /****************************************************************************** I/O ******************************************************************************/ // cartridge DEVICE_IMAGE_LOAD_MEMBER(sc6_state::cart_load) { u32 size = m_cart->common_get_size("rom"); // 4KB ROM only? if (size != 0x1000) { image.seterror(IMAGE_ERROR_UNSPECIFIED, "Invalid file size"); return image_init_result::FAIL; } m_cart->rom_alloc(size, GENERIC_ROM8_WIDTH, ENDIANNESS_LITTLE); m_cart->common_load_rom(m_cart->get_rom_base(), size, "rom"); return image_init_result::PASS; } // MCU ports/generic void sc6_state::update_display() { // 2 7seg leds m_display->matrix(m_led_select, 1 << m_inp_mux); } WRITE8_MEMBER(sc6_state::mux_w) { // P24-P27: 7442 A-D // 7442 0-8: input mux, 7seg data m_inp_mux = data >> 4 & 0xf; update_display(); // 7442 9: speaker out m_dac->write(BIT(1 << m_inp_mux, 9)); } WRITE8_MEMBER(sc6_state::select_w) { // P16,P17: digit select m_led_select = ~data >> 6 & 3; update_display(); } u8 sc6_state::read_inputs() { u8 data = 0; // 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; } READ8_MEMBER(sc6_state::input_r) { // P10-P15: multiplexed inputs low return (read_inputs() & 0x3f) | 0xc0; } READ_LINE_MEMBER(sc6_state::input6_r) { // T0: multiplexed inputs bit 6 return read_inputs() >> 6 & 1; } READ_LINE_MEMBER(sc6_state::input7_r) { // T1: multiplexed inputs bit 7 return read_inputs() >> 7 & 1; } /****************************************************************************** Address Maps ******************************************************************************/ void sc6_state::main_map(address_map &map) { map(0x0000, 0x0fff).r("cartslot", FUNC(generic_slot_device::read_rom)); } /****************************************************************************** Input Ports ******************************************************************************/ static INPUT_PORTS_START( sc6 ) PORT_START("IN.0") PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_1) PORT_CODE(KEYCODE_1_PAD) PORT_NAME("RV / Pawn") PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_2) PORT_CODE(KEYCODE_2_PAD) PORT_NAME("DM / Knight") PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_3) PORT_CODE(KEYCODE_3_PAD) PORT_NAME("TB / Bishop") PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_4) PORT_CODE(KEYCODE_4_PAD) PORT_NAME("LV / Rook") PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_5) PORT_CODE(KEYCODE_5_PAD) PORT_NAME("PV / Queen") PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_6) PORT_CODE(KEYCODE_6_PAD) PORT_NAME("PB / 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 sc6_state::sc6(machine_config &config) { /* basic machine hardware */ I8040(config, m_maincpu, 11_MHz_XTAL); m_maincpu->set_addrmap(AS_PROGRAM, &sc6_state::main_map); m_maincpu->p2_out_cb().set(FUNC(sc6_state::mux_w)); m_maincpu->p1_in_cb().set(FUNC(sc6_state::input_r)); m_maincpu->p1_out_cb().set(FUNC(sc6_state::select_w)); m_maincpu->t0_in_cb().set(FUNC(sc6_state::input6_r)); m_maincpu->t1_in_cb().set(FUNC(sc6_state::input7_r)); 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(150)); /* video hardware */ PWM_DISPLAY(config, m_display).set_size(2, 7); m_display->set_segmask(0x3, 0x7f); config.set_default_layout(layout_fidel_sc6); /* 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); /* cartridge */ GENERIC_CARTSLOT(config, m_cart, generic_plain_slot, "fidel_sc6", "bin"); m_cart->set_device_load(FUNC(sc6_state::cart_load)); m_cart->set_must_be_loaded(true); SOFTWARE_LIST(config, "cart_list").set_original("fidel_sc6"); } /****************************************************************************** ROM Definitions ******************************************************************************/ ROM_START( fscc6 ) ROM_REGION( 0x1000, "maincpu", ROMREGION_ERASE00 ) // none here, it's in the module slot ROM_END } // anonymous namespace /****************************************************************************** Drivers ******************************************************************************/ // YEAR NAME PARENT CMP MACHINE INPUT CLASS INIT COMPANY FULLNAME FLAGS CONS( 1982, fscc6, 0, 0, sc6, sc6, sc6_state, empty_init, "Fidelity Electronics", "Sensory Chess Challenger 6", MACHINE_SUPPORTS_SAVE | MACHINE_CLICKABLE_ARTWORK )