From 0f2c47b2778351d360b7f7da6655af85ffd3e791 Mon Sep 17 00:00:00 2001 From: hap Date: Wed, 25 Sep 2024 11:26:22 +0200 Subject: source org: move Chess King drivers to chessking folder --- src/mame/capcom/lwings.cpp | 2 +- src/mame/chess/cking_master.cpp | 266 -------------------------------------- src/mame/chess/cking_triomphe.cpp | 190 --------------------------- src/mame/chess/regence.cpp | 2 - src/mame/chessking/master.cpp | 266 ++++++++++++++++++++++++++++++++++++++ src/mame/chessking/triomphe.cpp | 191 +++++++++++++++++++++++++++ src/mame/cxg/chess2001.cpp | 2 - src/mame/mame.lst | 18 +-- src/mame/msx/msx.cpp | 2 +- 9 files changed, 468 insertions(+), 471 deletions(-) delete mode 100644 src/mame/chess/cking_master.cpp delete mode 100644 src/mame/chess/cking_triomphe.cpp create mode 100644 src/mame/chessking/master.cpp create mode 100644 src/mame/chessking/triomphe.cpp diff --git a/src/mame/capcom/lwings.cpp b/src/mame/capcom/lwings.cpp index fed0e8fa655..d7fdf2c2878 100644 --- a/src/mame/capcom/lwings.cpp +++ b/src/mame/capcom/lwings.cpp @@ -1338,7 +1338,7 @@ void lwings_state::avengers(machine_config &config) // basic machine hardware m_maincpu->set_clock(12_MHz_XTAL/2); - m_maincpu->z80_set_m1_cycles(6); // 2 WAIT states per M1? (needed to keep in sync with MCU) + m_maincpu->z80_set_m1_cycles(4+2); // 2 WAIT states per M1? (needed to keep in sync with MCU) m_maincpu->set_addrmap(AS_PROGRAM, &lwings_state::avengers_map); I8751(config, m_mcu, 12_MHz_XTAL/2); diff --git a/src/mame/chess/cking_master.cpp b/src/mame/chess/cking_master.cpp deleted file mode 100644 index b45aeacdf11..00000000000 --- a/src/mame/chess/cking_master.cpp +++ /dev/null @@ -1,266 +0,0 @@ -// 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 is Cyrus (by Richard Lang). - -To start a new game, press CHANGE POSITION, NEW GAME, and CHANGE POSITION again. - -Hardware notes: -- 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) - { } - - // machine configs - void master(machine_config &config); - - void init_master(); - -protected: - virtual void machine_start() override; - -private: - // devices/pointers - required_device m_maincpu; - required_device m_display; - required_device m_board; - required_device m_dac; - required_device m_mainmap; - required_ioport_array<2> m_inputs; - - u8 m_inp_mux = 0; - - // address maps - void main_map(address_map &map); - void main_trampoline(address_map &map); - 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 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(5); // 1 WAIT CLK per M1 - m_maincpu->set_addrmap(AS_PROGRAM, &master_state::main_trampoline); - ADDRESS_MAP_BANK(config, "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( ckmaster ) - 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, ckmaster, 0, 0, master, master, master_state, init_master, "Chess King / Intelligent Software", "Master (Chess King)", MACHINE_SUPPORTS_SAVE ) diff --git a/src/mame/chess/cking_triomphe.cpp b/src/mame/chess/cking_triomphe.cpp deleted file mode 100644 index 3ce23b059b9..00000000000 --- a/src/mame/chess/cking_triomphe.cpp +++ /dev/null @@ -1,190 +0,0 @@ -// license:BSD-3-Clause -// copyright-holders:hap -// thanks-to:Berger -/******************************************************************************* - -Chess King Triomphe - -The ROM includes (C)1985ICSL, that's Intelligent Chess Software Ltd. For some -reason, the programmer decided to (ab)use the HD6301 undefined opcode TRAP -interrupt for the beeper routine. Very strange. - -Hardware notes: -- PCB label: TRIUMPHE CHESS KING -- Hitachi HD6301V1P, 4MHz XTAL -- 8*8 chessboard buttons, 32 LEDs, piezo - -It's in the same housing as Chess King Master, they repurposed the green LED -for a power-on LED. - -*******************************************************************************/ - -#include "emu.h" - -#include "cpu/m6800/m6801.h" -#include "machine/sensorboard.h" -#include "sound/dac.h" -#include "video/pwm.h" - -#include "speaker.h" - -// internal artwork -#include "cking_triomphe.lh" - - -namespace { - -class triomphe_state : public driver_device -{ -public: - triomphe_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.%u", 0) - { } - - void triomphe(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_array<2> m_inputs; - - u16 m_inp_mux = 0; - - u8 input_r(); - void board_w(u8 data); - void control_w(u8 data); -}; - -void triomphe_state::machine_start() -{ - save_item(NAME(m_inp_mux)); -} - - - -/******************************************************************************* - I/O -*******************************************************************************/ - -u8 triomphe_state::input_r() -{ - // P10-P17: multiplexed inputs - u8 data = 0; - - // read buttons - for (int i = 0; i < 2; i++) - if (BIT(m_inp_mux, i + 8)) - data |= m_inputs[i]->read(); - - // read chessboard - for (int i = 0; i < 8; i++) - if (BIT(m_inp_mux, i)) - data |= m_board->read_file(i); - - return ~data; -} - -void triomphe_state::board_w(u8 data) -{ - // P30-P37: input mux (chessboard), led data - m_inp_mux = (m_inp_mux & 0x300) | (data ^ 0xff); - m_display->write_mx(~data); -} - -void triomphe_state::control_w(u8 data) -{ - // P40,P41: input mux (buttons) - m_inp_mux = (m_inp_mux & 0xff) | (~data << 8 & 0x300); - - // P44,P45: led select - m_display->write_my(~data >> 4 & 3); - - // P47: speaker out - m_dac->write(BIT(~data, 7)); -} - - - -/******************************************************************************* - Input Ports -*******************************************************************************/ - -static INPUT_PORTS_START( triomphe ) - 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("Knight") - PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_3) PORT_CODE(KEYCODE_3_PAD) PORT_NAME("Bishop") - PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_4) PORT_CODE(KEYCODE_4_PAD) PORT_NAME("Rook") - 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(0xc0, IP_ACTIVE_HIGH, IPT_UNUSED) - - PORT_START("IN.1") - PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_S) PORT_NAME("Sound") - PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_M) PORT_NAME("Move") - PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_T) PORT_NAME("Take Back") - PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_L) PORT_NAME("Level") - PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_N) PORT_NAME("New Game") - PORT_BIT(0xe0, IP_ACTIVE_HIGH, IPT_UNUSED) -INPUT_PORTS_END - - - -/******************************************************************************* - Machine Configs -*******************************************************************************/ - -void triomphe_state::triomphe(machine_config &config) -{ - // basic machine hardware - HD6301V1(config, m_maincpu, 4_MHz_XTAL); - m_maincpu->in_p1_cb().set(FUNC(triomphe_state::input_r)); - m_maincpu->out_p3_cb().set(FUNC(triomphe_state::board_w)); - m_maincpu->in_p4_cb().set_constant(0); // freq sel - m_maincpu->out_p4_cb().set(FUNC(triomphe_state::control_w)); - - 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, 8); - config.set_default_layout(layout_cking_triomphe); - - // sound hardware - SPEAKER(config, "speaker").front_center(); - DAC_1BIT(config, m_dac).add_route(ALL_OUTPUTS, "speaker", 0.25); -} - - - -/******************************************************************************* - ROM Definitions -*******************************************************************************/ - -ROM_START( triomphe ) - ROM_REGION( 0x1000, "maincpu", 0 ) - ROM_LOAD("chessking_triomphe_m1_hd6301v1e53p", 0x0000, 0x1000, CRC(01f30f08) SHA1(5d8949b8e0a5d15024bb2c13ee6f3eb2ed02f94b) ) -ROM_END - -} // anonymous namespace - - - -/******************************************************************************* - Drivers -*******************************************************************************/ - -// YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY, FULLNAME, FLAGS -SYST( 1985, triomphe, 0, 0, triomphe, triomphe, triomphe_state, empty_init, "Chess King / Intelligent Chess Software", "Triomphe", MACHINE_SUPPORTS_SAVE ) diff --git a/src/mame/chess/regence.cpp b/src/mame/chess/regence.cpp index 9570afc1bdf..1ac4133a289 100644 --- a/src/mame/chess/regence.cpp +++ b/src/mame/chess/regence.cpp @@ -56,7 +56,6 @@ public: DECLARE_INPUT_CHANGED_MEMBER(power_off); - // machine configs void regence(machine_config &config); protected: @@ -75,7 +74,6 @@ private: u8 m_inp_mux = 0; u8 m_led_data = 0; - // address maps void main_map(address_map &map); // I/O handlers diff --git a/src/mame/chessking/master.cpp b/src/mame/chessking/master.cpp new file mode 100644 index 00000000000..349149aba3f --- /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; + +private: + // devices/pointers + required_device m_maincpu; + required_device m_display; + required_device m_board; + required_device m_dac; + required_device m_mainmap; + required_ioport_array<2> m_inputs; + + u8 m_inp_mux = 0; + + // address maps + void main_map(address_map &map); + void main_trampoline(address_map &map); + 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 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, "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 ) diff --git a/src/mame/chessking/triomphe.cpp b/src/mame/chessking/triomphe.cpp new file mode 100644 index 00000000000..617c1abd098 --- /dev/null +++ b/src/mame/chessking/triomphe.cpp @@ -0,0 +1,191 @@ +// license:BSD-3-Clause +// copyright-holders:hap +// thanks-to:Berger +/******************************************************************************* + +Chess King Triomphe + +The ROM includes (C)1985ICSL, that's Intelligent Chess Software Ltd. For some +reason, the programmer decided to (ab)use the HD6301 undefined opcode TRAP +interrupt for the beeper routine. Very strange. + +Hardware notes: +- PCB label: TRIUMPHE CHESS KING +- Hitachi HD6301V1P, 4MHz XTAL +- 8*8 chessboard buttons, 32 LEDs, piezo + +It's in the same housing as Chess King Master, they repurposed the green LED +for a power-on LED. + +*******************************************************************************/ + +#include "emu.h" + +#include "cpu/m6800/m6801.h" +#include "machine/sensorboard.h" +#include "sound/dac.h" +#include "video/pwm.h" + +#include "speaker.h" + +// internal artwork +#include "cking_triomphe.lh" + + +namespace { + +class triomphe_state : public driver_device +{ +public: + triomphe_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.%u", 0) + { } + + void triomphe(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_array<2> m_inputs; + + u16 m_inp_mux = 0; + + // I/O handlers + u8 input_r(); + void board_w(u8 data); + void control_w(u8 data); +}; + +void triomphe_state::machine_start() +{ + save_item(NAME(m_inp_mux)); +} + + + +/******************************************************************************* + I/O +*******************************************************************************/ + +u8 triomphe_state::input_r() +{ + // P10-P17: multiplexed inputs + u8 data = 0; + + // read buttons + for (int i = 0; i < 2; i++) + if (BIT(m_inp_mux, i + 8)) + data |= m_inputs[i]->read(); + + // read chessboard + for (int i = 0; i < 8; i++) + if (BIT(m_inp_mux, i)) + data |= m_board->read_file(i); + + return ~data; +} + +void triomphe_state::board_w(u8 data) +{ + // P30-P37: input mux (chessboard), led data + m_inp_mux = (m_inp_mux & 0x300) | (data ^ 0xff); + m_display->write_mx(~data); +} + +void triomphe_state::control_w(u8 data) +{ + // P40,P41: input mux (buttons) + m_inp_mux = (m_inp_mux & 0xff) | (~data << 8 & 0x300); + + // P44,P45: led select + m_display->write_my(~data >> 4 & 3); + + // P47: speaker out + m_dac->write(BIT(~data, 7)); +} + + + +/******************************************************************************* + Input Ports +*******************************************************************************/ + +static INPUT_PORTS_START( triomphe ) + 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("Knight") + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_3) PORT_CODE(KEYCODE_3_PAD) PORT_NAME("Bishop") + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_4) PORT_CODE(KEYCODE_4_PAD) PORT_NAME("Rook") + 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(0xc0, IP_ACTIVE_HIGH, IPT_UNUSED) + + PORT_START("IN.1") + PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_S) PORT_NAME("Sound") + PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_M) PORT_NAME("Move") + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_T) PORT_NAME("Take Back") + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_L) PORT_NAME("Level") + PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_N) PORT_NAME("New Game") + PORT_BIT(0xe0, IP_ACTIVE_HIGH, IPT_UNUSED) +INPUT_PORTS_END + + + +/******************************************************************************* + Machine Configs +*******************************************************************************/ + +void triomphe_state::triomphe(machine_config &config) +{ + // basic machine hardware + HD6301V1(config, m_maincpu, 4_MHz_XTAL); + m_maincpu->in_p1_cb().set(FUNC(triomphe_state::input_r)); + m_maincpu->out_p3_cb().set(FUNC(triomphe_state::board_w)); + m_maincpu->in_p4_cb().set_constant(0); // freq sel + m_maincpu->out_p4_cb().set(FUNC(triomphe_state::control_w)); + + 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, 8); + config.set_default_layout(layout_cking_triomphe); + + // sound hardware + SPEAKER(config, "speaker").front_center(); + DAC_1BIT(config, m_dac).add_route(ALL_OUTPUTS, "speaker", 0.25); +} + + + +/******************************************************************************* + ROM Definitions +*******************************************************************************/ + +ROM_START( triomphe ) + ROM_REGION( 0x1000, "maincpu", 0 ) + ROM_LOAD("chessking_triomphe_m1_hd6301v1e53p", 0x0000, 0x1000, CRC(01f30f08) SHA1(5d8949b8e0a5d15024bb2c13ee6f3eb2ed02f94b) ) +ROM_END + +} // anonymous namespace + + + +/******************************************************************************* + Drivers +*******************************************************************************/ + +// YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY, FULLNAME, FLAGS +SYST( 1985, triomphe, 0, 0, triomphe, triomphe, triomphe_state, empty_init, "Chess King / Intelligent Chess Software", "Triomphe", MACHINE_SUPPORTS_SAVE ) diff --git a/src/mame/cxg/chess2001.cpp b/src/mame/cxg/chess2001.cpp index 194b9a0e743..dccf1b35b43 100644 --- a/src/mame/cxg/chess2001.cpp +++ b/src/mame/cxg/chess2001.cpp @@ -48,7 +48,6 @@ public: m_inputs(*this, "IN.%u", 0) { } - // machine configs void chess2001(machine_config &config); protected: @@ -65,7 +64,6 @@ private: u16 m_inp_mux = 0; int m_dac_data = 0; - // address maps void main_map(address_map &map); // I/O handlers diff --git a/src/mame/mame.lst b/src/mame/mame.lst index b0803cb2a08..3b40f94fdfa 100644 --- a/src/mame/mame.lst +++ b/src/mame/mame.lst @@ -16193,17 +16193,11 @@ galgame4p // (c) 1998 Creative Electronics & Software (CES galgbios // (c) 1998 Creative Electronics & Software (CES) @source:chess/ave_arb.cpp -arb // -arbv2 // - -@source:chess/cking_master.cpp -ckmaster // - -@source:chess/cking_triomphe.cpp -triomphe +arb +arbv2 @source:chess/compuchess.cpp -ccmk1 // Chess Champion MK I +ccmk1 cmpchess cmpchess2 cncchess @@ -16236,6 +16230,12 @@ tascr30a tascr30b tascr30g +@source:chessking/master.cpp +master + +@source:chessking/triomphe.cpp +triomphe + @source:chromatics/cgc7900.cpp cgc7900 // diff --git a/src/mame/msx/msx.cpp b/src/mame/msx/msx.cpp index 7b2113e55d9..dd8ea1e6c21 100644 --- a/src/mame/msx/msx.cpp +++ b/src/mame/msx/msx.cpp @@ -278,7 +278,7 @@ void msx_state::machine_start() void msx_state::driver_start() { m_maincpu->set_input_line_vector(0, 0xff); // Z80 - m_maincpu->z80_set_m1_cycles(5); + m_maincpu->z80_set_m1_cycles(4+1); // 1 WAIT CLK per M1 save_item(NAME(m_psg_b)); save_item(NAME(m_kanji_latch)); -- cgit v1.2.3