/***************************************************************************
Model Racing Dribbling hardware
driver by Aaron Giles
Games supported:
* Dribbling
****************************************************************************
Memory map
****************************************************************************
========================================================================
CPU #1
========================================================================
tbd
========================================================================
Interrupts:
NMI not connected
IRQ generated by VBLANK
========================================================================
***************************************************************************/
#include "driver.h"
#include "cpu/z80/z80.h"
#include "machine/8255ppi.h"
#include "dribling.h"
/*************************************
*
* Global variables
*
*************************************/
/* referenced by the video hardware */
UINT8 dribling_abca;
static UINT8 dr, ds, sh;
static UINT8 input_mux;
static UINT8 di;
/*************************************
*
* Interrupt generation
*
*************************************/
static INTERRUPT_GEN( dribling_irq_gen )
{
if (di)
cpu_set_input_line(device, 0, ASSERT_LINE);
}
/*************************************
*
* PPI inputs
*
*************************************/
static READ8_DEVICE_HANDLER( dsr_r )
{
/* return DSR0-7 */
return (ds << sh) | (dr >> (8 - sh));
}
static READ8_DEVICE_HANDLER( input_mux0_r )
{
/* low value in the given bit selects */
if (!(input_mux & 0x01))
return input_port_read(device->machine, "MUX0");
else if (!(input_mux & 0x02))
return input_port_read(device->machine, "MUX1");
else if (!(input_mux & 0x04))
return input_port_read(device->machine, "MUX2");
return 0xff;
}
/*************************************
*
* PPI outputs
*
*************************************/
static WRITE8_DEVICE_HANDLER( misc_w )
{
/* bit 7 = di */
di = (data >> 7) & 1;
if (!di)
cpu_set_input_line(device->machine->cpu[0], 0, CLEAR_LINE);
/* bit 6 = parata */
/* bit 5 = ab. campo */
dribling_abca = (data >> 5) & 1;
/* bit 4 = ab. a.b.f. */
/* bit 3 = n/c */
/* bit 2 = (9) = PC2 */
/* bit 1 = (10) = PC1 */
/* bit 0 = (32) = PC0 */
input_mux = data & 7;
logerror("%s:misc_w(%02X)\n", cpuexec_describe_context(device->machine), data);
}
static WRITE8_DEVICE_HANDLER( sound_w )
{
/* bit 7 = stop palla */
/* bit 6 = contrasto */
/* bit 5 = calgio a */
/* bit 4 = fischio */
/* bit 3 = calcio b */
/* bit 2 = folla a */
/* bit 1 = folla m */
/* bit 0 = folla b */
logerror("%s:sound_w(%02X)\n", cpuexec_describe_context(device->machine), data);
}
static WRITE8_DEVICE_HANDLER( pb_w )
{
/* write PB0-7 */
logerror("%s:pb_w(%02X)\n", cpuexec_describe_context(device->machine), data);
}
static WRITE8_DEVICE_HANDLER( shr_w )
{
/* bit 3 = watchdog */
if (data & 0x08)
watchdog_reset(device->machine);
/* bit 2-0 = SH0-2 */
sh = data & 0x07;
}
/*************************************
*
* PPI accessors
*
*************************************/
static READ8_HANDLER( ioread )
{
if (offset & 0x08)
return ppi8255_r(devtag_get_device(space->machine, "ppi8255_0"), offset & 3);
else if (offset & 0x10)
return ppi8255_r(devtag_get_device(space->machine, "ppi8255_1"), offset & 3);
return 0xff;
}
static WRITE8_HANDLER( iowrite )
{
if (offset & 0x08)
ppi8255_w(devtag_get_device(space->machine, "ppi8255_0"), offset & 3, data);
else if (offset & 0x10)
ppi8255_w(devtag_get_device(space->machine, "ppi8255_1"), offset & 3, data);
else if (offset & 0x40)
{
dr = ds;
ds = data;
}
}
/*************************************
*
* Machine init
*
*************************************/
static const ppi8255_interface ppi8255_intf[2] =
{
{
DEVCB_HANDLER(dsr_r),
DEVCB_HANDLER(input_mux0_r),
DEVCB_NULL,
DEVCB_NULL,
DEVCB_NULL,
DEVCB_HANDLER(misc_w)
},
{
DEVCB_NULL,
DEVCB_NULL,
DEVCB_INPUT_PORT("IN0"),
DEVCB_HANDLER(sound_w),
DEVCB_HANDLER(pb_w),
DEVCB_HANDLER(shr_w)
}
};
/*************************************
*
* Main CPU memory handlers
*
*************************************/
static ADDRESS_MAP_START( readmem, ADDRESS_SPACE_PROGRAM, 8 )
AM_RANGE(0x0000, 0x1fff) AM_READ(SMH_ROM)
AM_RANGE(0x2000, 0x3fff) AM_READ(SMH_RAM)
AM_RANGE(0x4000, 0x7fff) AM_READ(SMH_ROM)
AM_RANGE(0xc000, 0xdfff) AM_READ(SMH_RAM)
ADDRESS_MAP_END
static ADDRESS_MAP_START( writemem, ADDRESS_SPACE_PROGRAM, 8 )
AM_RANGE(0x0000, 0x1fff) AM_WRITE(SMH_ROM)
AM_RANGE(0x2000, 0x3fff) AM_WRITE(SMH_RAM) AM_BASE(&videoram)
AM_RANGE(0x4000, 0x7fff) AM_WRITE(SMH_ROM)
AM_RANGE(0xc000, 0xdfff) AM_WRITE(dribling_colorram_w) AM_BASE(&colorram)
ADDRESS_MAP_END
static ADDRESS_MAP_START( io_map, ADDRESS_SPACE_IO, 8 )
ADDRESS_MAP_GLOBAL_MASK(0xff)
AM_RANGE(0x00, 0xff) AM_READWRITE(ioread, iowrite)
ADDRESS_MAP_END
/*************************************
*
* Port definitions
*
*************************************/
static INPUT_PORTS_START( dribling )
PORT_START("MUX0") /* IN0 (mux 0) */
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICKRIGHT_LEFT ) PORT_PLAYER(1)
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICKRIGHT_RIGHT ) PORT_PLAYER(1)
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICKRIGHT_DOWN ) PORT_PLAYER(1)
PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICKRIGHT_UP ) PORT_PLAYER(1)
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_JOYSTICKLEFT_LEFT ) PORT_PLAYER(1)
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICKLEFT_RIGHT ) PORT_PLAYER(1)
PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_JOYSTICKLEFT_DOWN ) PORT_PLAYER(1)
PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_JOYSTICKLEFT_UP ) PORT_PLAYER(1)
PORT_START("MUX1") /* IN0 (mux 1) */
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICKRIGHT_LEFT ) PORT_PLAYER(2)
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICKRIGHT_RIGHT ) PORT_PLAYER(2)
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICKRIGHT_DOWN ) PORT_PLAYER(2)
PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICKRIGHT_UP ) PORT_PLAYER(2)
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_JOYSTICKLEFT_LEFT ) PORT_PLAYER(2)
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICKLEFT_RIGHT ) PORT_PLAYER(2)
PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_JOYSTICKLEFT_DOWN ) PORT_PLAYER(2)
PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_JOYSTICKLEFT_UP ) PORT_PLAYER(2)
PORT_START("MUX2") /* IN0 (mux 2) */
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1)
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(1)
PORT_BIT( 0x0c, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(2)
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2)
PORT_BIT( 0xc0, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_START("IN0") /* IN0 */
PORT_BIT( 0x0f, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_COIN1 )
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_START1 )
PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unknown ) )
PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
PORT_DIPSETTING( 0x40, DEF_STR( On ) )
PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) )
PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
PORT_DIPSETTING( 0x80, DEF_STR( On ) )
INPUT_PORTS_END
/*************************************
*
* Machine driver
*
*************************************/
static MACHINE_DRIVER_START( dribling )
/* basic machine hardware */
MDRV_CPU_ADD("maincpu", Z80, 5000000)
MDRV_CPU_PROGRAM_MAP(readmem,writemem)
MDRV_CPU_IO_MAP(io_map,0)
MDRV_CPU_VBLANK_INT("screen", dribling_irq_gen)
MDRV_PPI8255_ADD( "ppi8255_0", ppi8255_intf[0] )
MDRV_PPI8255_ADD( "ppi8255_1", ppi8255_intf[1] )
/* video hardware */
MDRV_VIDEO_ATTRIBUTES(VIDEO_UPDATE_BEFORE_VBLANK)
MDRV_SCREEN_ADD("screen", RASTER)
MDRV_SCREEN_REFRESH_RATE(60)
MDRV_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500) /* not accurate */)
MDRV_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16)
MDRV_SCREEN_SIZE(256, 256)
MDRV_SCREEN_VISIBLE_AREA(0, 255, 40, 255)
MDRV_PALETTE_LENGTH(256)
MDRV_PALETTE_INIT(dribling)
MDRV_VIDEO_UPDATE(dribling)
/* sound hardware */
MACHINE_DRIVER_END
/*************************************
*
* ROM definitions
*
*************************************/
ROM_START( dribling )
ROM_REGION( 0x10000, "maincpu", 0 )
ROM_LOAD( "5p.bin", 0x0000, 0x1000, CRC(0e791947) SHA1(57bc4f4e9e1fe3fbac1017601c9c75029b2601a4) )
ROM_LOAD( "5n.bin", 0x1000, 0x1000, CRC(bd0f223a) SHA1(f9fbc5670a8723c091d61012e545774d315eb18f) ) //
ROM_LOAD( "5l.bin", 0x4000, 0x1000, CRC(1fccfc85) SHA1(c0365ad54144414218f52209173b858b927c9626) )
ROM_LOAD( "5k.bin", 0x5000, 0x1000, CRC(737628c4) SHA1(301fda413388c26da5b5150aec2cefc971801749) ) //
ROM_LOAD( "5h.bin", 0x6000, 0x1000, CRC(30d0957f) SHA1(52135e12094ee1c8828a48c355bdd565aa5895de) ) //
ROM_REGION( 0x2000, "gfx1", 0 )
ROM_LOAD( "3p.bin", 0x0000, 0x1000, CRC(208971b8) SHA1(f91f3ea04d75beb58a61c844472b4dba53d84c0f) )
ROM_LOAD( "3n.bin", 0x1000, 0x1000, CRC(356c9803) SHA1(8e2ce52f32b33886f4747dadf3aeb78148538173) )
ROM_REGION( 0x600, "proms", 0 )
ROM_LOAD( "prom_3c.bin", 0x0000, 0x0400, CRC(25f068de) SHA1(ea4c56c47fe8153069acb9df80df0b099f3b81f1) )
ROM_LOAD( "prom_3e.bin", 0x0400, 0x0100, CRC(73eba798) SHA1(7be0e253624df53092e26c28eb18afdcf71434aa) )
ROM_LOAD( "prom_2d.bin", 0x0500, 0x0100, CRC(5d8c57c6) SHA1(abfb54812d66a36e797be47653dadda4843e8a90) )
ROM_END
ROM_START( driblino )
ROM_REGION( 0x10000, "maincpu", 0 )
ROM_LOAD( "5p.bin", 0x0000, 0x1000, CRC(0e791947) SHA1(57bc4f4e9e1fe3fbac1017601c9c75029b2601a4) )
ROM_LOAD( "dribblng.5n", 0x1000, 0x1000, CRC(5271e620) SHA1(ebed8e31057bb8492840a6e3b8bc453f7cb67243) )
ROM_LOAD( "5l.bin", 0x4000, 0x1000, CRC(1fccfc85) SHA1(c0365ad54144414218f52209173b858b927c9626) )
ROM_LOAD( "dribblng.5j", 0x5000, 0x1000, CRC(e535ac5b) SHA1(ba13298378f1e5b2b40634874097ad29c402fdea) )
ROM_LOAD( "dribblng.5h", 0x6000, 0x1000, CRC(e6af7264) SHA1(a015120d85461e599c4bb9626ebea296386a31bb) )
ROM_REGION( 0x2000, "gfx1", 0 )
ROM_LOAD( "3p.bin", 0x0000, 0x1000, CRC(208971b8) SHA1(f91f3ea04d75beb58a61c844472b4dba53d84c0f) )
ROM_LOAD( "3n.bin", 0x1000, 0x1000, CRC(356c9803) SHA1(8e2ce52f32b33886f4747dadf3aeb78148538173) )
ROM_REGION( 0x600, "proms", 0 )
ROM_LOAD( "prom_3c.bin", 0x0000, 0x0400, CRC(25f068de) SHA1(ea4c56c47fe8153069acb9df80df0b099f3b81f1) )
ROM_LOAD( "prom_3e.bin", 0x0400, 0x0100, CRC(73eba798) SHA1(7be0e253624df53092e26c28eb18afdcf71434aa) )
ROM_LOAD( "prom_2d.bin", 0x0500, 0x0100, CRC(5d8c57c6) SHA1(abfb54812d66a36e797be47653dadda4843e8a90) )
ROM_END
/*************************************
*
* Game drivers
*
*************************************/
GAME( 1983, dribling, 0, dribling, dribling, 0, ROT0, "Model Racing", "Dribbling", GAME_NO_SOUND )
GAME( 1983, driblino, dribling, dribling, dribling, 0, ROT0, "Model Racing (Olympia license)", "Dribbling (Olympia)", GAME_NO_SOUND )