diff options
Diffstat (limited to 'src/mame/chessking/master.cpp')
-rw-r--r-- | src/mame/chessking/master.cpp | 266 |
1 files changed, 266 insertions, 0 deletions
diff --git a/src/mame/chessking/master.cpp b/src/mame/chessking/master.cpp new file mode 100644 index 00000000000..debbfe0dc08 --- /dev/null +++ b/src/mame/chessking/master.cpp @@ -0,0 +1,266 @@ +// license:BSD-3-Clause +// copyright-holders:hap +// thanks-to:Berger +/******************************************************************************* + +Chess King Master (yes, it's plainly named "Master") + +Chess King was a UK business formed by Intelligent Software Ltd (later known as +Intelligent Chess Software Ltd, after the fiasco with the Enterprise home computer), +so logically, all the programs were by them. According to the manual, the chess +engine of Master is Cyrus (by Richard Lang). + +To start a new game, press CHANGE POSITION, NEW GAME, and CHANGE POSITION again. + +Hardware notes: +- PCB label: COPYRIGHT CHESS KING +- Z80 CPU(NEC D780C-1) @ 4MHz(8MHz XTAL), IRQ from 555 timer +- 8KB ROM(NEC D2764C-3), 2KB RAM(NEC D4016C), ROM is scrambled for easy PCB placement +- simple I/O via 2*74373 and a 74145 +- 8*8 chessboard buttons, 32+1 border leds, piezo + +*******************************************************************************/ + +#include "emu.h" + +#include "cpu/z80/z80.h" +#include "machine/bankdev.h" +#include "machine/clock.h" +#include "machine/sensorboard.h" +#include "sound/dac.h" +#include "video/pwm.h" + +#include "speaker.h" + +// internal artwork +#include "cking_master.lh" + + +namespace { + +class master_state : public driver_device +{ +public: + master_state(const machine_config &mconfig, device_type type, const char *tag) : + driver_device(mconfig, type, tag), + m_maincpu(*this, "maincpu"), + m_display(*this, "display"), + m_board(*this, "board"), + m_dac(*this, "dac"), + m_mainmap(*this, "mainmap"), + m_inputs(*this, "IN.%u", 0) + { } + + void master(machine_config &config); + + void init_master(); + +protected: + virtual void machine_start() override ATTR_COLD; + +private: + // devices/pointers + required_device<z80_device> m_maincpu; + required_device<pwm_display_device> m_display; + required_device<sensorboard_device> m_board; + required_device<dac_2bit_ones_complement_device> m_dac; + required_device<address_map_bank_device> m_mainmap; + required_ioport_array<2> m_inputs; + + u8 m_inp_mux = 0; + + // address maps + void main_map(address_map &map) ATTR_COLD; + void main_trampoline(address_map &map) ATTR_COLD; + u8 main_trampoline_r(offs_t offset); + void main_trampoline_w(offs_t offset, u8 data); + + // I/O handlers + u8 input_r(); + void control_w(u8 data); +}; + + + +/******************************************************************************* + Initialization +*******************************************************************************/ + +void master_state::init_master() +{ + u8 *rom = memregion("maincpu")->base(); + const u32 len = memregion("maincpu")->bytes(); + + // descramble data lines + for (int i = 0; i < len; i++) + rom[i] = bitswap<8>(rom[i], 4,5,0,7,6,1,3,2); + + // descramble address lines + std::vector<u8> buf(len); + memcpy(&buf[0], rom, len); + for (int i = 0; i < len; i++) + rom[i] = buf[bitswap<16>(i, 15,14,13,12,11,3,7,9, 10,8,6,5,4,2,1,0)]; +} + +void master_state::machine_start() +{ + // register for savestates + save_item(NAME(m_inp_mux)); +} + + + +/******************************************************************************* + I/O +*******************************************************************************/ + +void master_state::control_w(u8 data) +{ + // d0-d3: 74145 A-D + // 74145 0-9: input mux, led select + m_inp_mux = data & 0xf; + u16 sel = 1 << m_inp_mux & 0x3ff; + + // d4,d5: led data + m_display->matrix(sel & 0x1ff, data >> 4 & 3); + + // d6,d7: speaker +/- + m_dac->write(data >> 6 & 3); +} + +u8 master_state::input_r() +{ + u8 data = 0; + + // d0-d7: multiplexed inputs + // read chessboard sensors + if (m_inp_mux < 8) + data = m_board->read_file(m_inp_mux, true); + + // read other buttons + else if (m_inp_mux < 10) + data = m_inputs[m_inp_mux - 8]->read(); + + return ~data; +} + + + +/******************************************************************************* + Address Maps +*******************************************************************************/ + +void master_state::main_map(address_map &map) +{ + map(0x0000, 0x1fff).mirror(0x6000).rom().region("maincpu", 0); // _A15 + map(0xa000, 0xa000).mirror(0x1fff).rw(FUNC(master_state::input_r), FUNC(master_state::control_w)); // A13 + map(0xc000, 0xc7ff).mirror(0x3800).ram(); // A14 +} + +// PCB design is prone to bus conflicts, but should be fine if software obeys +void master_state::main_trampoline_w(offs_t offset, u8 data) +{ + if (offset & 0x2000) + m_mainmap->write8((offset & 0x3fff) | 0x8000, data); + if (offset & 0x4000) + m_mainmap->write8((offset & 0x7fff) | 0x8000, data); +} + +u8 master_state::main_trampoline_r(offs_t offset) +{ + u8 data = 0xff; + if (~offset & 0x8000) + data &= m_mainmap->read8(offset); + if (offset & 0x2000) + data &= m_mainmap->read8((offset & 0x3fff) | 0x8000); + if (offset & 0x4000) + data &= m_mainmap->read8((offset & 0x7fff) | 0x8000); + + return data; +} + +void master_state::main_trampoline(address_map &map) +{ + map(0x0000, 0xffff).rw(FUNC(master_state::main_trampoline_r), FUNC(master_state::main_trampoline_w)); +} + + + +/******************************************************************************* + Input Ports +*******************************************************************************/ + +static INPUT_PORTS_START( master ) + PORT_START("IN.0") + PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_C) PORT_NAME("Change Position") + PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_R) PORT_NAME("Clear Board") + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_N) PORT_NAME("New Game") + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_T) PORT_NAME("Take Back") + PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_6) PORT_CODE(KEYCODE_6_PAD) PORT_NAME("King") + PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_5) PORT_CODE(KEYCODE_5_PAD) PORT_NAME("Queen") + PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_4) PORT_CODE(KEYCODE_4_PAD) PORT_NAME("Rook") + PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_UNUSED) + + PORT_START("IN.1") + PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_3) PORT_CODE(KEYCODE_3_PAD) PORT_NAME("Bishop") + PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_2) PORT_CODE(KEYCODE_2_PAD) PORT_NAME("Knight") + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_1) PORT_CODE(KEYCODE_1_PAD) PORT_NAME("Pawn") + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_W) PORT_NAME("White") + PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_B) PORT_NAME("Black") + PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_M) PORT_NAME("Move") + PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_L) PORT_NAME("Level") + PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_S) PORT_NAME("Sound") +INPUT_PORTS_END + + + +/******************************************************************************* + Machine Configs +*******************************************************************************/ + +void master_state::master(machine_config &config) +{ + // basic machine hardware + Z80(config, m_maincpu, 8_MHz_XTAL/2); + m_maincpu->z80_set_m1_cycles(4+1); // 1 WAIT CLK per M1 + m_maincpu->set_addrmap(AS_PROGRAM, &master_state::main_trampoline); + ADDRESS_MAP_BANK(config, m_mainmap).set_map(&master_state::main_map).set_options(ENDIANNESS_LITTLE, 8, 16); + + auto &irq_clock(CLOCK(config, "irq_clock", 418)); // 555 timer (22nF, 150K, 1K5), measured 418Hz + irq_clock.set_pulse_width(attotime::from_nsec(22870)); // active for 22.87us + irq_clock.signal_handler().set_inputline(m_maincpu, INPUT_LINE_IRQ0); + + 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(9, 2); + config.set_default_layout(layout_cking_master); + + // sound hardware + SPEAKER(config, "speaker").front_center(); + DAC_2BIT_ONES_COMPLEMENT(config, m_dac).add_route(ALL_OUTPUTS, "speaker", 0.125); +} + + + +/******************************************************************************* + ROM Definitions +*******************************************************************************/ + +ROM_START( master ) + ROM_REGION( 0x10000, "maincpu", 0 ) + ROM_LOAD("d2764c-3.ic2", 0x0000, 0x2000, CRC(59cbec9e) SHA1(2e0629e65778da62bed857406b91a334698d2fe8) ) // no custom label +ROM_END + +} // anonymous namespace + + + +/******************************************************************************* + Drivers +*******************************************************************************/ + +// YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY, FULLNAME, FLAGS +SYST( 1983, master, 0, 0, master, master, master_state, init_master, "Chess King / Intelligent Software", "Master (Chess King)", MACHINE_SUPPORTS_SAVE ) |