// license:GPL-2.0+
// copyright-holders:Peter Trauner
/******************************************************************************
mk1.c
Driver file to handle emulation of the Novag/Videomaster Chess Champion MK 1
by PeT mess@utanet.at 2000,2001.
Minor updates by Wilbert Pol - 2007
Hardware descriptions:
- An F8 3850 CPU accompanied by a 3853 memory interface
Variations seen:
- MOSTEK MK 3853N 7915 Philippines ( static memory interface for f8)
- MOSTEK MK 3850N-3 7917 Philipines (fairchild f8 cpu)
- 3850PK F7901 SINGAPORE (Fairchild F8 CPU)
- 3853PK F7851 SINGAPORE (static memory interface for F8)
- 2KB 2316 compatible ROM
Variations seen:
- Signetics 7916E C48091 82S210-1 COPYRIGHT
- RO-3-8316A 8316A-4480 7904 TAIWAN
- 2 x 2111 256x4 SRAM to provide 256 bytes of RAM
Variations seen:
- AM9111 BPC / P2111A-4 7851
- 16 keys placed in a 4 x 4 matrix
- Power on switch
- L/S switch. This switch is directly tied to the RESET pin of the F8 CPU.
This allows the user to reset the CPU without destroying the RAM contents.
- A 4 character 11 segment digit display using a 15 pin interface. Of the 15
pins 3 pins are not connected, so three segments are never used and this
leaves a standard 7 segments display with a dot in the lower right.
- The digit display is driven by two other components:
- SN75492N MALAYSIA 7840B
- ULN2033A 7847
- Hardware addressing is controlled by a NBF4001AE.
- Unknown if there is a speaker.
TODO:
- Figure out exact clock frequency
******************************************************************************/
#include "emu.h"
#include "cpu/f8/f8.h"
#include "machine/f3853.h"
#include "machine/timer.h"
#include "mk1.lh"
class mk1_state : public driver_device
{
public:
mk1_state(const machine_config &mconfig, device_type type, const char *tag)
: driver_device(mconfig, type, tag)
, m_maincpu(*this, "maincpu")
, m_digits(*this, "digit%u", 0U)
, m_leds(*this, "led%u", 0U)
{ }
void mk1(machine_config &config);
private:
DECLARE_READ8_MEMBER(mk1_f8_r);
DECLARE_WRITE8_MEMBER(mk1_f8_w);
TIMER_DEVICE_CALLBACK_MEMBER(mk1_update_leds);
void mk1_io(address_map &map);
void mk1_mem(address_map &map);
virtual void machine_start() override;
uint8_t m_f8[2];
uint8_t m_led_data[4];
required_device<cpu_device> m_maincpu;
output_finder<4> m_digits;
output_finder<4> m_leds;
};
#define MAIN_CLOCK 1000000
READ8_MEMBER( mk1_state::mk1_f8_r )
{
uint8_t i, data = m_f8[offset];
if ( offset == 0 )
{
if (BIT(data, 0)) data |= ioport("LINE1")->read();
if (BIT(data, 1)) data |= ioport("LINE2")->read();
if (BIT(data, 2)) data |= ioport("LINE3")->read();
if (BIT(data, 3)) data |= ioport("LINE4")->read();
for (i = 4; i < 8; i++)
{
if (BIT(data, i))
{
if (BIT(ioport("LINE1")->read(), i)) data |= 1;
if (BIT(ioport("LINE2")->read(), i)) data |= 2;
if (BIT(ioport("LINE3")->read(), i)) data |= 4;
if (BIT(ioport("LINE4")->read(), i)) data |= 8;
}
}
}
return data;
}
WRITE8_MEMBER( mk1_state::mk1_f8_w )
{
/* 0 is high and allows also input */
m_f8[offset] = data;
if ( ! ( m_f8[1] & 1 ) ) m_led_data[0] = bitswap<8>( m_f8[0],2,1,3,4,5,6,7,0 );
if ( ! ( m_f8[1] & 2 ) ) m_led_data[1] = bitswap<8>( m_f8[0],2,1,3,4,5,6,7,0 );
if ( ! ( m_f8[1] & 4 ) ) m_led_data[2] = bitswap<8>( m_f8[0],2,1,3,4,5,6,7,0 );
if ( ! ( m_f8[1] & 8 ) ) m_led_data[3] = bitswap<8>( m_f8[0],2,1,3,4,5,6,7,0 );
}
void mk1_state::mk1_mem(address_map &map)
{
map(0x0000, 0x07ff).rom();
map(0x1800, 0x18ff).ram();
}
void mk1_state::mk1_io(address_map &map)
{
map(0x0, 0x1).rw(FUNC(mk1_state::mk1_f8_r), FUNC(mk1_state::mk1_f8_w));
map(0xc, 0xf).rw("f3853", FUNC(f3853_device::read), FUNC(f3853_device::write));
}
static INPUT_PORTS_START( mk1 )
PORT_START("RESET") /* 0 */
PORT_DIPNAME ( 0x01, 0x01, "Switch")
PORT_DIPSETTING( 0, "L" )
PORT_DIPSETTING( 1, "S" )
PORT_START("LINE1") /* 1 */
PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("White A King") PORT_CODE(KEYCODE_A)
PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("White B Queen") PORT_CODE(KEYCODE_B)
PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("White C Bishop") PORT_CODE(KEYCODE_C)
PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("White D PLAY") PORT_CODE(KEYCODE_D)
PORT_BIT(0x0f, IP_ACTIVE_HIGH, IPT_UNUSED )
PORT_START("LINE2") /* 2 */
PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("White E Knight") PORT_CODE(KEYCODE_E)
PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("White F Castle") PORT_CODE(KEYCODE_F)
PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("White G Pawn") PORT_CODE(KEYCODE_G)
PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("White H md") PORT_CODE(KEYCODE_H)
PORT_BIT(0x0f, IP_ACTIVE_HIGH, IPT_UNUSED )
PORT_START("LINE3") /* 3 */
PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("Black 1 King") PORT_CODE(KEYCODE_1)
PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("Black 2 Queen") PORT_CODE(KEYCODE_2)
PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("Black 3 Bishop") PORT_CODE(KEYCODE_3)
PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("Black 4 fp") PORT_CODE(KEYCODE_4)
PORT_BIT(0x0f, IP_ACTIVE_HIGH, IPT_UNUSED )
PORT_START("LINE4") /* 4 */
PORT_BIT(0x80, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("Black 5 Knight") PORT_CODE(KEYCODE_5)
PORT_BIT(0x40, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("Black 6 Castle") PORT_CODE(KEYCODE_6)
PORT_BIT(0x20, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("Black 7 Pawn") PORT_CODE(KEYCODE_7)
PORT_BIT(0x10, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_NAME("Black 8 ep") PORT_CODE(KEYCODE_8)
PORT_BIT(0x0f, IP_ACTIVE_HIGH, IPT_UNUSED )
INPUT_PORTS_END
TIMER_DEVICE_CALLBACK_MEMBER(mk1_state::mk1_update_leds)
{
for (int i = 0; i < 4; i++)
{
m_digits[i] = m_led_data[i] >> 1;
m_leds[i] = m_led_data[i] & 0x01;
m_led_data[i] = 0;
}
}
void mk1_state::machine_start()
{
m_digits.resolve();
m_leds.resolve();
}
MACHINE_CONFIG_START(mk1_state::mk1)
/* basic machine hardware */
MCFG_DEVICE_ADD( "maincpu", F8, MAIN_CLOCK ) /* MK3850 */
MCFG_DEVICE_PROGRAM_MAP(mk1_mem)
MCFG_DEVICE_IO_MAP(mk1_io)
MCFG_DEVICE_IRQ_ACKNOWLEDGE_DEVICE("f3853", f3853_device, int_acknowledge)
MCFG_QUANTUM_TIME(attotime::from_hz(60))
f3853_device &f3853(F3853(config, "f3853", MAIN_CLOCK));
f3853.int_req_callback().set_inputline("maincpu", F8_INPUT_LINE_INT_REQ);
/* video hardware */
config.set_default_layout(layout_mk1);
MCFG_TIMER_DRIVER_ADD_PERIODIC("led_timer", mk1_state, mk1_update_leds, attotime::from_hz(30))
MACHINE_CONFIG_END
ROM_START( ccmk1 )
ROM_REGION(0x10000,"maincpu",0)
ROM_LOAD("82c210-1", 0x0000, 0x800, CRC(278f7bf3) SHA1(b384c95ba691d52dfdddd35987a71e9746a46170))
ROM_END
/***************************************************************************
Game driver(s)
***************************************************************************/
// seams to be developed by mostek (MK)
// YEAR NAME PARENT COMPAT MACHINE INPUT STATE INIT COMPANY FULLNAME FLAGS
CONS( 1979, ccmk1, 0, 0, mk1, mk1, mk1_state, empty_init, "Novag", "Chess Champion: MK I", MACHINE_NO_SOUND_HW )