diff options
Diffstat (limited to 'src/mame/drivers/elecbowl.cpp')
-rw-r--r-- | src/mame/drivers/elecbowl.cpp | 222 |
1 files changed, 222 insertions, 0 deletions
diff --git a/src/mame/drivers/elecbowl.cpp b/src/mame/drivers/elecbowl.cpp new file mode 100644 index 00000000000..934bdd1f719 --- /dev/null +++ b/src/mame/drivers/elecbowl.cpp @@ -0,0 +1,222 @@ +// license:BSD-3-Clause +// copyright-holders:hap, Kevin Horton +/*************************************************************************** + + ** subclass of hh_tms1k_state (includes/hh_tms1k.h, drivers/hh_tms1k.c) ** + + Marx Series 300 Electronic Bowling Game + Main board: + * TMS1100NLL MP3403 DBS 7836 SINGAPORE + * 4*SN75492 quad segment driver, 2*SN74259 8-line demultiplexer, + 2*CD4043 quad r/s input latch + * 5 7seg LEDs, 15 lamps(10 lamps projected to bowling pins reflection), + 1bit-sound with crude volume control + * edge connector to sensors(switches trigger when ball rolls over) + and other inputs + + lamp translation table: SN74259.u5(mux 1) goes to MAME output lamp5x, + SN74259.u6(mux 2) goes to MAME output lamp6x. u1-u3 are SN75492 ICs, + where other: u1 A2 is N/C, u3 A1 is from O2 and goes to digits seg C. + + u5 Q0 -> u1 A4 -> L2 (pin #2) u6 Q0 -> u3 A4 -> L1 (pin #1) + u5 Q1 -> u1 A5 -> L4 (pin #4) u6 Q1 -> u3 A5 -> L5 (pin #5) + u5 Q2 -> u1 A6 -> L7 (pin #7) u6 Q2 -> u2 A3 -> L11 (player 1) + u5 Q3 -> u1 A1 -> L8 (pin #8) u6 Q3 -> u2 A2 -> L12 (player 2) + u5 Q4 -> u3 A2 -> L3 (pin #3) u6 Q4 -> u2 A1 -> L15 (?) + u5 Q5 -> u2 A6 -> L6 (pin #6) u6 Q5 -> u3 A6 -> L14 (?) + u5 Q6 -> u2 A5 -> L10 (pin #10) u6 Q6 -> u1 A3 -> L13 (spare) + u5 Q7 -> u2 A4 -> L9 (pin #9) u6 Q7 -> u3 A3 -> digit 4 B+C + +***************************************************************************/ + +#include "includes/hh_tms1k.h" +#include "elecbowl.lh" + + +class elecbowl_state : public hh_tms1k_state +{ +public: + elecbowl_state(const machine_config &mconfig, device_type type, const char *tag) + : hh_tms1k_state(mconfig, type, tag) + { } + + void prepare_display(); + DECLARE_WRITE16_MEMBER(write_r); + DECLARE_WRITE16_MEMBER(write_o); + DECLARE_READ8_MEMBER(read_k); +}; + + +/*************************************************************************** + + Display + +***************************************************************************/ + +void elecbowl_state::prepare_display() +{ + // standard 7segs + for (int y = 0; y < 4; y++) + { + m_display_segmask[y] = 0x7f; + m_display_state[y] = (m_r >> (y + 4) & 1) ? m_o : 0; + } + + // lamp muxes + UINT8 mask = 1 << (m_o & 7); + UINT8 d = (m_r & 2) ? mask : 0; + if (~m_r & 1) + m_display_state[5] = (m_display_state[5] & ~mask) | d; + if (~m_r & 4) + m_display_state[6] = (m_display_state[6] & ~mask) | d; + + // digit 4 is from mux2 Q7 + m_display_segmask[4] = 6; + m_display_state[4] = (m_display_state[6] & 0x80) ? 6 : 0; + + set_display_size(8, 7); + display_update(); +} + + + +/*************************************************************************** + + I/O + +***************************************************************************/ + +WRITE16_MEMBER(elecbowl_state::write_r) +{ + // R5-R7,R10: input mux + m_inp_mux = (data >> 5 & 7) | (data >> 7 & 8); + + // R9: speaker out + // R3,R8: speaker volume.. + m_speaker->level_w(data >> 9 & 1); + + // R4-R7: select digit + // R0,R2: lamp mux1,2 _enable + // R1: lamp muxes state + m_r = data; + prepare_display(); +} + +WRITE16_MEMBER(elecbowl_state::write_o) +{ + //if (data & 0x80) printf("%X ",data&0x7f); + + // O0-O2: lamp muxes select + // O0-O6: digit segments A-G + // O7: N/C + m_o = data & 0x7f; + prepare_display(); +} + +READ8_MEMBER(elecbowl_state::read_k) +{ + // K: multiplexed inputs + return read_inputs(4); +} + + + +/*************************************************************************** + + Inputs + +***************************************************************************/ + +static INPUT_PORTS_START( elecbowl ) + PORT_START("IN.0") // R5 + PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_1) + PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_2) + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_3) + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_4) + + PORT_START("IN.1") // R6 + PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_Q) + PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_W) + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_E) // reset/test? + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_R) // reset/test? + + PORT_START("IN.2") // R7 + PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_A) + PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_S) + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_D) + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_F) + + PORT_START("IN.3") // R10 + PORT_BIT(0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_Z) + PORT_BIT(0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_X) + PORT_BIT(0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_C) + PORT_BIT(0x08, IP_ACTIVE_HIGH, IPT_KEYBOARD) PORT_CODE(KEYCODE_V) // 2 players sw? +INPUT_PORTS_END + + + +/*************************************************************************** + + Machine Config + +***************************************************************************/ + +// output PLA is not dumped +static const UINT16 elecbowl_output_pla[0x20] = +{ + lA+lB+lC+lD+lE+lF, // 0 + lB+lC, // 1 + lA+lB+lG+lE+lD, // 2 + lA+lB+lG+lC+lD, // 3 + lF+lB+lG+lC, // 4 + lA+lF+lG+lC+lD, // 5 + lA+lF+lG+lC+lD+lE, // 6 + lA+lB+lC, // 7 + lA+lB+lC+lD+lE+lF+lG, // 8 + lA+lB+lG+lF+lC+lD, // 9 + + 0x8a, 0x8b, 0x8c, 0x8d, 0x8e, 0x8f, + 0,1,2,3,4,5,6,7, // lamp muxes select + 0x98, 0x99, 0x9a, 0x9b, 0x9c, 0x9d, 0x9e, 0x9f +}; + +static MACHINE_CONFIG_START( elecbowl, elecbowl_state ) + + /* basic machine hardware */ + MCFG_CPU_ADD("maincpu", TMS1100, 350000) // RC osc. R=33K, C=100pf -> ~350kHz + MCFG_TMS1XXX_OUTPUT_PLA(elecbowl_output_pla) + MCFG_TMS1XXX_READ_K_CB(READ8(elecbowl_state, read_k)) + MCFG_TMS1XXX_WRITE_R_CB(WRITE16(elecbowl_state, write_r)) + MCFG_TMS1XXX_WRITE_O_CB(WRITE16(elecbowl_state, write_o)) + + MCFG_TIMER_DRIVER_ADD_PERIODIC("display_decay", hh_tms1k_state, display_decay_tick, attotime::from_msec(1)) + MCFG_DEFAULT_LAYOUT(layout_elecbowl) + + /* no video! */ + + /* sound hardware */ + MCFG_SPEAKER_STANDARD_MONO("mono") + MCFG_SOUND_ADD("speaker", SPEAKER_SOUND, 0) + MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.25) +MACHINE_CONFIG_END + + + +/*************************************************************************** + + Game driver(s) + +***************************************************************************/ + +ROM_START( elecbowl ) + ROM_REGION( 0x0800, "maincpu", 0 ) + ROM_LOAD( "mp3403.u9", 0x0000, 0x0800, CRC(9eabaa7d) SHA1(b1f54587ed7f2bbf3a5d49075c807296384c2b06) ) + + ROM_REGION( 867, "maincpu:mpla", 0 ) + ROM_LOAD( "tms1100_common1_micro.pla", 0, 867, BAD_DUMP CRC(62445fc9) SHA1(d6297f2a4bc7a870b76cc498d19dbb0ce7d69fec) ) // not verified + ROM_REGION( 365, "maincpu:opla", 0 ) + ROM_LOAD( "tms1100_elecbowl_output.pla", 0, 365, NO_DUMP ) +ROM_END + + +CONS( 1978, elecbowl, 0, 0, elecbowl, elecbowl, driver_device, 0, "Marx", "Electronic Bowling (Marx)", MACHINE_SUPPORTS_SAVE | MACHINE_IMPERFECT_SOUND | MACHINE_MECHANICAL | MACHINE_NOT_WORKING ) |