#include "driver.h"
#include "vidhrdw/generic.h"
#include "cpu/m6502/m6502.h"
extern WRITE_HANDLER( pcktgal_videoram_w );
extern WRITE_HANDLER( pcktgal_flipscreen_w );
extern PALETTE_INIT( pcktgal );
extern VIDEO_START( pcktgal );
extern VIDEO_UPDATE( pcktgal );
static WRITE_HANDLER( pcktgal_bank_w )
{
unsigned char *RAM = memory_region(REGION_CPU1);
if (data & 1) { cpu_setbank(1,&RAM[0x4000]); }
else { cpu_setbank(1,&RAM[0x10000]); }
if (data & 2) { cpu_setbank(2,&RAM[0x6000]); }
else { cpu_setbank(2,&RAM[0x12000]); }
}
static WRITE_HANDLER( pcktgal_sound_bank_w )
{
unsigned char *RAM = memory_region(REGION_CPU2);
if (data & 4) { cpu_setbank(3,&RAM[0x14000]); }
else { cpu_setbank(3,&RAM[0x10000]); }
}
static WRITE_HANDLER( pcktgal_sound_w )
{
soundlatch_w(0,data);
cpu_set_irq_line(1,IRQ_LINE_NMI,PULSE_LINE);
}
static int msm5205next;
static void pcktgal_adpcm_int(int data)
{
static int toggle;
MSM5205_data_w(0,msm5205next >> 4);
msm5205next<<=4;
toggle = 1 - toggle;
if (toggle)
cpu_set_irq_line(1,M6502_IRQ_LINE,HOLD_LINE);
}
static WRITE_HANDLER( pcktgal_adpcm_data_w )
{
msm5205next=data;
}
static READ_HANDLER( pcktgal_adpcm_reset_r )
{
MSM5205_reset_w(0,0);
return 0;
}
static MEMORY_READ_START( readmem )
{ 0x0000, 0x07ff, MRA_RAM },
{ 0x1800, 0x1800, input_port_0_r },
{ 0x1a00, 0x1a00, input_port_1_r },
{ 0x1c00, 0x1c00, input_port_2_r },
{ 0x4000, 0x5fff, MRA_BANK1 },
{ 0x6000, 0x7fff, MRA_BANK2 },
{ 0x8000, 0xffff, MRA_ROM },
MEMORY_END
static MEMORY_WRITE_START( writemem )
{ 0x0000, 0x07ff, MWA_RAM },
{ 0x0800, 0x0fff, pcktgal_videoram_w, &videoram },
{ 0x1000, 0x11ff, MWA_RAM, &spriteram, &spriteram_size },
{ 0x1801, 0x1801, pcktgal_flipscreen_w },
{ 0x1a00, 0x1a00, pcktgal_sound_w },
{ 0x1c00, 0x1c00, pcktgal_bank_w },
{ 0x4000, 0xffff, MWA_ROM },
MEMORY_END
static MEMORY_READ_START( sound_readmem )
{ 0x0000, 0x07ff, MRA_RAM },
{ 0x3000, 0x3000, soundlatch_r },
{ 0x3400, 0x3400, pcktgal_adpcm_reset_r },
{ 0x4000, 0x7fff, MRA_BANK3 },
{ 0x8000, 0xffff, MRA_ROM },
MEMORY_END
static MEMORY_WRITE_START( sound_writemem )
{ 0x0000, 0x07ff, MWA_RAM },
{ 0x0800, 0x0800, YM2203_control_port_0_w },
{ 0x0801, 0x0801, YM2203_write_port_0_w },
{ 0x1000, 0x1000, YM3812_control_port_0_w },
{ 0x1001, 0x1001, YM3812_write_port_0_w },
{ 0x1800, 0x1800, pcktgal_adpcm_data_w },
{ 0x2000, 0x2000, pcktgal_sound_bank_w },
{ 0x4000, 0xffff, MWA_ROM },
MEMORY_END
INPUT_PORTS_START( pcktgal )
PORT_START
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT | IPF_8WAY )
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT | IPF_8WAY )
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN | IPF_8WAY )
PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_UP | IPF_8WAY )
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_START1 )
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_START2 )
PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON2 )
PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON1 )
PORT_START
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT | IPF_8WAY | IPF_PLAYER2 )
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT | IPF_8WAY | IPF_PLAYER2 )
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN | IPF_8WAY | IPF_PLAYER2 )
PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_UP | IPF_8WAY | IPF_PLAYER2 )
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_COIN1 )
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_COIN2 )
PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON2 | IPF_PLAYER2 )
PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON1 | IPF_PLAYER2 )
PORT_START
PORT_DIPNAME( 0x03, 0x03, DEF_STR( Coinage ) )
PORT_DIPSETTING( 0x00, DEF_STR( 2C_1C ) )
PORT_DIPSETTING( 0x03, DEF_STR( 1C_1C ) )
PORT_DIPSETTING( 0x02, DEF_STR( 1C_2C ) )
PORT_DIPSETTING( 0x01, DEF_STR( 1C_3C ) )
PORT_DIPNAME( 0x04, 0x04, DEF_STR( Flip_Screen ) )
PORT_DIPSETTING( 0x04, DEF_STR( Off ) )
PORT_DIPSETTING( 0x00, DEF_STR( On ) )
PORT_DIPNAME( 0x08, 0x08, "Allow 2 Players Game" )
PORT_DIPSETTING( 0x00, DEF_STR( No ) )
PORT_DIPSETTING( 0x08, DEF_STR( Yes ) )
PORT_DIPNAME( 0x10, 0x10, DEF_STR( Demo_Sounds ) )
PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
PORT_DIPSETTING( 0x10, DEF_STR( On ) )
PORT_DIPNAME( 0x20, 0x20, "Time" )
PORT_DIPSETTING( 0x00, "100" )
PORT_DIPSETTING( 0x20, "120" )
PORT_DIPNAME( 0x40, 0x00, DEF_STR( Lives ) )
PORT_DIPSETTING( 0x00, "3" )
PORT_DIPSETTING( 0x40, "4" )
PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) )
PORT_DIPSETTING( 0x80, DEF_STR( Off ) )
PORT_DIPSETTING( 0x00, DEF_STR( On ) )
INPUT_PORTS_END
static struct GfxLayout charlayout =
{
8,8,
4096,
4,
{ 0x10000*8, 0, 0x18000*8, 0x8000*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 struct GfxLayout bootleg_charlayout =
{
8,8,
4096,
4,
{ 0x18000*8, 0x8000*8, 0x10000*8, 0 },
{ 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 struct GfxLayout spritelayout =
{
16,16,
1024,
2,
{ 0x8000*8, 0 },
{ 128+0, 128+1, 128+2, 128+3, 128+4, 128+5, 128+6, 128+7, 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, 9*8, 10*8, 11*8, 12*8, 13*8, 14*8, 15*8 },
32*8
};
static struct GfxLayout bootleg_spritelayout =
{
16,16,
1024,
2,
{ 0x8000*8, 0 },
{ 128+7, 128+6, 128+5, 128+4, 128+3, 128+2, 128+1, 128+0, 7, 6, 5, 4, 3, 2, 1, 0, },
{ 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8, 8*8, 9*8, 10*8, 11*8, 12*8, 13*8, 14*8, 15*8 },
32*8
};
static struct GfxDecodeInfo gfxdecodeinfo[] =
{
{ REGION_GFX1, 0x00000, &charlayout, 256, 16 },
{ REGION_GFX2, 0x00000, &spritelayout, 0, 8 },
{ -1 }
};
static struct GfxDecodeInfo bootleg_gfxdecodeinfo[] =
{
{ REGION_GFX1, 0x00000, &bootleg_charlayout, 256, 16 },
{ REGION_GFX2, 0x00000, &bootleg_spritelayout, 0, 8 },
{ -1 }
};
static struct YM2203interface ym2203_interface =
{
1,
1500000,
{ YM2203_VOL(60,60) },
{ 0 },
{ 0 },
{ 0 },
{ 0 }
};
static struct YM3812interface ym3812_interface =
{
1,
3000000,
{ 100 }
};
static struct MSM5205interface msm5205_interface =
{
1,
384000,
{ pcktgal_adpcm_int },
{ MSM5205_S48_4B},
{ 70 }
};
static MACHINE_DRIVER_START( pcktgal )
MDRV_CPU_ADD(M6502, 2000000)
MDRV_CPU_MEMORY(readmem,writemem)
MDRV_CPU_VBLANK_INT(nmi_line_pulse,1)
MDRV_CPU_ADD(M6502, 1500000)
MDRV_CPU_FLAGS(CPU_AUDIO_CPU)
MDRV_CPU_MEMORY(sound_readmem,sound_writemem)
MDRV_FRAMES_PER_SECOND(60)
MDRV_VBLANK_DURATION(DEFAULT_60HZ_VBLANK_DURATION)
MDRV_VIDEO_ATTRIBUTES(VIDEO_TYPE_RASTER)
MDRV_SCREEN_SIZE(32*8, 32*8)
MDRV_VISIBLE_AREA(0*8, 32*8-1, 2*8, 30*8-1)
MDRV_GFXDECODE(gfxdecodeinfo)
MDRV_PALETTE_LENGTH(512)
MDRV_PALETTE_INIT(pcktgal)
MDRV_VIDEO_START(pcktgal)
MDRV_VIDEO_UPDATE(pcktgal)
MDRV_SOUND_ADD(YM2203, ym2203_interface)
MDRV_SOUND_ADD(YM3812, ym3812_interface)
MDRV_SOUND_ADD(MSM5205, msm5205_interface)
MACHINE_DRIVER_END
static MACHINE_DRIVER_START( bootleg )
MDRV_IMPORT_FROM(pcktgal)
MDRV_GFXDECODE(bootleg_gfxdecodeinfo)
MACHINE_DRIVER_END
ROM_START( pcktgal )
ROM_REGION( 0x14000, REGION_CPU1, 0 )
ROM_LOAD( "eb04.rom", 0x10000, 0x4000, CRC(8215d60d) SHA1(ac26dfce7e215be21f2a17f864c5e966b8b8322e) )
ROM_CONTINUE( 0x04000, 0xc000)
ROM_REGION( 2*0x18000, REGION_CPU2, 0 )
ROM_LOAD( "eb03.rom", 0x10000, 0x8000, CRC(cb029b02) SHA1(fbb3da08ed05ae73fbeeb13e0e2ff735aaf83db8) )
ROM_CONTINUE( 0x08000, 0x8000 )
ROM_REGION( 0x20000, REGION_GFX1, ROMREGION_DISPOSE )
ROM_LOAD( "eb01.rom", 0x00000, 0x10000, CRC(63542c3d) SHA1(4f42af99a6d9d4766afe0bebe10d6a97811a0082) )
ROM_LOAD( "eb02.rom", 0x10000, 0x10000, CRC(a9dcd339) SHA1(245824ab86cdfe4b842ce1be0af60f2ff4c6ae07) )
ROM_REGION( 0x10000, REGION_GFX2, ROMREGION_DISPOSE )
ROM_LOAD( "eb00.rom", 0x00000, 0x10000, CRC(6c1a14a8) SHA1(03201197304c5f1d854b8c4f4a5c78336b51f872) )
ROM_REGION( 0x0400, REGION_PROMS, 0 )
ROM_LOAD( "eb05.rom", 0x0000, 0x0200, CRC(3b6198cb) SHA1(d32b364cfce99637998ca83ad21783f80364dd65) )
ROM_LOAD( "eb06.rom", 0x0200, 0x0200, CRC(1fbd4b59) SHA1(84e20329003cf09b849b49e1d83edc330d49f404) )
ROM_END
ROM_START( pcktgalb )
ROM_REGION( 0x14000, REGION_CPU1, 0 )
ROM_LOAD( "sexybill.001", 0x10000, 0x4000, CRC(4acb3e84) SHA1(c83d03969587c6be80fb8fc84afe250907674a44) )
ROM_CONTINUE( 0x04000, 0xc000)
ROM_REGION( 2*0x18000, REGION_CPU2, 0 )
ROM_LOAD( "eb03.rom", 0x10000, 0x8000, CRC(cb029b02) SHA1(fbb3da08ed05ae73fbeeb13e0e2ff735aaf83db8) )
ROM_CONTINUE( 0x08000, 0x8000 )
ROM_REGION( 0x20000, REGION_GFX1, ROMREGION_DISPOSE )
ROM_LOAD( "sexybill.005", 0x00000, 0x10000, CRC(3128dc7b) SHA1(d011181e544b8284ecdf54578da5469804e06c63) )
ROM_LOAD( "sexybill.006", 0x10000, 0x10000, CRC(0fc91eeb) SHA1(9d9a54c8dd41c10d07aabb6a2d8dbaf35c6e4533) )
ROM_REGION( 0x10000, REGION_GFX2, ROMREGION_DISPOSE )
ROM_LOAD( "sexybill.003", 0x00000, 0x08000, CRC(58182daa) SHA1(55ce4b0ea2cb1c559c12815c9e453624e0d95515) )
ROM_LOAD( "sexybill.004", 0x08000, 0x08000, CRC(33a67af6) SHA1(6d9c04658ed75b970821a5c8b1f60c3c08fdda0a) )
ROM_REGION( 0x0400, REGION_PROMS, 0 )
ROM_LOAD( "eb05.rom", 0x0000, 0x0200, CRC(3b6198cb) SHA1(d32b364cfce99637998ca83ad21783f80364dd65) )
ROM_LOAD( "eb06.rom", 0x0200, 0x0200, CRC(1fbd4b59) SHA1(84e20329003cf09b849b49e1d83edc330d49f404) )
ROM_END
ROM_START( pcktgal2 )
ROM_REGION( 0x14000, REGION_CPU1, 0 )
ROM_LOAD( "eb04-2.rom", 0x10000, 0x4000, CRC(0c7f2905) SHA1(882dbc1888a0149486c1fac5568dc3d297c2dadd) )
ROM_CONTINUE( 0x04000, 0xc000)
ROM_REGION( 0x18000, REGION_CPU2, 0 )
ROM_LOAD( "eb03-2.rom", 0x10000, 0x8000, CRC(9408ffb4) SHA1(ddcb67da4acf3d986d54ad10404f213528a8bb62) )
ROM_CONTINUE( 0x08000, 0x8000)
ROM_REGION( 0x20000, REGION_GFX1, ROMREGION_DISPOSE )
ROM_LOAD( "eb01-2.rom", 0x00000, 0x10000, CRC(e52b1f97) SHA1(4814fe3b2eb08ac173e09ffadc6e5daa9affa1a0) )
ROM_LOAD( "eb02-2.rom", 0x10000, 0x10000, CRC(f30d965d) SHA1(a787457b33ad39e78fcf8da0715fab7a63869bf9) )
ROM_REGION( 0x10000, REGION_GFX2, ROMREGION_DISPOSE )
ROM_LOAD( "eb00.rom", 0x00000, 0x10000, CRC(6c1a14a8) SHA1(03201197304c5f1d854b8c4f4a5c78336b51f872) )
ROM_REGION( 0x0400, REGION_PROMS, 0 )
ROM_LOAD( "eb05.rom", 0x0000, 0x0200, CRC(3b6198cb) SHA1(d32b364cfce99637998ca83ad21783f80364dd65) )
ROM_LOAD( "eb06.rom", 0x0200, 0x0200, CRC(1fbd4b59) SHA1(84e20329003cf09b849b49e1d83edc330d49f404) )
ROM_END
ROM_START( spool3 )
ROM_REGION( 0x14000, REGION_CPU1, 0 )
ROM_LOAD( "eb04-2.rom", 0x10000, 0x4000, CRC(0c7f2905) SHA1(882dbc1888a0149486c1fac5568dc3d297c2dadd) )
ROM_CONTINUE( 0x04000, 0xc000)
ROM_REGION( 0x18000, REGION_CPU2, 0 )
ROM_LOAD( "eb03-2.rom", 0x10000, 0x8000, CRC(9408ffb4) SHA1(ddcb67da4acf3d986d54ad10404f213528a8bb62) )
ROM_CONTINUE( 0x08000, 0x8000)
ROM_REGION( 0x20000, REGION_GFX1, ROMREGION_DISPOSE )
ROM_LOAD( "deco2.bin", 0x00000, 0x10000, CRC(0a23f0cf) SHA1(8554215001ffc9e6f141e57cc11b400a853f89f2) )
ROM_LOAD( "deco3.bin", 0x10000, 0x10000, CRC(55ea7c45) SHA1(a8a6ff0c8a5aaee3afbfc3e71a171fb1d2360b45) )
ROM_REGION( 0x10000, REGION_GFX2, ROMREGION_DISPOSE )
ROM_LOAD( "eb00.rom", 0x00000, 0x10000, CRC(6c1a14a8) SHA1(03201197304c5f1d854b8c4f4a5c78336b51f872) )
ROM_REGION( 0x0400, REGION_PROMS, 0 )
ROM_LOAD( "eb05.rom", 0x0000, 0x0200, CRC(3b6198cb) SHA1(d32b364cfce99637998ca83ad21783f80364dd65) )
ROM_LOAD( "eb06.rom", 0x0200, 0x0200, CRC(1fbd4b59) SHA1(84e20329003cf09b849b49e1d83edc330d49f404) )
ROM_END
ROM_START( spool3i )
ROM_REGION( 0x14000, REGION_CPU1, 0 )
ROM_LOAD( "de1.bin", 0x10000, 0x4000, CRC(a59980fe) SHA1(64b55af4d0b314d14184784e9f817b56be0f24f2) )
ROM_CONTINUE( 0x04000, 0xc000)
ROM_REGION( 0x18000, REGION_CPU2, 0 )
ROM_LOAD( "eb03-2.rom", 0x10000, 0x8000, CRC(9408ffb4) SHA1(ddcb67da4acf3d986d54ad10404f213528a8bb62) )
ROM_CONTINUE( 0x08000, 0x8000)
ROM_REGION( 0x20000, REGION_GFX1, ROMREGION_DISPOSE )
ROM_LOAD( "deco2.bin", 0x00000, 0x10000, CRC(0a23f0cf) SHA1(8554215001ffc9e6f141e57cc11b400a853f89f2) )
ROM_LOAD( "deco3.bin", 0x10000, 0x10000, CRC(55ea7c45) SHA1(a8a6ff0c8a5aaee3afbfc3e71a171fb1d2360b45) )
ROM_REGION( 0x10000, REGION_GFX2, ROMREGION_DISPOSE )
ROM_LOAD( "eb00.rom", 0x00000, 0x10000, CRC(6c1a14a8) SHA1(03201197304c5f1d854b8c4f4a5c78336b51f872) )
ROM_REGION( 0x0400, REGION_PROMS, 0 )
ROM_LOAD( "eb05.rom", 0x0000, 0x0200, CRC(3b6198cb) SHA1(d32b364cfce99637998ca83ad21783f80364dd65) )
ROM_LOAD( "eb06.rom", 0x0200, 0x0200, CRC(1fbd4b59) SHA1(84e20329003cf09b849b49e1d83edc330d49f404) )
ROM_END
static DRIVER_INIT( deco222 )
{
int A;
unsigned char *rom = memory_region(REGION_CPU2);
int diff = memory_region_length(REGION_CPU2) / 2;
memory_set_opcode_base(1,rom+diff);
for (A = 0;A < diff;A++)
rom[A + diff] = (rom[A] & 0x9f) | ((rom[A] & 0x20) << 1) | ((rom[A] & 0x40) >> 1);
}
static DRIVER_INIT( graphics )
{
unsigned char *rom = memory_region(REGION_GFX1);
int len = memory_region_length(REGION_GFX1);
int i,j,temp[16];
for (i = 0x00000;i < len;i += 32)
{
for (j=0; j<16; j++)
{
temp[j] = rom[i+j+16];
rom[i+j+16] = rom[i+j];
rom[i+j] = temp[j];
}
}
}
static DRIVER_INIT( pcktgal )
{
init_deco222();
init_graphics();
}
GAME( 1987, pcktgal, 0, pcktgal, pcktgal, pcktgal, ROT0, "Data East Corporation", "Pocket Gal (Japan)" )
GAME( 1987, pcktgalb, pcktgal, bootleg, pcktgal, deco222, ROT0, "bootleg", "Pocket Gal (bootleg)" )
GAME( 1989, pcktgal2, pcktgal, pcktgal, pcktgal, graphics, ROT0, "Data East Corporation", "Pocket Gal 2 (World?)" )
GAME( 1989, spool3, pcktgal, pcktgal, pcktgal, graphics, ROT0, "Data East Corporation", "Super Pool III (World?)" )
GAME( 1990, spool3i, pcktgal, pcktgal, pcktgal, graphics, ROT0, "Data East Corporation (I-Vics license)", "Super Pool III (I-Vics)" )