summaryrefslogtreecommitdiffstatshomepage
path: root/trunk/src/mame/drivers/esh.c
diff options
context:
space:
mode:
Diffstat (limited to 'trunk/src/mame/drivers/esh.c')
-rw-r--r--trunk/src/mame/drivers/esh.c398
1 files changed, 398 insertions, 0 deletions
diff --git a/trunk/src/mame/drivers/esh.c b/trunk/src/mame/drivers/esh.c
new file mode 100644
index 00000000000..39142cf3e7b
--- /dev/null
+++ b/trunk/src/mame/drivers/esh.c
@@ -0,0 +1,398 @@
+/*
+Funai / Gakken Esh's Aurunmilla laserdisc hardware
+Driver by Andrew Gardner with help from Daphne Source
+
+Notes:
+ (dumper's note) Esh's Aurunmilla can be played in an Interstellar cabinet by swapping the
+ main pcb and the laserdisc. Sound & video pcbs are the same. Control panel is different however.
+ Esh's Aurunmilla can be a 2 player game, while Interstellar is a 1 player only game.
+ Hold down TEST while resetting the machine - pops up test mode where...
+ The DIPs are software-controlled.
+ Two joysticks appear in the IO TEST, but the photos of the control panel I've seen show only 1.
+ Eshb has some junk in the IO TEST screen. Maybe a bad dump?
+
+Todo:
+ - LD TROUBLE message pops up after each cycle in attract. NMI-related?
+ - Convert to tilemaps (see next ToDo for feasibility).
+ - Apparently some tiles blink (in at least two different ways).
+ - 0xfe and 0xff are pretty obviously not NMI enables. They're likely LED's. Do the NMI right (somehow).
+ - Rumor has it there's an analog beep hanging off 0xf5? Implement it and finish off 0xf5 bits.
+ - NVRAM range 0xe000-0xe800 might be too large. It doesn't seem to write past 0xe600...
+ - Maybe some of the IPT_UNKNOWNs do something?
+ - Hook up LED's to the MAME lamp system.
+*/
+
+#include "emu.h"
+#include "cpu/z80/z80.h"
+#include "machine/laserdsc.h"
+#include "machine/nvram.h"
+
+
+class esh_state : public driver_device
+{
+public:
+ esh_state(const machine_config &mconfig, device_type type, const char *tag)
+ : driver_device(mconfig, type, tag) { }
+
+ device_t *m_laserdisc;
+ UINT8 *m_tile_ram;
+ UINT8 *m_tile_control_ram;
+ UINT8 m_ld_video_visible;
+};
+
+
+/* From daphne */
+#define PCB_CLOCK (18432000)
+
+
+/* VIDEO GOODS */
+static SCREEN_UPDATE( esh )
+{
+ esh_state *state = screen->machine().driver_data<esh_state>();
+ int charx, chary;
+
+ /* clear */
+ bitmap_fill(bitmap, cliprect, 0);
+
+ /* Draw tiles */
+ for (charx = 0; charx < 32; charx++)
+ {
+ for (chary = 0; chary < 32; chary++)
+ {
+ int current_screen_character = (chary*32) + charx;
+
+ int palIndex = (state->m_tile_control_ram[current_screen_character] & 0x0f);
+ int tileOffs = (state->m_tile_control_ram[current_screen_character] & 0x10) >> 4;
+ //int blinkLine = (state->m_tile_control_ram[current_screen_character] & 0x40) >> 6;
+ //int blinkChar = (state->m_tile_control_ram[current_screen_character] & 0x80) >> 7;
+
+ drawgfx_transpen(bitmap, cliprect, screen->machine().gfx[0],
+ state->m_tile_ram[current_screen_character] + (0x100 * tileOffs),
+ palIndex,
+ 0, 0, charx*8, chary*8, 0);
+ }
+ }
+
+ /* Draw sprites */
+ return 0;
+}
+
+
+
+/* MEMORY HANDLERS */
+static READ8_HANDLER(ldp_read)
+{
+ esh_state *state = space->machine().driver_data<esh_state>();
+ return laserdisc_data_r(state->m_laserdisc);
+}
+
+static WRITE8_HANDLER(ldp_write)
+{
+ esh_state *state = space->machine().driver_data<esh_state>();
+ laserdisc_data_w(state->m_laserdisc,data);
+}
+
+static WRITE8_HANDLER(misc_write)
+{
+ esh_state *state = space->machine().driver_data<esh_state>();
+ /* Bit 0 unknown */
+
+ if (data & 0x02)
+ logerror("BEEP!\n");
+
+ /* Bit 2 unknown */
+ state->m_ld_video_visible = !((data & 0x08) >> 3);
+
+ /* Bits 4-7 unknown */
+ /* They cycle through a repeating pattern though */
+}
+
+static WRITE8_HANDLER(led_writes)
+{
+ switch(offset)
+ {
+ case 0x00:
+ logerror("WRITING 0x%x to P1's START LED\n", data);
+ break;
+ case 0x01:
+ logerror("WRITING 0x%x to P2's START LED\n", data);
+ break;
+ case 0x02:
+ logerror("WRITING 0x%x to P1's BUTTON1 LED\n", data);
+ break;
+ case 0x03:
+ logerror("WRITING 0x%x to P1's BUTTON2 LED\n", data);
+ break;
+ case 0x04:
+ logerror("WRITING 0x%x to P2's BUTTON1 LED\n", data);
+ break;
+ case 0x05:
+ logerror("WRITING 0x%x to P2's BUTTON2 LED\n", data);
+ break;
+ case 0x06:
+ /* Likely coming soon */
+ break;
+ case 0x07:
+ /* Likely coming soon */
+ break;
+ }
+}
+
+static WRITE8_HANDLER(nmi_line_w)
+{
+ if (data == 0x00)
+ cputag_set_input_line(space->machine(), "maincpu", INPUT_LINE_NMI, ASSERT_LINE);
+ if (data == 0x01)
+ cputag_set_input_line(space->machine(), "maincpu", INPUT_LINE_NMI, CLEAR_LINE);
+
+ if (data != 0x00 && data != 0x01)
+ logerror("NMI line got a weird value!\n");
+}
+
+
+/* PROGRAM MAPS */
+static ADDRESS_MAP_START( z80_0_mem, AS_PROGRAM, 8 )
+ AM_RANGE(0x0000,0x3fff) AM_ROM
+ AM_RANGE(0xe000,0xe7ff) AM_RAM AM_SHARE("nvram")
+ AM_RANGE(0xf000,0xf3ff) AM_RAM AM_BASE_MEMBER(esh_state, m_tile_ram)
+ AM_RANGE(0xf400,0xf7ff) AM_RAM AM_BASE_MEMBER(esh_state, m_tile_control_ram)
+ADDRESS_MAP_END
+
+
+/* IO MAPS */
+static ADDRESS_MAP_START( z80_0_io, AS_IO, 8 )
+ ADDRESS_MAP_GLOBAL_MASK(0xff)
+ AM_RANGE(0xf0,0xf0) AM_READ_PORT("IN0")
+ AM_RANGE(0xf1,0xf1) AM_READ_PORT("IN1")
+ AM_RANGE(0xf2,0xf2) AM_READ_PORT("IN2")
+ AM_RANGE(0xf3,0xf3) AM_READ_PORT("IN3")
+ AM_RANGE(0xf4,0xf4) AM_READWRITE(ldp_read,ldp_write)
+ AM_RANGE(0xf5,0xf5) AM_WRITE(misc_write) /* Continuously writes repeating patterns */
+ AM_RANGE(0xf8,0xfd) AM_WRITE(led_writes)
+ AM_RANGE(0xfe,0xfe) AM_WRITE(nmi_line_w) /* Both 0xfe and 0xff flip quickly between 0 and 1 */
+ AM_RANGE(0xff,0xff) AM_NOP /* (they're probably not NMI enables - likely LED's like their neighbors :) */
+ADDRESS_MAP_END /* (someday 0xf8-0xff will probably be a single handler) */
+
+
+/* PORTS */
+static INPUT_PORTS_START( esh )
+ PORT_START("IN0")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_COIN1 )
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_COIN2 )
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_START1 )
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_START2 )
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_OTHER ) PORT_NAME( "TEST" ) PORT_CODE( KEYCODE_T )
+ PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN )
+
+ PORT_START("IN1")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_8WAY PORT_PLAYER(1)
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_8WAY PORT_PLAYER(1)
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_8WAY PORT_PLAYER(1)
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_8WAY PORT_PLAYER(1)
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1)
+ PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(1)
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN )
+
+ PORT_START("IN2")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_8WAY PORT_PLAYER(2)
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_8WAY PORT_PLAYER(2)
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_8WAY PORT_PLAYER(2)
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_8WAY PORT_PLAYER(2)
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2)
+ PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(2)
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN )
+
+ PORT_START("IN3")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN )
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN )
+INPUT_PORTS_END
+
+static PALETTE_INIT( esh )
+{
+ int i;
+
+ /* Oddly enough, the top 4 bits of each byte is 0 */
+ for (i = 0; i < machine.total_colors(); i++)
+ {
+ int r,g,b;
+ int bit0,bit1,bit2;
+
+ /* Presumably resistor values would help here */
+
+ /* red component */
+ bit0 = (color_prom[i+0x100] >> 0) & 0x01;
+ bit1 = (color_prom[i+0x100] >> 1) & 0x01;
+ bit2 = (color_prom[i+0x100] >> 2) & 0x01;
+ r = (0x97 * bit2) + (0x47 * bit1) + (0x21 * bit0);
+
+ /* green component */
+ bit0 = 0;
+ bit1 = (color_prom[i+0x100] >> 3) & 0x01;
+ bit2 = (color_prom[i+0x100] >> 4) & 0x01;
+ g = (0x97 * bit2) + (0x47 * bit1) + (0x21 * bit0);
+
+ /* blue component */
+ bit0 = 0;
+ bit1 = (color_prom[i+0x100] >> 5) & 0x01;
+ bit2 = (color_prom[i+0x100] >> 6) & 0x01;
+ b = (0x97 * bit2) + (0x47 * bit1) + (0x21 * bit0);
+
+ palette_set_color(machine,i,MAKE_RGB(r,g,b));
+ }
+
+ /* make color 0 transparent */
+ palette_set_color(machine, 0, MAKE_ARGB(0,0,0,0));
+}
+
+static const gfx_layout esh_gfx_layout =
+{
+ 8,8,
+ 0x1000/8,
+ 3,
+ { 0, 0x1000*8, 0x2000*8 },
+ { 0,1,2,3,4,5,6,7 },
+ { 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 },
+ 8*8
+};
+
+static GFXDECODE_START( esh )
+ GFXDECODE_ENTRY("gfx1", 0, esh_gfx_layout, 0x0, 0x100)
+GFXDECODE_END
+
+static TIMER_CALLBACK( irq_stop )
+{
+ cputag_set_input_line(machine, "maincpu", 0, CLEAR_LINE);
+}
+
+static INTERRUPT_GEN( vblank_callback_esh )
+{
+ // IRQ
+ device_set_input_line(device, 0, ASSERT_LINE);
+ device->machine().scheduler().timer_set(attotime::from_usec(50), FUNC(irq_stop));
+}
+
+static MACHINE_START( esh )
+{
+ esh_state *state = machine.driver_data<esh_state>();
+ state->m_laserdisc = machine.device("laserdisc");
+}
+
+
+/* DRIVER */
+static MACHINE_CONFIG_START( esh, esh_state )
+
+ /* main cpu */
+ MCFG_CPU_ADD("maincpu", Z80, PCB_CLOCK/6) /* The denominator is a Daphne guess based on PacMan's hardware */
+ MCFG_CPU_PROGRAM_MAP(z80_0_mem)
+ MCFG_CPU_IO_MAP(z80_0_io)
+ MCFG_CPU_VBLANK_INT("screen", vblank_callback_esh)
+
+ MCFG_NVRAM_ADD_0FILL("nvram")
+
+ MCFG_MACHINE_START(esh)
+
+ MCFG_LASERDISC_ADD("laserdisc", PIONEER_LDV1000, "screen", "ldsound")
+ MCFG_LASERDISC_OVERLAY(esh, 256, 256, BITMAP_FORMAT_INDEXED16)
+
+ /* video hardware */
+ MCFG_LASERDISC_SCREEN_ADD_NTSC("screen", BITMAP_FORMAT_INDEXED16)
+
+ MCFG_PALETTE_LENGTH(256)
+ MCFG_PALETTE_INIT(esh)
+
+ MCFG_GFXDECODE(esh)
+
+ /* sound hardware */
+ MCFG_SPEAKER_STANDARD_STEREO("lspeaker", "rspeaker")
+
+ MCFG_SOUND_ADD("ldsound", LASERDISC_SOUND, 0)
+ MCFG_SOUND_ROUTE(0, "lspeaker", 1.0)
+ MCFG_SOUND_ROUTE(1, "rspeaker", 1.0)
+MACHINE_CONFIG_END
+
+
+ROM_START( esh )
+ /* Main program CPU */
+ ROM_REGION( 0x4000, "maincpu", 0 )
+ ROM_LOAD( "is1.h8", 0x0000, 0x2000, CRC(114c912b) SHA1(7c033a102d046199f3e2c6787579dac5b5295d50) )
+ ROM_LOAD( "is2.f8", 0x2000, 0x2000, CRC(0e3b6e62) SHA1(5e8160180e20705e727329f9d70305fcde176a25) )
+
+ /* Tiles */
+ ROM_REGION( 0x3000, "gfx1", 0 )
+ ROM_LOAD( "a.m3", 0x0000, 0x1000, CRC(a04736d8) SHA1(3b642b5d7168cf4a09328eee54c532be815d2bcf) )
+ ROM_LOAD( "b.l3", 0x1000, 0x1000, CRC(9366dde7) SHA1(891db65384d47d13355b2eea37f57c34bc775c8f) )
+ ROM_LOAD( "c.k3", 0x2000, 0x1000, CRC(a936ef01) SHA1(bcacb281ccb72ceb57fb6a79380cc3a9688743c4) )
+
+ /* Color (+other) PROMs */
+ ROM_REGION( 0x400, "proms", 0 )
+ ROM_LOAD( "rgb.j1", 0x000, 0x200, CRC(1e9f795f) SHA1(61a58694929fa39b2412bc9244e5681d65a0eacb) )
+ ROM_LOAD( "h.c5", 0x200, 0x100, CRC(abde5e4b) SHA1(9dd3a7fd523b519ac613b9f08ae9cc962992cf5d) ) /* Video timing? */
+ ROM_LOAD( "v.c6", 0x300, 0x100, CRC(7157ba22) SHA1(07355f30efe46196d216356eda48a59fc622e43f) )
+
+ DISK_REGION( "laserdisc" )
+ DISK_IMAGE_READONLY( "esh", 0, NO_DUMP )
+ROM_END
+
+ROM_START( esha )
+ /* Main program CPU */
+ ROM_REGION( 0x4000, "maincpu", 0 )
+ ROM_LOAD( "is1.h8", 0x0000, 0x2000, CRC(114c912b) SHA1(7c033a102d046199f3e2c6787579dac5b5295d50) )
+ ROM_LOAD( "is2.f8", 0x2000, 0x2000, CRC(7a562f49) SHA1(acfa49b3b3d96b001a5dbdee39cbb0ca80be1763) )
+
+ /* Tiles */
+ ROM_REGION( 0x3000, "gfx1", 0 )
+ ROM_LOAD( "a.m3", 0x0000, 0x1000, CRC(a04736d8) SHA1(3b642b5d7168cf4a09328eee54c532be815d2bcf) )
+ ROM_LOAD( "b.l3", 0x1000, 0x1000, CRC(9366dde7) SHA1(891db65384d47d13355b2eea37f57c34bc775c8f) )
+ ROM_LOAD( "c.k3", 0x2000, 0x1000, CRC(a936ef01) SHA1(bcacb281ccb72ceb57fb6a79380cc3a9688743c4) )
+
+ /* Color (+other) PROMs */
+ ROM_REGION( 0x400, "proms", 0 )
+ ROM_LOAD( "rgb.j1", 0x000, 0x200, CRC(1e9f795f) SHA1(61a58694929fa39b2412bc9244e5681d65a0eacb) )
+ ROM_LOAD( "h.c5", 0x200, 0x100, CRC(abde5e4b) SHA1(9dd3a7fd523b519ac613b9f08ae9cc962992cf5d) ) /* Video timing? */
+ ROM_LOAD( "v.c6", 0x300, 0x100, CRC(7157ba22) SHA1(07355f30efe46196d216356eda48a59fc622e43f) )
+
+ DISK_REGION( "laserdisc" )
+ DISK_IMAGE_READONLY( "esh", 0, NO_DUMP )
+ROM_END
+
+ROM_START( eshb )
+ /* Main program CPU */
+ ROM_REGION( 0x4000, "maincpu", 0 )
+ ROM_LOAD( "1.h8", 0x0000, 0x2000, CRC(8d27d363) SHA1(529d8e4283e736edb5a9193df1ed8d0164471864) ) /* Hand-written ROM label */
+ ROM_LOAD( "is2.f8", 0x2000, 0x2000, CRC(0e3b6e62) SHA1(5e8160180e20705e727329f9d70305fcde176a25) )
+
+ /* Tiles */
+ ROM_REGION( 0x3000, "gfx1", 0 )
+ ROM_LOAD( "a.m3", 0x0000, 0x1000, CRC(a04736d8) SHA1(3b642b5d7168cf4a09328eee54c532be815d2bcf) )
+ ROM_LOAD( "b.l3", 0x1000, 0x1000, CRC(9366dde7) SHA1(891db65384d47d13355b2eea37f57c34bc775c8f) )
+ ROM_LOAD( "c.k3", 0x2000, 0x1000, CRC(a936ef01) SHA1(bcacb281ccb72ceb57fb6a79380cc3a9688743c4) )
+
+ /* Color (+other) PROMs */
+ ROM_REGION( 0x400, "proms", 0 )
+ ROM_LOAD( "rgb.j1", 0x000, 0x200, CRC(1e9f795f) SHA1(61a58694929fa39b2412bc9244e5681d65a0eacb) )
+ ROM_LOAD( "h.c5", 0x200, 0x100, CRC(abde5e4b) SHA1(9dd3a7fd523b519ac613b9f08ae9cc962992cf5d) ) /* Video timing? */
+ ROM_LOAD( "v.c6", 0x300, 0x100, CRC(7157ba22) SHA1(07355f30efe46196d216356eda48a59fc622e43f) )
+
+ DISK_REGION( "laserdisc" )
+ DISK_IMAGE_READONLY( "esh", 0, NO_DUMP )
+ROM_END
+
+
+static DRIVER_INIT( esh )
+{
+}
+
+/* YEAR NAME PARENT MACHINE INPUT INIT MONITOR COMPANY FULLNAME FLAGS */
+GAME( 1983, esh, 0, esh, esh, esh, ROT0, "Funai/Gakken", "Esh's Aurunmilla (set 1)", GAME_NOT_WORKING|GAME_NO_SOUND)
+GAME( 1983, esha, esh, esh, esh, esh, ROT0, "Funai/Gakken", "Esh's Aurunmilla (set 2)", GAME_NOT_WORKING|GAME_NO_SOUND)
+GAME( 1983, eshb, esh, esh, esh, esh, ROT0, "Funai/Gakken", "Esh's Aurunmilla (set 3)", GAME_NOT_WORKING|GAME_NO_SOUND)