From 004f75e2c805f870cbb7aa017ea465146990e6cf Mon Sep 17 00:00:00 2001 From: hap Date: Mon, 2 Dec 2019 16:06:02 +0100 Subject: =?UTF-8?q?New=20working=20machines=20--------------------=20La=20?= =?UTF-8?q?R=C3=A9gence=20[hap,=20anonymous]?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- scripts/target/mame/mess.lua | 15 +- src/mame/drivers/fidel_elite.cpp | 8 +- src/mame/drivers/regence.cpp | 224 +++++++++++++++++++ src/mame/layout/regence.lay | 469 +++++++++++++++++++++++++++++++++++++++ src/mame/mame.lst | 3 + src/mame/mess.flt | 1 + 6 files changed, 714 insertions(+), 6 deletions(-) create mode 100644 src/mame/drivers/regence.cpp create mode 100644 src/mame/layout/regence.lay diff --git a/scripts/target/mame/mess.lua b/scripts/target/mame/mess.lua index 1eb4d2deb51..e8a166ce9ea 100644 --- a/scripts/target/mame/mess.lua +++ b/scripts/target/mame/mess.lua @@ -1132,6 +1132,7 @@ function linkProjects_mame_mess(_target, _subtarget) "fairlight", "fidelity", "force", + "francedr", "fujitsu", "funtech", "galaxy", @@ -1207,6 +1208,7 @@ function linkProjects_mame_mess(_target, _subtarget) "osborne", "osi", "palm", + "parker", "pc", "pdp1", "pel", @@ -2273,6 +2275,11 @@ files { MAME_DIR .. "src/mame/drivers/force68k.cpp", } +createMESSProjects(_target, _subtarget, "francedr") +files { + MAME_DIR .. "src/mame/drivers/regence.cpp", +} + createMESSProjects(_target, _subtarget, "fujitsu") files { MAME_DIR .. "src/mame/drivers/fmtowns.cpp", @@ -2978,6 +2985,12 @@ files { MAME_DIR .. "src/mame/drivers/palmz22.cpp", } +createMESSProjects(_target, _subtarget, "parker") +files { + MAME_DIR .. "src/mame/drivers/talkingbb.cpp", + MAME_DIR .. "src/mame/drivers/talkingfb.cpp", +} + createMESSProjects(_target, _subtarget, "pitronic") files { MAME_DIR .. "src/mame/drivers/beta.cpp", @@ -4185,8 +4198,6 @@ files { MAME_DIR .. "src/mame/drivers/sys9002.cpp", MAME_DIR .. "src/mame/drivers/systec.cpp", MAME_DIR .. "src/mame/drivers/systel1.cpp", - MAME_DIR .. "src/mame/drivers/talkingbb.cpp", - MAME_DIR .. "src/mame/drivers/talkingfb.cpp", MAME_DIR .. "src/mame/drivers/tavernie.cpp", MAME_DIR .. "src/mame/drivers/tecnbras.cpp", MAME_DIR .. "src/mame/drivers/teleray10.cpp", diff --git a/src/mame/drivers/fidel_elite.cpp b/src/mame/drivers/fidel_elite.cpp index 484d9bacccd..46ead41491d 100644 --- a/src/mame/drivers/fidel_elite.cpp +++ b/src/mame/drivers/fidel_elite.cpp @@ -33,10 +33,10 @@ Note that EAS doesn't have a "new game" button, it is done through game options: Press GAME CONTROL, then place/lift a piece on D6 to restart, or D8 to reset with default settings, then press CL. -Prestige Challenger (PC) hardware is very similar. They stripped the 8255 PPI, -and added more RAM(7*TMM2016P). Some were released at 3.6MHz instead of 4MHz, -perhaps due to hardware instability? Opening module PC16 was included by default, -this module is the same as CB16 but at different form factor. +Prestige Challenger (PC) hardware is very similar. It was released before EAS, +it doesn't have the 8255 PPI, but has more RAM(7*TMM2016P). Some were released at +3.6MHz instead of 4MHz, perhaps due to hardware instability? Opening module PC16 was +included by default, this module is the same as CB16 but at different form factor. Elite Avant Garde (models 6081,6088,6089) is on the same hardware as EAS. diff --git a/src/mame/drivers/regence.cpp b/src/mame/drivers/regence.cpp new file mode 100644 index 00000000000..db24d7ab27e --- /dev/null +++ b/src/mame/drivers/regence.cpp @@ -0,0 +1,224 @@ +// license:BSD-3-Clause +// copyright-holders:hap +/****************************************************************************** + +La Régence, French chess computer by "France Double R". German distribution +by Sandy Electronic, who sub-titled it the TSB 4 (Turniersensorbrett). + +The chess engine is Richard Lang's Cyrus. + +Hardware notes: +- PCB label: FRANCE DOUBLE R, MADE IN FRANCE +- Sharp LH0080A Z80A @ 4 MHz (8MHz XTAL) +- 2KB RAM (MSM5128-15RS), 3*4KB ROM +- TTL, piezo, 8*8+4 LEDs, magnetic sensors + +TODO: +- verify irq source/frequency, probably a 555 ic, current approximation is from + comparing led blink rate with a video recording +- ARC0/ARC2 rom labels might be the wrong way around +- French button labels(right side panel) aren't fully known + +******************************************************************************/ + +#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 "regence.lh" // clickable + + +namespace { + +class regence_state : public driver_device +{ +public: + regence_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_inputs(*this, "IN.%u", 0) + { } + + // machine drivers + void regence(machine_config &config); + +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_ioport_array<2> m_inputs; + + // address maps + void main_map(address_map &map); + + // I/O handlers + void update_display(); + DECLARE_WRITE8_MEMBER(control_w); + DECLARE_WRITE8_MEMBER(leds_w); + DECLARE_READ8_MEMBER(input_r); + + u8 m_inp_mux = 0; + u8 m_led_data = 0; +}; + +void regence_state::machine_start() +{ + // register for savestates + save_item(NAME(m_inp_mux)); + save_item(NAME(m_led_data)); +} + + + +/****************************************************************************** + I/O +******************************************************************************/ + +void regence_state::update_display() +{ + m_display->matrix(1 << m_inp_mux, m_led_data); +} + +WRITE8_MEMBER(regence_state::control_w) +{ + // d0-d3: input mux/led select + m_inp_mux = data & 0xf; + update_display(); + + // d7: speaker out + m_dac->write(BIT(data, 7)); + + // other: ? +} + +WRITE8_MEMBER(regence_state::leds_w) +{ + // d0-d7: led data + m_led_data = data; + update_display(); +} + +READ8_MEMBER(regence_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 regence_state::main_map(address_map &map) +{ + map(0x0000, 0x0fff).rom(); + map(0x4000, 0x4fff).rom(); + map(0x8000, 0x8fff).rom(); + map(0xd000, 0xd7ff).ram(); + map(0xf000, 0xf000).rw(FUNC(regence_state::input_r), FUNC(regence_state::control_w)); + map(0xf800, 0xf800).w(FUNC(regence_state::leds_w)); +} + + + +/****************************************************************************** + Input Ports +******************************************************************************/ + +static INPUT_PORTS_START( regence ) + PORT_START("IN.0") + PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_S) PORT_NAME("Set Up") // Changement de Position / Veränderung + PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_T) PORT_NAME("Take Back") // Retour en Arriere / Zug Zurück + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_N) PORT_NAME("New Game") // Nouvelle Partie / Neues Spiel (press after setup) + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_6) PORT_CODE(KEYCODE_6_PAD) PORT_NAME("King") + 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_4) PORT_CODE(KEYCODE_4_PAD) PORT_NAME("Rook") + PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_3) PORT_CODE(KEYCODE_3_PAD) PORT_NAME("Bishop") + PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_UNUSED) + + PORT_START("IN.1") + PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_O) PORT_NAME("Sound") // ? / Ton + PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_L) PORT_NAME("Level") // ? / Stufe + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_M) PORT_CODE(KEYCODE_H) PORT_NAME("Move / Halt") // Jeu Auto/Arrêter? / Zug-Halt + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_B) PORT_NAME("Black") // Noir / Schwarz + PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_W) PORT_NAME("White") // Blanc / Weiss + PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_1) PORT_CODE(KEYCODE_1_PAD) PORT_NAME("Pawn") + PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYPAD) PORT_CODE(KEYCODE_2) PORT_CODE(KEYCODE_2_PAD) PORT_NAME("Knight") + PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_UNUSED) +INPUT_PORTS_END + + + +/****************************************************************************** + Machine Drivers +******************************************************************************/ + +void regence_state::regence(machine_config &config) +{ + /* basic machine hardware */ + Z80(config, m_maincpu, 8_MHz_XTAL/2); + m_maincpu->set_addrmap(AS_PROGRAM, ®ence_state::main_map); + + m_maincpu->set_periodic_int(FUNC(regence_state::irq0_line_hold), attotime::from_hz(400)); // approximation + + SENSORBOARD(config, m_board).set_type(sensorboard_device::MAGNETS); + 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(10, 8); + config.set_default_layout(layout_regence); + + /* 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( regence ) + ROM_REGION( 0x10000, "maincpu", 0 ) + ROM_LOAD("arc0.ic13", 0x0000, 0x1000, CRC(ac6a0a67) SHA1(52b115c7cd372dfbad14b00854aa4f6f75a937d3) ) + ROM_LOAD("arc1.ic12", 0x4000, 0x1000, CRC(5c2fb0c7) SHA1(811ab3d7cefcf872741eb2265115080aaf913f0f) ) + ROM_LOAD("arc2.ic11", 0x8000, 0x1000, CRC(e4c39dbd) SHA1(b6a6d1d39f73a2ff1ade6205bdf180be13e84df3) ) +ROM_END + +} // anonymous namespace + + + +/****************************************************************************** + Drivers +******************************************************************************/ + +/* YEAR NAME PARENT COMPAT MACHINE INPUT CLASS INIT COMPANY, FULLNAME, FLAGS */ +CONS( 1982, regence, 0, 0, regence, regence, regence_state, empty_init, "France Double R", "La Regence", MACHINE_SUPPORTS_SAVE | MACHINE_CLICKABLE_ARTWORK ) diff --git a/src/mame/layout/regence.lay b/src/mame/layout/regence.lay new file mode 100644 index 00000000000..957a47b180b --- /dev/null +++ b/src/mame/layout/regence.lay @@ -0,0 +1,469 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/src/mame/mame.lst b/src/mame/mame.lst index a43d5c7c0b0..b3e5385c261 100644 --- a/src/mame/mame.lst +++ b/src/mame/mame.lst @@ -34075,6 +34075,9 @@ zerohour // 8011 (c) Universal zerohoura // 8011 (c) Universal zerohouri // +@source:regence.cpp +regence + @source:relief.cpp relief // 136093 (c) 1992 relief2 // 136093 (c) 1992 diff --git a/src/mame/mess.flt b/src/mame/mess.flt index c6c4a669f6a..df4b8d0ae5e 100644 --- a/src/mame/mess.flt +++ b/src/mame/mess.flt @@ -709,6 +709,7 @@ rc759.cpp rcm32p.cpp rd100.cpp rd110.cpp +regence.cpp replicator.cpp rex6000.cpp riscpc.cpp -- cgit v1.2.3