/* Go 2000 - Korean Card game Newer PCB, very sparce with newer surface mounted CPUs MC68EC000FU10 Z84C0006FEC TM29F550ZX OSC: 32.000MHz 2 8-way Dipswitch banks Ram: 2 UM61256FK-15 (near 3 & 4 (68k program roms)) 3 Windbond W24257AK-15 (near TM29F550ZX) 2 UM61256AK-15 (near Z80) P1, P2 & P3 4-pin connectors (unknown purpose) 2008-08: Added Dips and Dip locations based on Service Mode. TODO: - Merge this driver with SunA16 driver. Notes: - Maybe SA stands for SunA? The z80 memory map matches the one seen in Ultra Balloon, and the only difference stands in the DAC used. And the sprite chip is the same as the one used in SunA16 driver as well. */ #include "emu.h" #include "cpu/m68000/m68000.h" #include "cpu/z80/z80.h" #include "sound/dac.h" class go2000_state : public driver_device { public: go2000_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag) { } /* memory pointers */ UINT16 * m_videoram; UINT16 * m_videoram2; // UINT16 * m_paletteram; // currently this uses generic palette handling /* devices */ device_t *m_soundcpu; }; static WRITE16_HANDLER( sound_cmd_w ) { go2000_state *state = space->machine().driver_data(); soundlatch_w(space, offset, data & 0xff); device_set_input_line(state->m_soundcpu, 0, HOLD_LINE); } static ADDRESS_MAP_START( go2000_map, AS_PROGRAM, 16 ) AM_RANGE(0x000000, 0x03ffff) AM_ROM AM_RANGE(0x200000, 0x203fff) AM_RAM AM_RANGE(0x600000, 0x60ffff) AM_RAM AM_BASE_MEMBER(go2000_state, m_videoram) AM_RANGE(0x610000, 0x61ffff) AM_RAM AM_BASE_MEMBER(go2000_state, m_videoram2) AM_RANGE(0x800000, 0x800fff) AM_RAM_WRITE(paletteram16_xBBBBBGGGGGRRRRR_word_w) AM_BASE_GENERIC(paletteram) AM_RANGE(0xa00000, 0xa00001) AM_READ_PORT("INPUTS") AM_RANGE(0xa00002, 0xa00003) AM_READ_PORT("DSW") AM_RANGE(0x620002, 0x620003) AM_WRITE(sound_cmd_w) // AM_RANGE(0xe00000, 0xe00001) AM_WRITENOP // AM_RANGE(0xe00010, 0xe00011) AM_WRITENOP // AM_RANGE(0xe00020, 0xe00021) AM_WRITENOP ADDRESS_MAP_END static WRITE8_HANDLER( go2000_pcm_1_bankswitch_w ) { memory_set_bank(space->machine(), "bank1", data & 0x07); } static ADDRESS_MAP_START( go2000_sound_map, AS_PROGRAM, 8 ) AM_RANGE(0x0000, 0x03ff) AM_ROM AM_RANGE(0x0400, 0xffff) AM_ROMBANK("bank1") ADDRESS_MAP_END static ADDRESS_MAP_START( go2000_sound_io, AS_IO, 8 ) ADDRESS_MAP_GLOBAL_MASK(0xff) AM_RANGE(0x00, 0x00) AM_READ(soundlatch_r) AM_RANGE(0x00, 0x00) AM_DEVWRITE("dac1", dac_w) AM_RANGE(0x03, 0x03) AM_WRITE(go2000_pcm_1_bankswitch_w) ADDRESS_MAP_END static INPUT_PORTS_START( go2000 ) PORT_START("INPUTS") PORT_BIT( 0x0001, IP_ACTIVE_LOW, IPT_BUTTON1 ) // continue PORT_BIT( 0x0002, IP_ACTIVE_LOW, IPT_START1 ) PORT_BIT( 0x0004, IP_ACTIVE_LOW, IPT_BUTTON2 ) // korean symbol PORT_BIT( 0x0008, IP_ACTIVE_LOW, IPT_BUTTON3 ) // out PORT_BIT( 0x0010, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) // high PORT_BIT( 0x0020, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) // low PORT_BIT( 0x0040, IP_ACTIVE_LOW, IPT_UNUSED) // unused? PORT_BIT( 0x0080, IP_ACTIVE_LOW, IPT_COIN1 ) PORT_BIT( 0x0100, IP_ACTIVE_LOW, IPT_UNUSED) // unused? PORT_BIT( 0x0200, IP_ACTIVE_LOW, IPT_UNUSED) // unused? PORT_BIT( 0x0400, IP_ACTIVE_LOW, IPT_UNUSED) // unused? PORT_BIT( 0x0800, IP_ACTIVE_LOW, IPT_BUTTON4 ) PORT_NAME("P1 M1") // m1 PORT_BIT( 0x1000, IP_ACTIVE_LOW, IPT_BUTTON5 ) PORT_NAME("P1 M2") // m2 PORT_BIT( 0x2000, IP_ACTIVE_LOW, IPT_BUTTON6 ) PORT_NAME("P1 M3") // m3 PORT_BIT( 0x4000, IP_ACTIVE_LOW, IPT_UNUSED) // unused? PORT_BIT( 0x8000, IP_ACTIVE_LOW, IPT_COIN2 ) // coin2 PORT_START("DSW") PORT_DIPNAME( 0x0003, 0x0003, "Coin / Credits" ) PORT_DIPLOCATION("SW-1:1,2") PORT_DIPSETTING( 0x0000, "1 Coin / 50 Credits" ) PORT_DIPSETTING( 0x0003, "1 Coin / 100 Credits" ) PORT_DIPSETTING( 0x0002, "1 Coin / 125 Credits" ) PORT_DIPSETTING( 0x0001, "1 Coin / 150 Credits" ) PORT_DIPNAME( 0x000c, 0x000c, "Minimum Coin" ) PORT_DIPLOCATION("SW-1:3,4") PORT_DIPSETTING( 0x000c, "1" ) PORT_DIPSETTING( 0x0008, "2" ) PORT_DIPSETTING( 0x0004, "3" ) PORT_DIPSETTING( 0x0000, "5" ) PORT_DIPUNKNOWN_DIPLOC( 0x0010, IP_ACTIVE_LOW, "SW-1:5" ) PORT_DIPUNKNOWN_DIPLOC( 0x0020, IP_ACTIVE_LOW, "SW-1:6" ) PORT_DIPUNKNOWN_DIPLOC( 0x0040, IP_ACTIVE_LOW, "SW-1:7" ) PORT_SERVICE_DIPLOC( 0x0080, IP_ACTIVE_LOW, "SW-1:8" ) PORT_DIPNAME( 0x0700, 0x0700, "Difficult-1" ) PORT_DIPLOCATION("SW-2:1,2,3") PORT_DIPSETTING( 0x0700, "1" ) PORT_DIPSETTING( 0x0600, "2" ) PORT_DIPSETTING( 0x0500, "3" ) PORT_DIPSETTING( 0x0400, "4" ) PORT_DIPSETTING( 0x0300, "5" ) PORT_DIPSETTING( 0x0200, "6" ) PORT_DIPSETTING( 0x0100, "7" ) PORT_DIPSETTING( 0x0000, "8" ) PORT_DIPNAME( 0x1800, 0x1800, "M1 value" ) PORT_DIPLOCATION("SW-2:4,5") PORT_DIPSETTING( 0x0800, "3000" ) PORT_CONDITION("DSW", 0x0003, PORTCOND_EQUALS, 0x0000) PORT_DIPSETTING( 0x0000, "3500" ) PORT_CONDITION("DSW", 0x0003, PORTCOND_EQUALS, 0x0000) PORT_DIPSETTING( 0x1800, "4000" ) PORT_CONDITION("DSW", 0x0003, PORTCOND_EQUALS, 0x0000) PORT_DIPSETTING( 0x1000, "4500" ) PORT_CONDITION("DSW", 0x0003, PORTCOND_EQUALS, 0x0000) PORT_DIPSETTING( 0x0800, "6000" ) PORT_CONDITION("DSW", 0x0003, PORTCOND_NOTEQUALS, 0x0000) PORT_DIPSETTING( 0x0000, "7000" ) PORT_CONDITION("DSW", 0x0003, PORTCOND_NOTEQUALS, 0x0000) PORT_DIPSETTING( 0x1800, "8000" ) PORT_CONDITION("DSW", 0x0003, PORTCOND_NOTEQUALS, 0x0000) PORT_DIPSETTING( 0x1000, "9000" ) PORT_CONDITION("DSW", 0x0003, PORTCOND_NOTEQUALS, 0x0000) PORT_DIPUNKNOWN_DIPLOC( 0x2000, IP_ACTIVE_LOW, "SW-2:6" ) PORT_DIPNAME( 0xc000, 0xc000, "Difficult-2" ) PORT_DIPLOCATION("SW-2:7,8") PORT_DIPSETTING( 0xc000, "1" ) PORT_DIPSETTING( 0x8000, "2" ) PORT_DIPSETTING( 0x4000, "3" ) PORT_DIPSETTING( 0x0000, "4" ) INPUT_PORTS_END static const gfx_layout go2000_layout = { 8,8, RGN_FRAC(1,1), 4, { 8,12,0,4 }, { 3,2,1,0, 19,18,17,16 }, { 0*32, 1*32, 2*32, 3*32,4*32,5*32,6*32,7*32 }, 8*32 }; static GFXDECODE_START( go2000 ) GFXDECODE_ENTRY( "gfx1", 0, go2000_layout, 0x0, 0x80 ) /* tiles */ GFXDECODE_END static VIDEO_START(go2000) { } static SCREEN_UPDATE(go2000) { go2000_state *state = screen->machine().driver_data(); int x,y; int count = 0; /* 0x600000 - 0x601fff / 0x610000 - 0x611fff */ for (x = 0; x < 64; x++) { for (y = 0; y < 32; y++) { int tile = state->m_videoram[count]; int attr = state->m_videoram2[count]; drawgfx_opaque(bitmap, cliprect, screen->machine().gfx[0], tile, attr, 0, 0, x * 8, y * 8); count++; } } /* 0x602000 - 0x603fff / 0x612000 - 0x613fff */ for (x = 0; x < 64; x++) { for (y = 0; y < 32; y++) { int tile = state->m_videoram[count]; int attr = state->m_videoram2[count]; drawgfx_transpen(bitmap, cliprect, screen->machine().gfx[0], tile, attr, 0, 0, x * 8, y * 8, 0xf); count++; } } /*Sprite RAM code actually copied from video/suna16.c with minor modifications.*/ { int offs; int max_x = screen->machine().primary_screen->width() - 8; int max_y = screen->machine().primary_screen->height() - 8; for (offs = 0xf800 / 2; offs < 0x10000 / 2 ; offs += 4/2) { int srcpg, srcx, srcy, dimx, dimy; int tile_x, tile_xinc, tile_xstart; int tile_y, tile_yinc; int dx, dy; int flipx, y0; int y = state->m_videoram[offs + 0 + 0x00000 / 2]; int x = state->m_videoram[offs + 1 + 0x00000 / 2]; int dim = state->m_videoram2[offs + 0 + 0x00000 / 2]; int bank = (x >> 12) & 0xf; srcpg = ((y & 0xf000) >> 12) + ((x & 0x0200) >> 5); // src page srcx = ((y >> 8) & 0xf) * 2; // src col srcy = ((dim >> 0) & 0xf) * 2; // src row switch ((dim >> 4) & 0xc) { case 0x0: dimx = 2; dimy = 2; y0 = 0x100; break; case 0x4: dimx = 4; dimy = 4; y0 = 0x100; break; case 0x8: dimx = 2; dimy = 32; y0 = 0x130; break; default: case 0xc: dimx = 4; dimy = 32; y0 = 0x120; break; } if (dimx == 4) { flipx = srcx & 2; srcx &= ~2; } else flipx = 0; x = (x & 0xff) - (x & 0x100); y = (y0 - (y & 0xff) - dimy * 8) & 0xff; if (flipx) { tile_xstart = dimx - 1; tile_xinc = -1; } else { tile_xstart = 0; tile_xinc = +1; } tile_y = 0; tile_yinc = +1; for (dy = 0; dy < dimy * 8; dy += 8) { tile_x = tile_xstart; for (dx = 0; dx < dimx * 8; dx += 8) { int addr = (srcpg * 0x20 * 0x20) + ((srcx + tile_x) & 0x1f) * 0x20 + ((srcy + tile_y) & 0x1f); int tile = state->m_videoram[addr + 0x00000 / 2]; int attr = state->m_videoram2[addr + 0x00000 / 2]; int sx = x + dx; int sy = (y + dy) & 0xff; int tile_flipx = tile & 0x4000; int tile_flipy = tile & 0x8000; if (flipx) tile_flipx = !tile_flipx; if (flip_screen_get(screen->machine())) { sx = max_x - sx; sy = max_y - sy; tile_flipx = !tile_flipx; tile_flipy = !tile_flipy; } drawgfx_transpen( bitmap, cliprect,screen->machine().gfx[0], (tile & 0x1fff) + bank*0x4000, attr, tile_flipx, tile_flipy, sx, sy,15 ); tile_x += tile_xinc; } tile_y += tile_yinc; } } } return 0; } static MACHINE_START( go2000 ) { go2000_state *state = machine.driver_data(); UINT8 *SOUND = machine.region("soundcpu")->base(); int i; for (i = 0; i < 8; i++) memory_configure_bank(machine, "bank1", i, 1, &SOUND[0x00400 + i * 0x10000], 0x10000 - 0x400); memory_set_bank(machine, "bank1", 0); state->m_soundcpu = machine.device("soundcpu"); } static MACHINE_CONFIG_START( go2000, go2000_state ) MCFG_CPU_ADD("maincpu", M68000, 10000000) MCFG_CPU_PROGRAM_MAP(go2000_map) MCFG_CPU_VBLANK_INT("screen", irq1_line_hold) MCFG_CPU_ADD("soundcpu", Z80, 4000000) MCFG_CPU_PROGRAM_MAP(go2000_sound_map) MCFG_CPU_IO_MAP(go2000_sound_io) MCFG_MACHINE_START(go2000) MCFG_GFXDECODE(go2000) MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_REFRESH_RATE(60) MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(0)) MCFG_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16) MCFG_SCREEN_SIZE(64*8, 32*8) MCFG_SCREEN_VISIBLE_AREA(0*8, 48*8-1, 2*8, 30*8-1) MCFG_SCREEN_UPDATE(go2000) MCFG_PALETTE_LENGTH(0x800) MCFG_VIDEO_START(go2000) MCFG_SPEAKER_STANDARD_STEREO("lspeaker", "rspeaker") MCFG_SOUND_ADD("dac1", DAC, 0) MCFG_SOUND_ROUTE(0, "lspeaker", 0.50) MCFG_SOUND_ROUTE(1, "rspeaker", 0.50) MACHINE_CONFIG_END ROM_START( go2000 ) ROM_REGION( 0x80000, "maincpu", 0 ) /* 68000 Code */ ROM_LOAD16_BYTE( "3.bin", 0x00000, 0x20000, CRC(fe1fb269) SHA1(266b8acddfcfd960b8e44f8606bf0873da42b9f8) ) ROM_LOAD16_BYTE( "4.bin", 0x00001, 0x20000, CRC(d6246ae3) SHA1(f2618dcabaa0c0a6e377e4acd1cdec8bea90bea8) ) ROM_REGION( 0x080000, "soundcpu", 0 ) /* Z80? */ ROM_LOAD( "5.bin", 0x00000, 0x80000, CRC(a32676ee) SHA1(2dab73497c0818fce479be21ed589985db51560b) ) ROM_REGION( 0x40000, "gfx1", ROMREGION_INVERT ) ROM_LOAD16_BYTE( "1.bin", 0x00000, 0x20000, CRC(96e50aba) SHA1(caa1aadab855c3a758378dc8c48eec859e8110a4) ) ROM_LOAD16_BYTE( "2.bin", 0x00001, 0x20000, CRC(b0adf1cb) SHA1(2afb30691182dbf46be709f0d5b03b0f8ff52790) ) ROM_END GAME( 2000, go2000, 0, go2000, go2000, 0, ROT0, "SA", "Go 2000", GAME_SUPPORTS_SAVE )