// license:BSD-3-Clause // copyright-holders:R. Belmont /*************************************************************************** quickpick5.cpp: Konami "Quick Pick 5" medal game Quick Pick 5 (c) 199? Konami Driver by R. Belmont Rundown of PCB: Main CPU: Z80 Konami Custom chips: 051649 (SCC1 sound) 053252 (timing/interrupt controller) 053244 (sprites) 053245 (sprites) ***************************************************************************/ #include "emu.h" #include "cpu/z80/z80.h" #include "machine/eepromser.h" #include "sound/k051649.h" #include "sound/okim6295.h" #include "video/k053244_k053245.h" #include "video/konami_helper.h" #include "machine/k053252.h" #include "machine/nvram.h" #include "machine/timer.h" #include "screen.h" #include "speaker.h" class quickpick5_state : public driver_device { public: quickpick5_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag), m_maincpu(*this, "maincpu"), m_palette(*this, "palette"), m_k053245(*this, "k053245"), m_k051649(*this, "k051649"), m_k053252(*this, "k053252"), m_gfxdecode(*this, "gfxdecode"), m_oki(*this, "oki"), m_ttlrom_offset(0) { } uint32_t screen_update_quickpick5(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect); K05324X_CB_MEMBER(sprite_callback); TILE_GET_INFO_MEMBER(ttl_get_tile_info); DECLARE_WRITE8_MEMBER(ccu_int_time_w); TIMER_DEVICE_CALLBACK_MEMBER(scanline); READ8_MEMBER(control_r) { return m_control; } WRITE_LINE_MEMBER(vbl_ack_w) { m_maincpu->set_input_line(0, CLEAR_LINE); } WRITE_LINE_MEMBER(nmi_ack_w) { m_maincpu->set_input_line(INPUT_LINE_NMI, CLEAR_LINE); } // A0 is inverted to match the Z80's endianness. Typical Konami. READ8_MEMBER(k244_r) { return m_k053245->k053244_r(space, offset^1); } WRITE8_MEMBER(k244_w) { m_k053245->k053244_w(space, offset^1, data); } READ8_MEMBER(k245_r) { return m_k053245->k053245_r(space, offset^1); } WRITE8_MEMBER(k245_w) { m_k053245->k053245_w(space, offset^1, data); } WRITE8_MEMBER(control_w) { membank("bank1")->set_entry(data&0x1); if (((m_control & 0x60) != 0x60) && ((data & 0x60) == 0x60)) { m_ttlrom_offset = 0; } m_control = data; } DECLARE_READ8_MEMBER(vram_r); DECLARE_WRITE8_MEMBER(vram_w); void quickpick5(machine_config &config); void quickpick5_main(address_map &map); protected: virtual void machine_start() override; virtual void machine_reset() override; virtual void video_start() override; private: required_device m_maincpu; required_device m_palette; required_device m_k053245; required_device m_k051649; required_device m_k053252; required_device m_gfxdecode; required_device m_oki; int m_ttl_gfx_index; tilemap_t *m_ttl_tilemap; uint8_t m_control; int m_ttlrom_offset; uint8_t m_vram[0x1000]; bool m_title_hack; int m_ccu_int_time, m_ccu_int_time_count; }; WRITE8_MEMBER(quickpick5_state::ccu_int_time_w) { logerror("ccu_int_time rewritten with value of %02x\n", data); m_ccu_int_time = data; } READ8_MEMBER(quickpick5_state::vram_r) { if ((m_control & 0x10) == 0x10) { offset |= 0x800; if ((offset >= 0x800) && (offset <= 0x880)) { return m_k051649->k051649_waveform_r(space, offset & 0x7f); } else if ((offset >= 0x8e0) && (offset <= 0x8ff)) { return m_k051649->k051649_test_r(space, offset-0x8e0); } } if ((m_control & 0x60) == 0x60) { uint8_t *ROM = memregion("ttl")->base(); return ROM[m_ttlrom_offset++]; } return m_vram[offset]; } WRITE8_MEMBER(quickpick5_state::vram_w) { if ((m_control & 0x10) == 0x10) { offset |= 0x800; if ((offset >= 0x800) && (offset < 0x880)) { m_k051649->k051649_waveform_w(space, offset-0x800, data); return; } else if (offset < 0x88a) { m_k051649->k051649_frequency_w(space, offset-0x880, data); return; } else if (offset < 0x88f) { m_k051649->k051649_volume_w(space, offset-0x88a, data); return; } else if (offset < 0x890) { m_k051649->k051649_keyonoff_w(space, 0, data); return; } m_k051649->k051649_test_w(space, offset-0x8e0, data); return; } m_vram[offset] = data; m_ttl_tilemap->mark_tile_dirty(offset>>1); } void quickpick5_state::video_start() { static const gfx_layout charlayout = { 8, 8, // 8x8 4096, // # of tiles 4, // 4bpp { 0, 1, 2, 3 }, // plane offsets { 0*4, 1*4, 2*4, 3*4, 4*4, 5*4, 6*4, 7*4 }, // X offsets { 0*8*4, 1*8*4, 2*8*4, 3*8*4, 4*8*4, 5*8*4, 6*8*4, 7*8*4 }, // Y offsets 8*8*4 }; int gfx_index; /* find first empty slot to decode gfx */ for (gfx_index = 0; gfx_index < MAX_GFX_ELEMENTS; gfx_index++) if (m_gfxdecode->gfx(gfx_index) == nullptr) break; assert(gfx_index != MAX_GFX_ELEMENTS); // decode the ttl layer's gfx m_gfxdecode->set_gfx(gfx_index, std::make_unique(m_palette, charlayout, memregion("ttl")->base(), 0, m_palette->entries() / 16, 0)); m_ttl_gfx_index = gfx_index; m_ttl_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(FUNC(quickpick5_state::ttl_get_tile_info),this), TILEMAP_SCAN_ROWS, 8, 8, 64, 32); m_ttl_tilemap->set_transparent_pen(0); m_ttl_tilemap->set_scrollx(80); m_ttl_tilemap->set_scrolly(28); m_ttlrom_offset = 0; m_ccu_int_time_count = 0; m_ccu_int_time = 20; } TILE_GET_INFO_MEMBER(quickpick5_state::ttl_get_tile_info) { uint8_t *lvram = &m_vram[0]; int attr, code; attr = lvram[BYTE_XOR_LE((tile_index<<1)+1)]; code = lvram[BYTE_XOR_LE((tile_index<<1))] | ((attr & 0xf) << 8); attr >>= 3; attr &= ~1; SET_TILE_INFO_MEMBER(m_ttl_gfx_index, code, attr, 0); } uint32_t quickpick5_state::screen_update_quickpick5(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { bitmap.fill(0, cliprect); screen.priority().fill(0, cliprect); m_title_hack = false; m_k053245->sprites_draw(bitmap, cliprect, screen.priority()); if (!m_title_hack) { m_ttl_tilemap->draw(screen, bitmap, cliprect, 0, 0xff); } return 0; } K05324X_CB_MEMBER(quickpick5_state::sprite_callback) { *code = (*code & 0x7ff); *color = (*color & 0x003f); if (*code == 0x520) { m_title_hack = true; } } TIMER_DEVICE_CALLBACK_MEMBER(quickpick5_state::scanline) { int scanline = param; // z80 /IRQ is connected to the IRQ1(vblank) pin of k053252 CCU if(scanline == 255) { m_maincpu->set_input_line(0, ASSERT_LINE); } // z80 /NMI is connected to the IRQ2 pin of k053252 CCU // the following code is emulating INT_TIME of the k053252, this code will go away // when the new konami branch is merged. m_ccu_int_time_count--; if (m_ccu_int_time_count <= 0) { m_maincpu->set_input_line(INPUT_LINE_NMI, ASSERT_LINE); m_ccu_int_time_count = m_ccu_int_time; } } void quickpick5_state::quickpick5_main(address_map &map) { map(0x0000, 0x7fff).rom().region("maincpu", 0); map(0x8000, 0xbfff).bankr("bank1"); map(0xc000, 0xdbff).ram().share("nvram"); map(0xdc00, 0xdc0f).rw(m_k053252, FUNC(k053252_device::read), FUNC(k053252_device::write)); map(0xdc40, 0xdc4f).rw(this, FUNC(quickpick5_state::k244_r), FUNC(quickpick5_state::k244_w)); map(0xdc80, 0xdc80).portr("DSW3"); map(0xdc81, 0xdc81).portr("DSW4"); map(0xdcc0, 0xdcc0).portr("DSW1"); map(0xdcc1, 0xdcc1).portr("DSW2"); map(0xdd00, 0xdd00).nopw(); map(0xdd40, 0xdd40).noprw(); map(0xdd80, 0xdd80).rw(this, FUNC(quickpick5_state::control_r), FUNC(quickpick5_state::control_w)); map(0xddc0, 0xddc0).nopw(); map(0xde00, 0xde00).nopw(); map(0xde40, 0xde40).w(m_oki, FUNC(okim6295_device::write)); map(0xe000, 0xefff).rw(this, FUNC(quickpick5_state::vram_r), FUNC(quickpick5_state::vram_w)); map(0xf000, 0xf7ff).ram().w(m_palette, FUNC(palette_device::write8)).share("palette"); map(0xf800, 0xffff).rw(this, FUNC(quickpick5_state::k245_r), FUNC(quickpick5_state::k245_w)); } static INPUT_PORTS_START( quickpick5 ) PORT_START("DSW1") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_COIN1 ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_COIN2 ) PORT_DIPNAME( 0x04, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:3") PORT_DIPSETTING( 0x04, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x08, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:4") PORT_DIPSETTING( 0x08, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:5") PORT_DIPSETTING( 0x10, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:6") PORT_DIPSETTING( 0x20, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x40, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:7") PORT_DIPSETTING( 0x40, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x80, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:8") PORT_DIPSETTING( 0x80, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_START("DSW2") PORT_DIPNAME( 0x01, 0x00, "Reset Switch" ) PORT_DIPLOCATION("SW2:1") PORT_DIPSETTING( 0x01, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x02, 0x00, "Global Stats" ) PORT_DIPLOCATION("SW2:2") PORT_DIPSETTING( 0x02, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x04, 0x00, "Last Game Stats" ) PORT_DIPLOCATION("SW2:3") PORT_DIPSETTING( 0x04, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x08, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW2:4") PORT_DIPSETTING( 0x08, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW2:5") PORT_DIPSETTING( 0x10, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW2:6") PORT_DIPSETTING( 0x20, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x40, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW2:7") PORT_DIPSETTING( 0x40, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x80, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW2:8") PORT_DIPSETTING( 0x80, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_START("DSW3") PORT_DIPNAME( 0x01, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:1") PORT_DIPSETTING( 0x01, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x02, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:2") PORT_DIPSETTING( 0x02, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x04, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:3") PORT_DIPSETTING( 0x04, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x08, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:4") PORT_DIPSETTING( 0x08, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:5") PORT_DIPSETTING( 0x10, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:6") PORT_DIPSETTING( 0x20, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x40, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:7") PORT_DIPSETTING( 0x40, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x80, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:8") PORT_DIPSETTING( 0x80, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_START("DSW4") PORT_DIPNAME( 0x01, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:1") PORT_DIPSETTING( 0x01, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x02, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:2") PORT_DIPSETTING( 0x02, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x04, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:3") PORT_DIPSETTING( 0x04, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x08, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:4") PORT_DIPSETTING( 0x08, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:5") PORT_DIPSETTING( 0x10, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:6") PORT_DIPSETTING( 0x20, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x40, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:7") PORT_DIPSETTING( 0x40, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) PORT_DIPNAME( 0x80, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:8") PORT_DIPSETTING( 0x80, DEF_STR( On ) ) PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) INPUT_PORTS_END void quickpick5_state::machine_start() { membank("bank1")->configure_entries(0, 0x2, memregion("maincpu")->base()+0x8000, 0x4000); membank("bank1")->set_entry(0); } void quickpick5_state::machine_reset() { } MACHINE_CONFIG_START(quickpick5_state::quickpick5) /* basic machine hardware */ MCFG_CPU_ADD("maincpu", Z80, XTAL(32'000'000)/4) // z84c0008pec 8mhz part, 32Mhz xtal verified on PCB, divisor unknown MCFG_CPU_PROGRAM_MAP(quickpick5_main) MCFG_TIMER_DRIVER_ADD_SCANLINE("scantimer", quickpick5_state, scanline, "screen", 0, 1) MCFG_DEVICE_ADD("k053252", K053252, XTAL(32'000'000)/4) /* K053252, xtal verified, divider not verified */ MCFG_K053252_INT1_ACK_CB(WRITELINE(quickpick5_state, vbl_ack_w)) MCFG_K053252_INT2_ACK_CB(WRITELINE(quickpick5_state, nmi_ack_w)) MCFG_K053252_INT_TIME_CB(WRITE8(quickpick5_state, ccu_int_time_w)) /* video hardware */ MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_REFRESH_RATE(59.62) MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(20)) MCFG_SCREEN_SIZE(64*8, 33*8) MCFG_SCREEN_VISIBLE_AREA(88, 456-1, 28, 256-1) MCFG_SCREEN_UPDATE_DRIVER(quickpick5_state, screen_update_quickpick5) MCFG_SCREEN_PALETTE("palette") MCFG_PALETTE_ADD("palette", 1024) MCFG_PALETTE_ENABLE_SHADOWS() MCFG_PALETTE_FORMAT(xBBBBBGGGGGRRRRR) MCFG_DEVICE_ADD("k053245", K053245, 0) MCFG_GFX_PALETTE("palette") MCFG_K05324X_OFFSETS(-(44+80), 20) MCFG_K05324X_CB(quickpick5_state, sprite_callback) MCFG_GFXDECODE_ADD("gfxdecode", "palette", empty) MCFG_NVRAM_ADD_0FILL("nvram") /* sound hardware */ MCFG_SPEAKER_STANDARD_MONO("mono") MCFG_K051649_ADD("k051649", XTAL(32'000'000)/18) // xtal is verified, divider is not MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 0.45) MCFG_OKIM6295_ADD("oki", XTAL(32'000'000)/18, PIN7_HIGH) MCFG_SOUND_ROUTE(0, "mono", 1.0) MCFG_SOUND_ROUTE(1, "mono", 1.0) MACHINE_CONFIG_END ROM_START( quickp5 ) ROM_REGION( 0x10000, "maincpu", 0 ) /* main program */ ROM_LOAD( "117.10e.bin", 0x000000, 0x010000, CRC(3645e1a5) SHA1(7d0d98772f3732510e7a58f50a622fcec74087c3) ) ROM_REGION( 0x40000, "k053245", 0 ) /* sprites */ ROM_LOAD32_BYTE( "117-a02-7k.bin", 0x000003, 0x010000, CRC(745a1dc9) SHA1(33d876fb70cb802d62f87ad3721740e0961c7bec) ) ROM_LOAD32_BYTE( "117-a03-7l.bin", 0x000002, 0x010000, CRC(07ec6db7) SHA1(7a94efc5f313fee6b9b63b7d2b6ba1cbf4158900) ) ROM_LOAD32_BYTE( "117-a04-3l.bin", 0x000001, 0x010000, CRC(08dba5df) SHA1(2174be21c5a7db31ccc20ca0b88e4a94145776a5) ) ROM_LOAD32_BYTE( "117-a05-3k.bin", 0x000000, 0x010000, CRC(9b2d0501) SHA1(3f1c69ef101153da5ac3335585541006c42e954d) ) ROM_REGION( 0x80000, "ttl", 0 ) /* TTL text tilemap characters? */ ROM_LOAD( "117-18e.bin", 0x000000, 0x020000, CRC(10e0d1e2) SHA1(f4ba190814d5e3f3e910c9da24845b6ddb259bff) ) ROM_REGION( 0x20000, "oki", 0 ) /* OKIM6295 samples */ ROM_LOAD( "117-a01-2e.bin", 0x000000, 0x020000, CRC(3d8fbd01) SHA1(f350da2a4e7bfff9975188a39acf73415bd85b3d) ) ROM_REGION( 0x80000, "pals", 0 ) ROM_LOAD( "054590.11g", 0x000000, 0x040000, CRC(0442621c) SHA1(2e79bea4e37028a3c1223fb4e3b3e12ccad2b39b) ) ROM_LOAD( "054591.12g", 0x040000, 0x040000, CRC(eaa92d8f) SHA1(7a430f11127148f0c035973ce21cfec4cb60ce9d) ) ROM_END GAME( 1995, quickp5, 0, quickpick5, quickpick5, quickpick5_state, 0, ROT0, "Konami", "Quick Pick 5", MACHINE_NOT_WORKING)