/* Puckman Pockimon -- original driver by Luca Elia Seems to be based around genesis hardware, despite containing no original Sega chips Supported: Puckman Pockimon - (c)2000 Genie? (there should be a way to show Sun Mixing copyright, roms are the same on a version with the SM (c) */ #include "driver.h" #include "genesis.h" #define MASTER_CLOCK 53693100 static UINT16* main_ram; INPUT_PORTS_START( puckpkmn ) /* Puckman Pockimon Input Ports */ PORT_START /* Player 2 Controls ($700011.b) */ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_START2 ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_PLAYER(2) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_PLAYER(2) PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_PLAYER(2) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(2) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2) PORT_START /* Player 1 Controls ($700013.b) */ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_COIN1 ) PORT_IMPULSE(10) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_START1 ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_PLAYER(1) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_PLAYER(1) PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_PLAYER(1) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(1) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1) PORT_START /* ? ($700015.b) */ PORT_START /* DSW 1 ($700017.b) */ PORT_DIPNAME( 0x07, 0x07, DEF_STR( Coinage ) ) PORT_DIPSETTING( 0x03, DEF_STR( 5C_1C ) ) PORT_DIPSETTING( 0x04, DEF_STR( 4C_1C ) ) PORT_DIPSETTING( 0x05, DEF_STR( 3C_1C ) ) PORT_DIPSETTING( 0x06, DEF_STR( 2C_1C ) ) PORT_DIPSETTING( 0x07, DEF_STR( 1C_1C ) ) PORT_DIPSETTING( 0x02, DEF_STR( 1C_2C ) ) PORT_DIPSETTING( 0x01, DEF_STR( 1C_3C ) ) PORT_DIPSETTING( 0x00, DEF_STR( 1C_4C ) ) PORT_DIPNAME( 0x38, 0x28, DEF_STR( Lives ) ) PORT_DIPSETTING( 0x38, "1" ) PORT_DIPSETTING( 0x30, "2" ) PORT_DIPSETTING( 0x28, "3" ) PORT_DIPSETTING( 0x20, "4" ) PORT_DIPSETTING( 0x18, "5" ) PORT_DIPSETTING( 0x10, "6" ) PORT_DIPSETTING( 0x08, "7" ) PORT_DIPSETTING( 0x00, "8" ) PORT_DIPNAME( 0xc0, 0x80, DEF_STR( Difficulty ) ) PORT_DIPSETTING( 0xc0, DEF_STR( Easy ) ) PORT_DIPSETTING( 0x80, DEF_STR( Normal ) ) PORT_DIPSETTING( 0x40, DEF_STR( Hard ) ) PORT_DIPSETTING( 0x00, DEF_STR( Hardest ) ) PORT_START /* DSW 1 ($700019.b) */ PORT_SERVICE( 0x01, IP_ACTIVE_LOW ) PORT_DIPNAME( 0x02, 0x02, DEF_STR( Demo_Sounds ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPSETTING( 0x02, DEF_STR( On ) ) PORT_DIPNAME( 0x04, 0x04, DEF_STR( Unused ) ) PORT_DIPSETTING( 0x04, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x08, 0x08, DEF_STR( Unused ) ) PORT_DIPSETTING( 0x08, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x10, 0x10, DEF_STR( Unused ) ) PORT_DIPSETTING( 0x10, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x20, 0x20, DEF_STR( Unused ) ) PORT_DIPSETTING( 0x20, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unused ) ) PORT_DIPSETTING( 0x40, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unused ) ) PORT_DIPSETTING( 0x80, DEF_STR( Off ) ) PORT_DIPSETTING( 0x00, DEF_STR( On ) ) INPUT_PORTS_END static READ16_HANDLER( puckpkmn_YM3438_r ) { return YM3438_status_port_0_A_r(0) << 8; } static WRITE16_HANDLER( puckpkmn_YM3438_w ) { switch (offset) { case 0: if (ACCESSING_MSB) YM3438_control_port_0_A_w (0, (data >> 8) & 0xff); else YM3438_data_port_0_A_w (0, (data >> 0) & 0xff); break; case 1: if (ACCESSING_MSB) YM3438_control_port_0_B_w (0, (data >> 8) & 0xff); else YM3438_data_port_0_B_w (0, (data >> 0) & 0xff); break; } } static ADDRESS_MAP_START( puckpkmn_readmem, ADDRESS_SPACE_PROGRAM, 16 ) AM_RANGE(0x000000, 0x1fffff) AM_READ(MRA16_ROM) /* Main 68k Program Roms */ AM_RANGE(0x700010, 0x700011) AM_READ(input_port_0_word_r) /* Input (P2) */ AM_RANGE(0x700012, 0x700013) AM_READ(input_port_1_word_r) /* Input (P1) */ AM_RANGE(0x700014, 0x700015) AM_READ(input_port_2_word_r) /* Input (?) */ AM_RANGE(0x700016, 0x700017) AM_READ(input_port_3_word_r) /* Input (DSW1) */ AM_RANGE(0x700018, 0x700019) AM_READ(input_port_4_word_r) /* Input (DSW2) */ AM_RANGE(0x700022, 0x700023) AM_READ(OKIM6295_status_0_lsb_r) /* M6295 Sound Chip Status Register */ AM_RANGE(0xa04000, 0xa04001) AM_READ(puckpkmn_YM3438_r) /* Ym3438 Sound Chip Status Register */ AM_RANGE(0xc00000, 0xc0001f) AM_READ(genesis_vdp_r) /* VDP Access */ AM_RANGE(0xe00000, 0xe1ffff) AM_READ(MRA16_BANK1) /* VDP sees the roms here */ AM_RANGE(0xfe0000, 0xfeffff) AM_READ(MRA16_BANK2) /* VDP sees the ram here */ AM_RANGE(0xff0000, 0xffffff) AM_READ(MRA16_RAM ) /* Main Ram */ /* Unknown reads: */ // AM_RANGE(0xa10000, 0xa10001) AM_READ(MRA16_NOP) /* ? once */ AM_RANGE(0xa10002, 0xa10005) AM_READ(MRA16_NOP) /* ? alternative way of reading inputs ? */ AM_RANGE(0xa11100, 0xa11101) AM_READ(MRA16_NOP) /* ? */ ADDRESS_MAP_END static ADDRESS_MAP_START( puckpkmn_writemem, ADDRESS_SPACE_PROGRAM, 16 ) AM_RANGE(0x000000, 0x1fffff) AM_WRITE(MWA16_ROM) /* Main 68k Program Roms */ AM_RANGE(0x700022, 0x700023) AM_WRITE(OKIM6295_data_0_lsb_w) /* M6295 Sound Chip Writes */ AM_RANGE(0xa04000, 0xa04003) AM_WRITE(puckpkmn_YM3438_w) /* Ym3438 Sound Chip Writes */ AM_RANGE(0xc00000, 0xc0001f) AM_WRITE(genesis_vdp_w) /* VDP Access */ AM_RANGE(0xff0000, 0xffffff) AM_WRITE(MWA16_RAM) AM_BASE(&main_ram) /* Main Ram */ /* Unknown writes: */ AM_RANGE(0xa00000, 0xa00551) AM_WRITE(MWA16_RAM) /* ? */ AM_RANGE(0xa10002, 0xa10005) AM_WRITE(MWA16_NOP) /* ? alternative way of reading inputs ? */ // AM_RANGE(0xa10008, 0xa1000d) AM_WRITE(MWA16_NOP) /* ? once */ // AM_RANGE(0xa14000, 0xa14003) AM_WRITE(MWA16_NOP) /* ? once */ AM_RANGE(0xa11100, 0xa11101) AM_WRITE(MWA16_NOP) /* ? */ AM_RANGE(0xa11200, 0xa11201) AM_WRITE(MWA16_NOP) /* ? */ ADDRESS_MAP_END static struct YM3438interface ym3438_intf = { genesis_irq2_interrupt /* IRQ handler */ }; static MACHINE_DRIVER_START( puckpkmn ) /* basic machine hardware */ MDRV_CPU_ADD_TAG("main",M68000, MASTER_CLOCK/7) /*???*/ MDRV_CPU_PROGRAM_MAP(puckpkmn_readmem,puckpkmn_writemem) MDRV_CPU_VBLANK_INT(genesis_vblank_interrupt,1) MDRV_SCREEN_REFRESH_RATE(60) MDRV_MACHINE_START(genesis) MDRV_MACHINE_RESET(genesis) /* video hardware */ MDRV_VIDEO_ATTRIBUTES(VIDEO_TYPE_RASTER | VIDEO_HAS_SHADOWS | VIDEO_HAS_HIGHLIGHTS) MDRV_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16) MDRV_SCREEN_SIZE(342,262) MDRV_SCREEN_VISIBLE_AREA(0, 319, 0, 223) MDRV_PALETTE_LENGTH(64) MDRV_VIDEO_START(genesis) MDRV_VIDEO_UPDATE(genesis) /* sound hardware */ MDRV_SPEAKER_STANDARD_MONO("mono") MDRV_SOUND_ADD(YM3438, MASTER_CLOCK/7) MDRV_SOUND_CONFIG(ym3438_intf) MDRV_SOUND_ROUTE(0, "mono", 0.50) MDRV_SOUND_ROUTE(1, "mono", 0.50) MDRV_SOUND_ADD(SN76496, MASTER_CLOCK/15) MDRV_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50) /* sound hardware */ MDRV_SOUND_ADD(OKIM6295, 1056000) MDRV_SOUND_CONFIG(okim6295_interface_region_1_pin7high) // clock frequency & pin 7 not verified MDRV_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.50) MACHINE_DRIVER_END /* Genie's Hardware (contains no real sega parts) */ /*************************************************************************** Puckman Pokemon Genie 2000 (c) 2000? Manufacturer ? Hardware looks bootleg-ish, but is newly manufactured. CPU: ? (one of the SMD chips) SND: OKI6295, U6612 (probably YM3812), U6614B (Probably YM3014B) XTAL: 3.579545MHz, 4.0000MHz OSC: 53.693175MHz Other Chips: Possible CPU: TA-06SD 9933 B816453 128 pin square SMD GFX support chips: Y-BOX TA891945 100 pin SMD TV16B 0010 ME251271 160 pin SMD There are 13 PAL's on the PCB ! RAM: 62256 x 3, D41264 x 2 (ZIP Ram) DIPS: 2 x 8 position SW1: 1 2 3 4 5 6 7 8 coins 1coin 1 Cred. off off off 2c 1c on off off 3c 1c off on off 4c 1c on on off 5c 1c off off on 1c 2c on off on 1c 3c off on on 1c 4c on on on players 1 off off off 2 on off off 3 off on off 4 on on off 5 off off on 6 on off on 7 off on on 8 on on on diffic- ulty v.easy off off normal on off diffic. off on v. diffic. on on SW2 note position 3-8 not used 1 2 3 4 5 6 7 8 test mode no off yes on demo sound yes off no on ROMS: PUCKPOKE.U3 M5M27C201 Sound PUCKPOKE.U4 27C040--\ PUCKPOKE.U5 27C040---\ PUCKPOKE.U7 27C040----- Main program & GFX PUCKPOKE.U8 27C4001---/ ROM sockets U63 & U64 empty Hi-res PCB scan available on request. Screenshots available on my site at http://unemulated.emuunlim.com (under PCB Shop Raid #2) ****************************************************************************/ DRIVER_INIT( puckpkmn ) { UINT8 *rom = memory_region(REGION_CPU1); size_t len = memory_region_length(REGION_CPU1); int i; for (i = 0; i < len; i++) rom[i] = BITSWAP8(rom[i],1,4,2,0,7,5,3,6); memory_set_bankptr(1, memory_region(REGION_CPU1) ); // VDP reads the roms from here memory_set_bankptr(2, main_ram ); // VDP reads the ram from here } ROM_START( puckpkmn ) /* Puckman Pockimon (c)2000 Genie */ ROM_REGION( 0x200000, REGION_CPU1, 0 ) ROM_LOAD16_BYTE( "puckpoke.u5", 0x000000, 0x080000, CRC(fd334b91) SHA1(cf8bf6645a4082ea4392937e169b1686c9c7e246) ) ROM_LOAD16_BYTE( "puckpoke.u4", 0x000001, 0x080000, CRC(839cc76b) SHA1(e15662a7175db7a8e222dda176a8ed92e0d56e9d) ) ROM_LOAD16_BYTE( "puckpoke.u8", 0x100000, 0x080000, CRC(7936bec8) SHA1(4b350105abe514fbfeabae1c6f3aeee695c3d07a) ) ROM_LOAD16_BYTE( "puckpoke.u7", 0x100001, 0x080000, CRC(96b66bdf) SHA1(3cc2861ad9bc232cbe683e01b58090f832d03db5) ) ROM_REGION( 0x40000, REGION_SOUND1, 0 ) ROM_LOAD( "puckpoke.u3", 0x00000, 0x40000, CRC(7b066bac) SHA1(429616e21c672b07e0705bc63234249cac3af56f) ) ROM_END /* Genie Hardware (uses Genesis VDP) also has 'Sun Mixing Co' put into tile ram */ GAME( 2000, puckpkmn, 0, puckpkmn, puckpkmn, puckpkmn, ROT0, "Genie", "Puckman Pockimon", 0 )