// license:BSD-3-Clause // copyright-holders:Mirko Buffoni, David Haywood /*************************************************************************** Cabaret (AMT) Driver by Mirko Buffoni, David Haywood TODO: - This game should have an NVRAM. There is trace of System Reset so need to find how to reset its content. - DSW3 is read, not sure where it's used - Keyboard is mapped through test mode, but some bits are unknown, and hopper is not emulated - Map Leds and Coin counters - Remove patches after finding why there are so many pitfalls. Maybe the game expects to read inputs via an external device and expects certain timings Press F1+F2 during reset to see 'pork*ish' test mode :P Interesting thing: this game is copyright AMT 1992, but protection checks are the same of IGS. AMT may be previous IGS name. ***************************************************************************/ #include "emu.h" #include "cpu/z180/z180.h" #include "machine/i8255.h" #include "sound/ym2413.h" #include "screen.h" #include "speaker.h" class cabaret_state : public driver_device { public: cabaret_state(const machine_config &mconfig, device_type type, const char *tag) : driver_device(mconfig, type, tag) , m_fg_tile_ram(*this, "fg_tile_ram") , m_fg_color_ram(*this, "fg_color_ram") , m_bg_scroll(*this, "bg_scroll") , m_bg_tile_ram(*this, "bg_tile_ram") , m_maincpu(*this, "maincpu") , m_gfxdecode(*this, "gfxdecode") , m_palette(*this, "palette") , m_led(*this, "led6") { } DECLARE_WRITE8_MEMBER(bg_scroll_w); DECLARE_WRITE8_MEMBER(bg_tile_w); DECLARE_WRITE8_MEMBER(fg_tile_w); DECLARE_WRITE8_MEMBER(fg_color_w); DECLARE_WRITE8_MEMBER(nmi_and_coins_w); DECLARE_WRITE8_MEMBER(ppi2_b_w); DECLARE_WRITE8_MEMBER(ppi2_c_w); void show_out(); void init_cabaret(); TILE_GET_INFO_MEMBER(get_bg_tile_info); TILE_GET_INFO_MEMBER(get_fg_tile_info); uint32_t screen_update_cabaret(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect); INTERRUPT_GEN_MEMBER(cabaret_interrupt); void cabaret(machine_config &config); void cabaret_map(address_map &map); void cabaret_portmap(address_map &map); protected: virtual void machine_start() override { m_led.resolve(); } virtual void machine_reset() override; virtual void video_start() override; required_shared_ptr m_fg_tile_ram; required_shared_ptr m_fg_color_ram; required_shared_ptr m_bg_scroll; required_shared_ptr m_bg_tile_ram; tilemap_t *m_bg_tilemap; tilemap_t *m_fg_tilemap; int m_nmi_enable; uint8_t m_out[3]; required_device m_maincpu; required_device m_gfxdecode; required_device m_palette; output_finder<> m_led; }; /*************************************************************************** Video Hardware ***************************************************************************/ WRITE8_MEMBER(cabaret_state::bg_scroll_w) { m_bg_scroll[offset] = data; m_bg_tilemap->set_scrolly(offset,data); } WRITE8_MEMBER(cabaret_state::bg_tile_w) { m_bg_tile_ram[offset] = data; m_bg_tilemap->mark_tile_dirty(offset); } TILE_GET_INFO_MEMBER(cabaret_state::get_bg_tile_info) { int code = m_bg_tile_ram[tile_index]; SET_TILE_INFO_MEMBER(1, code & 0xff, 0, 0); } TILE_GET_INFO_MEMBER(cabaret_state::get_fg_tile_info) { int code = m_fg_tile_ram[tile_index] | (m_fg_color_ram[tile_index] << 8); int tile = code & 0x1fff; SET_TILE_INFO_MEMBER(0, code, tile != 0x1fff ? ((code >> 12) & 0xe) + 1 : 0, 0); } WRITE8_MEMBER(cabaret_state::fg_tile_w) { m_fg_tile_ram[offset] = data; m_fg_tilemap->mark_tile_dirty(offset); } WRITE8_MEMBER(cabaret_state::fg_color_w) { m_fg_color_ram[offset] = data; m_fg_tilemap->mark_tile_dirty(offset); } void cabaret_state::video_start() { m_bg_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(FUNC(cabaret_state::get_bg_tile_info),this), TILEMAP_SCAN_ROWS, 8, 32, 64, 8); m_fg_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(FUNC(cabaret_state::get_fg_tile_info),this), TILEMAP_SCAN_ROWS, 8, 8, 64, 32); m_fg_tilemap->set_transparent_pen(0); m_bg_tilemap->set_scroll_cols(64); } uint32_t cabaret_state::screen_update_cabaret(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect) { bitmap.fill(m_palette->black_pen(), cliprect); m_bg_tilemap->draw(screen, bitmap, cliprect, 0, 0); m_fg_tilemap->draw(screen, bitmap, cliprect, 0, 0); return 0; } /*************************************************************************** Memory Maps ***************************************************************************/ void cabaret_state::show_out() { #ifdef MAME_DEBUG popmessage("%02x %02x %02x",m_out[0], m_out[1], m_out[2]); #endif } WRITE8_MEMBER(cabaret_state::nmi_and_coins_w) { if ((m_nmi_enable ^ data) & (~0xdd)) { logerror("PC %06X: nmi_and_coins = %02x\n",m_maincpu->pc(),data); // popmessage("%02x",data); } machine().bookkeeping().coin_counter_w(0, data & 0x01); // coin_a machine().bookkeeping().coin_counter_w(1, data & 0x04); // coin_c machine().bookkeeping().coin_counter_w(2, data & 0x08); // key in machine().bookkeeping().coin_counter_w(3, data & 0x10); // coin m_out mech m_led = BIT(data, 6); // led for coin m_out / hopper active m_nmi_enable = data; // data & 0x80 // nmi enable? m_out[0] = data; show_out(); } WRITE8_MEMBER(cabaret_state::ppi2_b_w) { m_out[1] = data; show_out(); } WRITE8_MEMBER(cabaret_state::ppi2_c_w) { m_out[2] = data; show_out(); } void cabaret_state::cabaret_map(address_map &map) { map(0x00000, 0x0efff).rom(); map(0x0f000, 0x0ffff).ram().region("maincpu", 0xf000); } void cabaret_state::cabaret_portmap(address_map &map) { map(0x0000, 0x003f).ram(); // Z180 internal regs map(0x0080, 0x0083).rw("ppi1", FUNC(i8255_device::read), FUNC(i8255_device::write)); map(0x0090, 0x0093).rw("ppi2", FUNC(i8255_device::read), FUNC(i8255_device::write)); map(0x00a0, 0x00a3).rw("ppi3", FUNC(i8255_device::read), FUNC(i8255_device::write)); map(0x00b0, 0x00b0).portr("DSW3"); /* DSW3 */ map(0x00e0, 0x00e1).w("ymsnd", FUNC(ym2413_device::write)); map(0x2000, 0x27ff).ram().w(this, FUNC(cabaret_state::fg_tile_w)).share("fg_tile_ram"); map(0x2800, 0x2fff).ram().w(this, FUNC(cabaret_state::fg_color_w)).share("fg_color_ram"); map(0x3000, 0x37ff).ram().w(m_palette, FUNC(palette_device::write8)).share("palette"); map(0x3800, 0x3fff).ram().w(m_palette, FUNC(palette_device::write8_ext)).share("palette_ext"); map(0x1000, 0x103f).ram().w(this, FUNC(cabaret_state::bg_scroll_w)).share("bg_scroll"); map(0x1800, 0x19ff).ram().w(this, FUNC(cabaret_state::bg_tile_w)).share("bg_tile_ram"); map(0x8000, 0xffff).rom().region("gfx3", 0); } /*************************************************************************** Input Ports ***************************************************************************/ static INPUT_PORTS_START( cabaret ) PORT_START("DSW1") // OK PORT_DIPNAME( 0x07, 0x00, "Poke %" ) PORT_DIPLOCATION("SWA:1,2,3") PORT_DIPSETTING( 0x07, "60%" ) PORT_DIPSETTING( 0x06, "65%" ) PORT_DIPSETTING( 0x05, "70%" ) PORT_DIPSETTING( 0x04, "75%" ) PORT_DIPSETTING( 0x03, "82%" ) PORT_DIPSETTING( 0x02, "85%" ) PORT_DIPSETTING( 0x01, "88%" ) PORT_DIPSETTING( 0x00, "92%" ) PORT_DIPNAME( 0x08, 0x00, "Double %" ) PORT_DIPLOCATION("SWA:4") PORT_DIPSETTING( 0x08, DEF_STR( Easy ) ) PORT_DIPSETTING( 0x00, DEF_STR( Hard ) ) PORT_DIPNAME( 0x10, 0x00, "Coin Credit" ) PORT_DIPLOCATION("SWA:5") PORT_DIPSETTING( 0x10, "5/1" ) PORT_DIPSETTING( 0x00, "10/1" ) PORT_DIPNAME( 0x20, 0x00, "Held Method" ) PORT_DIPLOCATION("SWA:6") PORT_DIPSETTING( 0x20, "Discard" ) PORT_DIPSETTING( 0x00, "Held" ) PORT_DIPNAME( 0x40, 0x00, "Speed" ) PORT_DIPLOCATION("SWA:7") PORT_DIPSETTING( 0x40, "Slow" ) PORT_DIPSETTING( 0x00, "Quick" ) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_START("DSW2") // OK PORT_DIPNAME( 0x03, 0x00, "Limit" ) PORT_DIPLOCATION("SWB:1,2") PORT_DIPSETTING( 0x03, "5000" ) PORT_DIPSETTING( 0x02, "10000" ) PORT_DIPSETTING( 0x01, "15000" ) PORT_DIPSETTING( 0x00, "30000" ) PORT_DIPNAME( 0x0c, 0x00, "Max Bet" ) PORT_DIPLOCATION("SWB:3,4") PORT_DIPSETTING( 0x0c, "20" ) PORT_DIPSETTING( 0x08, "30" ) PORT_DIPSETTING( 0x04, "40" ) PORT_DIPSETTING( 0x00, "50" ) PORT_DIPNAME( 0x10, 0x00, "Withdraw" ) PORT_DIPLOCATION("SWB:5") PORT_DIPSETTING( 0x10, DEF_STR( No ) ) PORT_DIPSETTING( 0x00, DEF_STR( Yes ) ) PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_DIPLOCATION("SWB:6,7,8") PORT_START("DSW3") PORT_DIPUNKNOWN( 0xff, 0xff ) PORT_START("SERVICE") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_SERVICE1 ) PORT_NAME("Memory Clear") // stats, memory PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_GAMBLE_PAYOUT ) PORT_SERVICE_NO_TOGGLE( 0x20, IP_ACTIVE_LOW ) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_GAMBLE_BOOK ) PORT_NAME("Statistics") PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_START("COINS") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_COIN1 ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_COIN2 ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_GAMBLE_KEYIN ) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_GAMBLE_KEYOUT ) PORT_NAME("Key Down") PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNKNOWN ) PORT_START("BUTTONS1") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_POKER_HOLD1 ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_POKER_HOLD2 ) PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_POKER_HOLD3 ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_POKER_HOLD4 ) PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_POKER_HOLD5 ) PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED ) PORT_START("BUTTONS2") PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_START1 ) PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_GAMBLE_LOW ) PORT_NAME("Decrement") PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_GAMBLE_BET ) PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_GAMBLE_TAKE ) PORT_NAME("Collect") PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_GAMBLE_HIGH ) PORT_NAME("W-Up") PORT_BIT( 0xe0, IP_ACTIVE_LOW, IPT_UNUSED ) INPUT_PORTS_END /*************************************************************************** Graphics Layout ***************************************************************************/ static const gfx_layout layout_8x8x6 = { 8, 8, RGN_FRAC(1, 3), 6, { RGN_FRAC(0,3)+8,RGN_FRAC(0,3)+0, RGN_FRAC(1,3)+8,RGN_FRAC(1,3)+0, RGN_FRAC(2,3)+8,RGN_FRAC(2,3)+0 }, { STEP8(0,1) }, { STEP8(0,2*8) }, 8*8*2 }; static const gfx_layout layout_8x32x6i = { 8, 32, RGN_FRAC(1, 3), 6, { RGN_FRAC(0,3)+8,RGN_FRAC(0,3)+0, RGN_FRAC(1,3)+8,RGN_FRAC(1,3)+0, RGN_FRAC(2,3)+8,RGN_FRAC(2,3)+0 }, { STEP8(0,1) }, { STEP32(0,2*8) }, 8*32*2 }; static GFXDECODE_START( gfx_cabaret ) GFXDECODE_ENTRY( "gfx1", 0x00000, layout_8x8x6, 0, 16 ) GFXDECODE_ENTRY( "gfx2", 0x00000, layout_8x32x6i, 0, 16 ) GFXDECODE_END /*************************************************************************** Machine Drivers ***************************************************************************/ void cabaret_state::machine_reset() { m_nmi_enable = 0; } INTERRUPT_GEN_MEMBER(cabaret_state::cabaret_interrupt) { if (m_nmi_enable & 0x80) device.execute().pulse_input_line(INPUT_LINE_NMI, attotime::zero); } MACHINE_CONFIG_START(cabaret_state::cabaret) /* basic machine hardware */ MCFG_DEVICE_ADD("maincpu", Z180, XTAL(12'000'000) / 2) MCFG_DEVICE_PROGRAM_MAP(cabaret_map) MCFG_DEVICE_IO_MAP(cabaret_portmap) MCFG_DEVICE_VBLANK_INT_DRIVER("screen", cabaret_state, cabaret_interrupt) MCFG_DEVICE_ADD("ppi1", I8255, 0) MCFG_I8255_IN_PORTA_CB(IOPORT("BUTTONS2")) MCFG_I8255_IN_PORTB_CB(IOPORT("SERVICE")) MCFG_I8255_IN_PORTC_CB(IOPORT("COINS")) MCFG_DEVICE_ADD("ppi2", I8255, 0) MCFG_I8255_IN_PORTA_CB(IOPORT("BUTTONS1")) MCFG_I8255_OUT_PORTB_CB(WRITE8(*this, cabaret_state, ppi2_b_w)) MCFG_I8255_OUT_PORTC_CB(WRITE8(*this, cabaret_state, ppi2_c_w)) MCFG_DEVICE_ADD("ppi3", I8255, 0) MCFG_I8255_OUT_PORTA_CB(WRITE8(*this, cabaret_state, nmi_and_coins_w)) MCFG_I8255_TRISTATE_PORTA_CB(CONSTANT(0xf0)) MCFG_I8255_IN_PORTB_CB(IOPORT("DSW1")) MCFG_I8255_IN_PORTC_CB(IOPORT("DSW2")) /* video hardware */ MCFG_SCREEN_ADD("screen", RASTER) MCFG_SCREEN_REFRESH_RATE(60) MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(0)) MCFG_SCREEN_SIZE(512, 256) MCFG_SCREEN_VISIBLE_AREA(0, 512-1, 0, 256-1) MCFG_SCREEN_UPDATE_DRIVER(cabaret_state, screen_update_cabaret) MCFG_SCREEN_PALETTE("palette") MCFG_DEVICE_ADD("gfxdecode", GFXDECODE, "palette", gfx_cabaret) MCFG_PALETTE_ADD("palette", 0x800) MCFG_PALETTE_FORMAT(xBBBBBGGGGGRRRRR) /* sound hardware */ SPEAKER(config, "mono").front_center(); MCFG_DEVICE_ADD("ymsnd", YM2413, XTAL(3'579'545)) MCFG_SOUND_ROUTE(ALL_OUTPUTS, "mono", 1.0) MACHINE_CONFIG_END void cabaret_state::init_cabaret() { uint8_t *rom = memregion("maincpu")->base(); /* decrypt the program ROM */ for (int i = 0; i < 0xf000; i++) { if ((i & 0x2206) == 0x2002) rom[i] ^= 0x01; } /* Patch pitfalls */ rom[0x1012] = rom[0x1013] = 0; rom[0x13b8] = 0x18; rom[0x53a6] = 0x18; rom[0x73c6] = 0x18; rom[0xc46a] = 0x18; rom[0xc583] = 0x18; rom[0xc5fa] = 0x18; rom[0xc6c4] = 0x18; } ROM_START( cabaret ) ROM_REGION( 0x10000, "maincpu", 0 ) /* 64k for code */ ROM_LOAD( "cg-8v204.u97", 0x0000, 0x10000, CRC(44cebf77) SHA1(e3f4e4abf41388f0eed50cf9a0fd0b14aa2f8b93) ) ROM_REGION( 0x60000, "gfx1", 0 ) ROM_LOAD( "cg-4.u43", 0x40000, 0x20000, CRC(e509f50a) SHA1(7e68ca54642c92cdb348d5cf9466065938d0e027) ) ROM_LOAD( "cg-5.u44", 0x20000, 0x20000, CRC(e2cbf489) SHA1(3a15ed7efd5696656e6d55b54ec0ff779bdb0d98) ) ROM_LOAD( "cg-6.u45", 0x00000, 0x20000, CRC(4f2fced7) SHA1(b954856ffdc97fbc99fd3ec087376fbf466d2d5a) ) ROM_REGION( 0xc000, "gfx2", 0 ) ROM_LOAD( "cg-1.u40", 0x8000, 0x4000, CRC(7dee8b1f) SHA1(80dbdf6aab9b02cc000956b7894023552428e6a1) ) ROM_LOAD( "cg-2.u41", 0x0000, 0x4000, CRC(ce8dea39) SHA1(b30d1678a7b98cd821d2ce7383a83cb7c9f31b5f) ) ROM_LOAD( "cg-3.u42", 0x4000, 0x4000, CRC(7e1f821f) SHA1(b709d49f9d1890fe3b8ca7f90affc0017a0ad95e) ) ROM_REGION( 0x8000, "gfx3", 0 ) ROM_LOAD( "cg-7.u98", 0x0000, 0x8000, CRC(b93ae6f8) SHA1(accb87045c278d5d79fff65bb763aa6e8025a945) ) /* background maps, read by the CPU */ ROM_END GAME( 1992, cabaret, 0, cabaret, cabaret, cabaret_state, init_cabaret, ROT0, "AMT Co. Ltd.", "Cabaret", MACHINE_NOT_WORKING )