diff options
author | 2012-08-21 10:41:19 +0000 | |
---|---|---|
committer | 2012-08-21 10:41:19 +0000 | |
commit | 7285b359d259b2ae0fdf85096571c386ec8c991a (patch) | |
tree | a027aff57f1a255f9ec6cfd3b68cabe4b6683998 /src/mess/drivers/eacc.c | |
parent | 67c425e90757876a6716b7867df30c0149912e74 (diff) |
Merge of MESS sources (no whatsnew)
Diffstat (limited to 'src/mess/drivers/eacc.c')
-rw-r--r-- | src/mess/drivers/eacc.c | 287 |
1 files changed, 287 insertions, 0 deletions
diff --git a/src/mess/drivers/eacc.c b/src/mess/drivers/eacc.c new file mode 100644 index 00000000000..1d5bcfa3488 --- /dev/null +++ b/src/mess/drivers/eacc.c @@ -0,0 +1,287 @@ +/****************************************************************************** +* +* EA Car Computer +* by Robbbert, March 2011. +* +* Described in Electronics Australia magazine during 1982. +* Construction and usage: http://messui.the-chronicles.org/comp/eacc.pdf +* +* The only RAM is the 128 bytes that comes inside the CPU. +* +* This computer is mounted in a car, and various sensors (fuel flow, etc) +* are connected up. By pressing the appropriate buttons various statistics +* may be obtained. +* +* Memory Map +* 0000-007F internal ram +* 4000-7FFF ROM +* 8000-BFFF 6821 +* C000-FFFF ROM (mirror) +* +* The ROM was typed in twice from the dump in the magazine article, and the +* results compared. Only one byte was different, so I can be confident that +* it has been typed in properly. +* +* Setting up: You need to enter the number of expected pulses from the fuel +* and distance sensors. Paste this: 5 6M123N 7M400N (start, set litres cal to +* 123 pulses. set km cal to 400 pulses). Then paste this: 1950M0N 1845M0N (set +* petrol tank capacity to 50 litres, set current amount of petrol to 45). +* Now enter: 28M100N (the journey is 100km). Press 5 to start the journey. +* All settings are saved in nvram. +* +* Stats you can see while travelling: +* 0 - time elapsed +* 08 - time remaining +* 1 - fuel used +* 18 - fuel left +* 2 - km travelled +* 28 - km remaining +* 29 - km that could be travelled with the fuel you have left +* 3 - speed now +* 39 - average speed +* 4 - fuel consumption now (litres per 100km) +* 49 - fuel average consumption +* +******************************************************************************/ + +/* Core includes */ +#include "emu.h" +#include "cpu/m6800/m6800.h" +#include "eacc.lh" +#include "machine/6821pia.h" +#include "machine/nvram.h" + +#define MACHINE_RESET_MEMBER(name) void name::machine_reset() + +class eacc_state : public driver_device +{ +public: + eacc_state(const machine_config &mconfig, device_type type, const char *tag) + : driver_device(mconfig, type, tag), + m_maincpu(*this, "maincpu"), + m_pia(*this, "pia"), + m_p_nvram(*this, "nvram") + { } + + DECLARE_READ_LINE_MEMBER( eacc_cb1_r ); + DECLARE_READ_LINE_MEMBER( eacc_distance_r ); + DECLARE_READ_LINE_MEMBER( eacc_fuel_sensor_r ); + DECLARE_READ8_MEMBER( eacc_keyboard_r ); + DECLARE_WRITE_LINE_MEMBER( eacc_cb2_w ); + DECLARE_WRITE8_MEMBER( eacc_digit_w ); + DECLARE_WRITE8_MEMBER( eacc_segment_w ); + bool m_cb1; + bool m_cb2; + bool m_nmi; + required_device<cpu_device> m_maincpu; + required_device<device_t> m_pia; + required_shared_ptr<UINT8> m_p_nvram; + virtual void machine_reset(); +private: + UINT8 m_digit; +}; + + + + +/****************************************************************************** + Address Maps +******************************************************************************/ + +static ADDRESS_MAP_START(eacc_mem, AS_PROGRAM, 8, eacc_state) + ADDRESS_MAP_UNMAP_HIGH + ADDRESS_MAP_GLOBAL_MASK(0xc7ff) // A11,A12,A13 not connected + AM_RANGE(0x0000, 0x001f) AM_RAM AM_SHARE("nvram") // inside cpu, battery-backed + AM_RANGE(0x0020, 0x007f) AM_RAM // inside cpu + AM_RANGE(0x6000, 0x67ff) AM_ROM AM_MIRROR(0x8000) + AM_RANGE(0x8004, 0x8007) AM_MIRROR(0x7fc) AM_DEVREADWRITE("pia", pia6821_device, read, write) +ADDRESS_MAP_END + + +/****************************************************************************** + Input Ports +******************************************************************************/ + +static INPUT_PORTS_START(eacc) + PORT_START("X0") + PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("6 Litres Cal") PORT_CODE(KEYCODE_6_PAD) PORT_CHAR('6') + PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("ENTER") PORT_CODE(KEYCODE_ENTER_PAD) PORT_CHAR('M') + PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("2 km") PORT_CODE(KEYCODE_2_PAD) PORT_CHAR('2') + PORT_BIT( 0xf8, 0, IPT_UNUSED ) + + PORT_START("X1") + PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("5 START") PORT_CODE(KEYCODE_5_PAD) PORT_CHAR('5') + PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("END") PORT_CODE(KEYCODE_PLUS_PAD) PORT_CHAR('N') + PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("3 km/h") PORT_CODE(KEYCODE_3_PAD) PORT_CHAR('3') + PORT_BIT( 0xf8, 0, IPT_UNUSED ) + + PORT_START("X2") + PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("7 Km Cal") PORT_CODE(KEYCODE_7_PAD) PORT_CHAR('7') + PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("0 hour.min") PORT_CODE(KEYCODE_0_PAD) PORT_CHAR('0') + PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("4 l/100km") PORT_CODE(KEYCODE_4_PAD) PORT_CHAR('4') + PORT_BIT( 0xf8, 0, IPT_UNUSED ) + + PORT_START("X3") + PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("8 REM") PORT_CODE(KEYCODE_8_PAD) PORT_CHAR('8') + PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("1 litres") PORT_CODE(KEYCODE_1_PAD) PORT_CHAR('1') + PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_KEYBOARD ) PORT_NAME("9 AV") PORT_CODE(KEYCODE_9_PAD) PORT_CHAR('9') + PORT_BIT( 0xf8, 0, IPT_UNUSED ) +INPUT_PORTS_END + +MACHINE_RESET_MEMBER(eacc_state) +{ + m_cb2 = 0; +} + +static TIMER_DEVICE_CALLBACK( eacc_cb1 ) +{ + eacc_state *state = timer.machine().driver_data<eacc_state>(); + state->m_cb1 ^= 1; // 15hz + if (state->m_cb2) + device_set_input_line(state->m_maincpu, M6800_IRQ_LINE, ASSERT_LINE); +} + +static TIMER_DEVICE_CALLBACK( eacc_nmi ) +{ + eacc_state *state = timer.machine().driver_data<eacc_state>(); + + if (state->m_cb2) + { + state->m_nmi = true; + device_set_input_line(state->m_maincpu, INPUT_LINE_NMI, ASSERT_LINE); + } +} + +READ_LINE_MEMBER( eacc_state::eacc_cb1_r ) +{ + return (m_cb2) ? m_cb1 : 1; +} + +READ_LINE_MEMBER( eacc_state::eacc_distance_r ) +{ + return machine().rand() & 1; // needs random pulses to simulate movement +} + +READ_LINE_MEMBER( eacc_state::eacc_fuel_sensor_r ) +{ + return machine().rand() & 1; // needs random pulses to simulate fuel usage +} + +WRITE_LINE_MEMBER( eacc_state::eacc_cb2_w ) +{ + m_cb2 = state; +} + +READ8_MEMBER( eacc_state::eacc_keyboard_r ) +{ + UINT8 data = m_digit; + + if (BIT(m_digit, 3)) + data |= ioport("X0")->read(); + if (BIT(m_digit, 4)) + data |= ioport("X1")->read(); + if (BIT(m_digit, 5)) + data |= ioport("X2")->read(); + if (BIT(m_digit, 6)) + data |= ioport("X3")->read(); + + return data; +} + +WRITE8_MEMBER( eacc_state::eacc_segment_w ) +{ + //d7 segment dot + //d6 segment c + //d5 segment d + //d4 segment e + //d3 segment a + //d2 segment b + //d1 segment f + //d0 segment g + + if (!m_nmi) + { + UINT8 i; + if (BIT(m_digit, 7)) + { + char lednum[6]; + data ^= 0xff; + + for (i = 0; i < 8; i++) + { + sprintf(lednum,"led%d",i); + output_set_value(lednum, BIT(data, i)); + } + } + else + { + for (i = 3; i < 7; i++) + if (BIT(m_digit, i)) + output_set_digit_value(i, BITSWAP8(data, 7, 0, 1, 4, 5, 6, 2, 3)); + } + } +} + +WRITE8_MEMBER( eacc_state::eacc_digit_w ) +{ + if (m_nmi) + { + device_set_input_line(m_maincpu, INPUT_LINE_NMI, CLEAR_LINE); + m_nmi = false; + } + m_digit = data & 0xf8; +} + +static const pia6821_interface eacc_mc6821_intf = +{ + DEVCB_NULL, /* port A input */ + DEVCB_DRIVER_MEMBER(eacc_state, eacc_keyboard_r), /* port B input - PB0,1,2 keyboard */ + DEVCB_DRIVER_LINE_MEMBER(eacc_state, eacc_distance_r), /* CA1 input - pulses as car moves */ + DEVCB_DRIVER_LINE_MEMBER(eacc_state, eacc_cb1_r), /* CB1 input - NMI pulse at 15Hz */ + DEVCB_DRIVER_LINE_MEMBER(eacc_state, eacc_fuel_sensor_r), /* CA2 input - pulses as fuel consumed */ + DEVCB_NULL, /* CB2 input */ + DEVCB_DRIVER_MEMBER(eacc_state, eacc_segment_w), /* port A output */ + DEVCB_DRIVER_MEMBER(eacc_state, eacc_digit_w), /* port B output */ + DEVCB_NULL, /* CA2 output */ + DEVCB_DRIVER_LINE_MEMBER(eacc_state, eacc_cb2_w), /* CB2 output - high after boot complete */ + DEVCB_CPU_INPUT_LINE("maincpu", M6800_IRQ_LINE), /* IRQA output */ + DEVCB_CPU_INPUT_LINE("maincpu", M6800_IRQ_LINE) /* IRQB output */ +}; + + +/****************************************************************************** + Machine Drivers +******************************************************************************/ + +static MACHINE_CONFIG_START( eacc, eacc_state ) + /* basic machine hardware */ + MCFG_CPU_ADD("maincpu", M6802, XTAL_3_579545MHz) /* Divided by 4 inside the m6802*/ + MCFG_CPU_PROGRAM_MAP(eacc_mem) + + MCFG_DEFAULT_LAYOUT(layout_eacc) + + MCFG_PIA6821_ADD("pia", eacc_mc6821_intf) + MCFG_NVRAM_ADD_0FILL("nvram") + MCFG_TIMER_ADD_PERIODIC("eacc_nmi", eacc_nmi, attotime::from_hz(600) ) + MCFG_TIMER_ADD_PERIODIC("eacc_cb1", eacc_cb1, attotime::from_hz(30) ) +MACHINE_CONFIG_END + + + +/****************************************************************************** + ROM Definitions +******************************************************************************/ + +ROM_START(eacc) + ROM_REGION(0x10000, "maincpu", 0) + ROM_LOAD("eacc.bin", 0x4000, 0x0800, CRC(287a63c0) SHA1(f61b397d33ea40e5742e34d5f5468572125e8b39) ) +ROM_END + + +/****************************************************************************** + Drivers +******************************************************************************/ + +/* YEAR NAME PARENT COMPAT MACHINE INPUT INIT COMPANY FULLNAME FLAGS */ +COMP( 1982, eacc, 0, 0, eacc, eacc, driver_device, 0, "Electronics Australia", "EA Car Computer", GAME_NO_SOUND_HW) + |