// license:LGPL-2.1+ // copyright-holders:Dirk Verwiebe, Cowering /****************************************************************************** Mephisto 4 + 5 Chess Computer 2007 Dirk V. CPU 65C02 P4 Clock 4.9152 MHz NMI CLK 600 Hz IRQ Line is set to VSS 8 KByte SRAM Sony CXK5864-15l 1-CD74HC4060E 14 Bit Counter 1-CD74HC166E 1-CD74HC251E 1-SN74HC138N TI 1-SN74HC139N TI 1-74HC14AP Toshiba 1-74HC02AP Toshiba 1-74HC00AP Toshiba 1-CD74HC259E $0000-$1fff S-RAM $2000 LCD 4 Byte Shift Register writeonly right to left every 2nd char xor'd by $FF 2c00-2c07 Keyboard (8to1 Multiplexer) 74HCT251 2*8 Matrix Adr. 0x3407 ==0 !=0 2c00 CL E5 2c01 POS F6 2c02 MEMO G7 2c03 INFO A1 2c04 LEV H8 2c05 ENT B2 2c06 >0 C3 2c07 <9 D4 $3400-$3407 LED 1-6, Buzzer, Keyboard select $2400 // Chess Board $2800 // Chess Board $3000 // Chess Board $4000-7FFF Opening Modul HG550 $8000-$FFF ROM Mephisto 4 Turbo Kit 18mhz - (mm4tk) This is a replacement rom combining the turbo kit initial rom with the original MM IV. The Turbo Kit powers up to it's tiny rom, copies itself to ram, banks in normal rom, copies that to faster SRAM, then patches the checksum and the LED blink delays. If someone else wants to code up the power up banking, feel free There is an undumped MM V Turbo Kit, which will be the exact same except for location of the patches. The mm5tk just needs the normal mm5 ROM swapped out for that one to blinks the LEDs a little slower. -- Cowering (2011) ***********************************************************************************************/ #include "emu.h" #include "cpu/m6502/m65c02.h" #include "sound/beep.h" //#include "mephisto.lh" class mephisto_state : public driver_device { public: mephisto_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag) , m_maincpu(*this, "maincpu") , m_beep(*this, "beeper") , m_key1_0(*this, "KEY1_0") , m_key1_1(*this, "KEY1_1") , m_key1_2(*this, "KEY1_2") , m_key1_3(*this, "KEY1_3") , m_key1_4(*this, "KEY1_4") , m_key1_5(*this, "KEY1_5") , m_key1_6(*this, "KEY1_6") , m_key1_7(*this, "KEY1_7") , m_key2_0(*this, "KEY2_0") , m_key2_1(*this, "KEY2_1") , m_key2_2(*this, "KEY2_2") , m_key2_3(*this, "KEY2_3") , m_key2_4(*this, "KEY2_4") , m_key2_5(*this, "KEY2_5") , m_key2_6(*this, "KEY2_6") , m_key2_7(*this, "KEY2_7") { } required_device m_maincpu; required_device m_beep; DECLARE_WRITE8_MEMBER(write_lcd); DECLARE_WRITE8_MEMBER(mephisto_NMI); DECLARE_READ8_MEMBER(read_keys); DECLARE_WRITE8_MEMBER(write_led); DECLARE_WRITE8_MEMBER(write_led_mm2); UINT8 m_lcd_shift_counter; UINT8 m_led_status; //UINT8 *m_p_ram; UINT8 m_led7; UINT8 m_allowNMI; DECLARE_DRIVER_INIT(mephisto); virtual void machine_start() override; virtual void machine_reset() override; DECLARE_MACHINE_START(mm2); TIMER_DEVICE_CALLBACK_MEMBER(update_nmi); TIMER_DEVICE_CALLBACK_MEMBER(update_nmi_r5); TIMER_DEVICE_CALLBACK_MEMBER(update_irq); protected: required_ioport m_key1_0; required_ioport m_key1_1; required_ioport m_key1_2; required_ioport m_key1_3; required_ioport m_key1_4; required_ioport m_key1_5; required_ioport m_key1_6; required_ioport m_key1_7; required_ioport m_key2_0; required_ioport m_key2_1; required_ioport m_key2_2; required_ioport m_key2_3; required_ioport m_key2_4; required_ioport m_key2_5; required_ioport m_key2_6; required_ioport m_key2_7; }; WRITE8_MEMBER( mephisto_state::write_lcd ) { if (m_led7 == 0) output().set_digit_value(m_lcd_shift_counter,data); // 0x109 MM IV // 0x040 MM V //output().set_digit_value(m_lcd_shift_counter,data ^ m_p_ram[0x165]); // 0x109 MM IV // 0x040 MM V m_lcd_shift_counter--; m_lcd_shift_counter &= 3; } WRITE8_MEMBER( mephisto_state::mephisto_NMI ) { m_allowNMI = 1; } READ8_MEMBER( mephisto_state::read_keys ) { UINT8 data = 0; if (((m_led_status & 0x80) == 0x00)) { switch ( offset ) { case 0: data = m_key1_0->read(); break; case 1: data = m_key1_1->read(); break; case 2: data = m_key1_2->read(); break; case 3: data = m_key1_3->read(); break; case 4: data = m_key1_4->read(); break; case 5: data = m_key1_5->read(); break; case 6: data = m_key1_6->read(); break; case 7: data = m_key1_7->read(); break; } } else { switch ( offset ) { case 0: data = m_key2_0->read(); break; case 1: data = m_key2_1->read(); break; case 2: data = m_key2_2->read(); break; case 3: data = m_key2_3->read(); break; case 4: data = m_key2_4->read(); break; case 5: data = m_key2_5->read(); break; case 6: data = m_key2_6->read(); break; case 7: data = m_key2_7->read(); break; } } logerror("Keyboard Port = %d-%d Data = %d\n ", ((m_led_status & 0x80) == 0x00) ? 0 : 1, offset, data); return data | 0x7f; } WRITE8_MEMBER( mephisto_state::write_led ) { UINT8 LED_offset=100; data &= 0x80; if (data==0)m_led_status &= 255-(1<set_input_line(INPUT_LINE_NMI,PULSE_LINE); } m_beep->set_state(m_led_status&64?1:0); } TIMER_DEVICE_CALLBACK_MEMBER(mephisto_state::update_nmi_r5) { m_maincpu->set_input_line(INPUT_LINE_NMI,PULSE_LINE); m_beep->set_state(m_led_status&64?1:0); } TIMER_DEVICE_CALLBACK_MEMBER(mephisto_state::update_irq)//only mm2 { m_maincpu->set_input_line(M65C02_IRQ_LINE, HOLD_LINE); m_beep->set_state(m_led_status&64?1:0); } void mephisto_state::machine_start() { m_lcd_shift_counter = 3; m_allowNMI = 1; //mboard_savestate_register(); } MACHINE_START_MEMBER(mephisto_state,mm2) { m_lcd_shift_counter = 3; m_led7=0xff; //mboard_savestate_register(); } void mephisto_state::machine_reset() { m_lcd_shift_counter = 3; m_allowNMI = 1; //mboard_set_border_pieces(); //mboard_set_board(); /* adjust artwork depending on current emulation*/ if (!strcmp(machine().system().name,"mm2") ) output().set_value("MM",1); else if (!strcmp(machine().system().name,"mm4") ) output().set_value("MM",2); else if (!strcmp(machine().system().name,"mm4tk") ) output().set_value("MM",5); else if (!strcmp(machine().system().name,"mm5tk") ) output().set_value("MM",5); else if (!strcmp(machine().system().name,"mm5") ) output().set_value("MM",3); else if (!strcmp(machine().system().name,"mm50") ) output().set_value("MM",3); else if (!strcmp(machine().system().name,"rebel5") ) output().set_value("MM",4); } static MACHINE_CONFIG_START( mephisto, mephisto_state ) /* basic machine hardware */ MCFG_CPU_ADD("maincpu",M65C02,4915200) /* 65C02 */ MCFG_CPU_PROGRAM_MAP(mephisto_mem) MCFG_QUANTUM_TIME(attotime::from_hz(60)) /* sound hardware */ MCFG_SPEAKER_STANDARD_MONO("mono") MCFG_SOUND_ADD("beeper", BEEP, 3250) MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.0) MCFG_TIMER_DRIVER_ADD_PERIODIC("nmi_timer", mephisto_state, update_nmi, attotime::from_hz(600)) //MCFG_TIMER_DRIVER_ADD_PERIODIC("artwork_timer", mephisto_state, mboard_update_artwork, attotime::from_hz(100)) MACHINE_CONFIG_END static MACHINE_CONFIG_DERIVED( rebel5, mephisto ) /* basic machine hardware */ MCFG_CPU_MODIFY("maincpu") MCFG_CPU_PROGRAM_MAP(rebel5_mem) MCFG_DEVICE_REMOVE("nmi_timer") MCFG_TIMER_DRIVER_ADD_PERIODIC("nmi_timer_r5", mephisto_state, update_nmi_r5, attotime::from_hz(600)) MACHINE_CONFIG_END static MACHINE_CONFIG_DERIVED( mm2, mephisto ) MCFG_CPU_REPLACE("maincpu", M65C02, 3700000) MCFG_CPU_PROGRAM_MAP(mm2_mem) MCFG_MACHINE_START_OVERRIDE(mephisto_state, mm2 ) MCFG_DEVICE_REMOVE("nmi_timer") MCFG_TIMER_DRIVER_ADD_PERIODIC("irq_timer", mephisto_state, update_irq, attotime::from_hz(450)) MACHINE_CONFIG_END static MACHINE_CONFIG_DERIVED( mm4tk, mephisto ) MCFG_CPU_MODIFY("maincpu") MCFG_CPU_REPLACE("maincpu", M65C02, 18000000) MCFG_CPU_PROGRAM_MAP(mephisto_mem) MACHINE_CONFIG_END ROM_START(rebel5) ROM_REGION(0x10000,"maincpu",0) ROM_LOAD("rebel5.rom", 0x8000, 0x8000, CRC(8d02e1ef) SHA1(9972c75936613bd68cfd3fe62bd222e90e8b1083)) ROM_END ROM_START(mm2) ROM_REGION(0x10000,"maincpu",0) ROM_LOAD("mm2_1.bin", 0x8000, 0x4000, CRC(e2daac82) SHA1(c9fa59ca92362f8ee770733073bfa2ab8c7904ad)) ROM_LOAD("mm2_2.bin", 0xc000, 0x4000, CRC(5e296939) SHA1(badd2a377259cf738cd076d8fb245c3dc284c24d)) ROM_END ROM_START(mm4) ROM_REGION(0x10000,"maincpu",0) ROM_LOAD("mephisto4.rom", 0x8000, 0x8000, CRC(f68a4124) SHA1(d1d03a9aacc291d5cb720d2ee2a209eeba13a36c)) ROM_SYSTEM_BIOS( 0, "none", "No Opening Library" ) ROM_SYSTEM_BIOS( 1, "hg440", "HG440 Opening Library" ) ROMX_LOAD( "hg440.rom", 0x4000, 0x4000, CRC(81ffcdfd) SHA1(b0f7bcc11d1e821daf92cde31e3446c8be0bbe19), ROM_BIOS(2)) ROM_END ROM_START(mm4tk) ROM_REGION(0x10000,"maincpu",0) ROM_LOAD("mm4tk.rom", 0x8000, 0x8000, CRC(51cb36a4) SHA1(9e184b4e85bb721e794b88d8657ae8d2ff5a24af)) ROM_SYSTEM_BIOS( 0, "none", "No Opening Library" ) ROM_SYSTEM_BIOS( 1, "hg440", "HG440 Opening Library" ) ROMX_LOAD( "hg440.rom", 0x4000, 0x4000, CRC(81ffcdfd) SHA1(b0f7bcc11d1e821daf92cde31e3446c8be0bbe19), ROM_BIOS(0)) ROM_END ROM_START(mm5tk) ROM_REGION(0x10000,"maincpu",0) ROM_LOAD("mephisto5.rom", 0x8000, 0x8000, BAD_DUMP CRC(89c3d9d2) SHA1(77cd6f8eeb03c713249db140d2541e3264328048)) ROM_SYSTEM_BIOS( 0, "none", "No Opening Library" ) ROM_SYSTEM_BIOS( 1, "hg550", "HG550 Opening Library" ) ROMX_LOAD("hg550.rom", 0x4000, 0x4000, CRC(0359f13d) SHA1(833cef8302ad8d283d3f95b1d325353c7e3b8614),ROM_BIOS(0)) ROM_END ROM_START(mm5) ROM_REGION(0x10000,"maincpu",0) ROM_LOAD("mephisto5.rom", 0x8000, 0x8000, CRC(89c3d9d2) SHA1(77cd6f8eeb03c713249db140d2541e3264328048)) ROM_SYSTEM_BIOS( 0, "none", "No Opening Library" ) ROM_SYSTEM_BIOS( 1, "hg550", "HG550 Opening Library" ) ROMX_LOAD("hg550.rom", 0x4000, 0x4000, CRC(0359f13d) SHA1(833cef8302ad8d283d3f95b1d325353c7e3b8614),ROM_BIOS(2)) ROM_END ROM_START(mm50) ROM_REGION(0x10000,"maincpu",0) ROM_LOAD("mm50.rom", 0x8000, 0x8000, CRC(fcfa7e6e) SHA1(afeac3a8c957ba58cefaa27b11df974f6f2066da)) ROM_SYSTEM_BIOS( 0, "none", "No Opening Library" ) ROM_SYSTEM_BIOS( 1, "hg550", "HG550 Opening Library" ) ROMX_LOAD("hg550.rom", 0x4000, 0x4000, CRC(0359f13d) SHA1(833cef8302ad8d283d3f95b1d325353c7e3b8614),ROM_BIOS(2)) ROM_END DRIVER_INIT_MEMBER(mephisto_state,mephisto) { m_lcd_shift_counter = 3; } /*************************************************************************** Game driver(s) ***************************************************************************/ /* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS */ CONS( 1984, mm2, mm4, 0, mm2, mephisto, mephisto_state, mephisto, "Hegener & Glaser", "Mephisto MM2 Schachcomputer", MACHINE_NOT_WORKING|MACHINE_REQUIRES_ARTWORK | MACHINE_CLICKABLE_ARTWORK ) CONS( 1986, rebel5, mm4, 0, rebel5, mephisto, mephisto_state, mephisto, "Hegener & Glaser", "Mephisto Rebell 5,0 Schachcomputer", MACHINE_NOT_WORKING|MACHINE_REQUIRES_ARTWORK | MACHINE_CLICKABLE_ARTWORK ) CONS( 1987, mm4, 0, 0, mephisto, mephisto, mephisto_state, mephisto, "Hegener & Glaser", "Mephisto 4 Schachcomputer", MACHINE_NOT_WORKING|MACHINE_REQUIRES_ARTWORK | MACHINE_CLICKABLE_ARTWORK ) CONS( 1987, mm4tk, mm4, 0, mm4tk, mephisto, mephisto_state, mephisto, "Hegener & Glaser", "Mephisto 4 Schachcomputer Turbo Kit + HG440", MACHINE_NOT_WORKING|MACHINE_REQUIRES_ARTWORK | MACHINE_CLICKABLE_ARTWORK ) CONS( 1990, mm5, mm4, 0, mephisto, mephisto, mephisto_state, mephisto, "Hegener & Glaser", "Mephisto 5.1 Schachcomputer", MACHINE_NOT_WORKING|MACHINE_REQUIRES_ARTWORK | MACHINE_CLICKABLE_ARTWORK ) CONS( 1990, mm50, mm4, 0, mephisto, mephisto, mephisto_state, mephisto, "Hegener & Glaser", "Mephisto 5.0 Schachcomputer", MACHINE_NOT_WORKING|MACHINE_REQUIRES_ARTWORK | MACHINE_CLICKABLE_ARTWORK ) CONS( 1990, mm5tk, mm4, 0, mm4tk, mephisto, mephisto_state, mephisto, "Hegener & Glaser", "Mephisto 5.1 Schachcomputer Turbo Kit + HG550", MACHINE_NOT_WORKING|MACHINE_REQUIRES_ARTWORK | MACHINE_CLICKABLE_ARTWORK )