diff options
Diffstat (limited to 'src/mame/misc/chance32.cpp')
-rw-r--r-- | src/mame/misc/chance32.cpp | 526 |
1 files changed, 526 insertions, 0 deletions
diff --git a/src/mame/misc/chance32.cpp b/src/mame/misc/chance32.cpp new file mode 100644 index 00000000000..4857c235156 --- /dev/null +++ b/src/mame/misc/chance32.cpp @@ -0,0 +1,526 @@ +// license:BSD-3-Clause +// copyright-holders:David Haywood, Angelo Salese, Roberto Fresca +/************************************************************************************************** + +Chance 32 + +PAL System Co, Ltd. +Osaka, Japan. + + +TODO: +- fill PCB details below; +- some blanks in I/O section; +- DIPs; +- Need to flip everything in video/gfx code, is it possible to untangle? + +=================================================================================================== + + 1x HD46505SP / HD6845SP + 1x Z84C0008PEC + + XTAL: 12.000 Mhz + +**************************************************************************************************/ + +#include "emu.h" + +#include "cpu/z80/z80.h" +#include "sound/okim6295.h" +#include "video/mc6845.h" +#include "emupal.h" +#include "screen.h" +#include "speaker.h" +#include "tilemap.h" + +#include "chance32.lh" + + +namespace { + +class chance32_state : public driver_device +{ +public: + chance32_state(const machine_config &mconfig, device_type type, const char *tag) + : driver_device(mconfig, type, tag) + , m_maincpu(*this, "maincpu") + , m_vram(*this, "vram%u", 0U) + , m_gfxdecode(*this, "gfxdecode") + , m_key_matrix(*this, "IN%u", 0U) + , m_lamps(*this, "lamp%u", 0U) + { } + + void chance32(machine_config &config); + +protected: + virtual void machine_start() override ATTR_COLD; + virtual void machine_reset() override ATTR_COLD; + virtual void video_start() override ATTR_COLD; + +private: + template <unsigned N> void vram_w(offs_t offset, uint8_t data) + { + m_vram[N][offset] = data; + m_tilemap[N]->mark_tile_dirty(offset / 2); + } + + void key_matrix_w(uint8_t data); + uint8_t key_matrix_r(); + void lamps_ff_w(uint8_t data); + + template <unsigned N> TILE_GET_INFO_MEMBER(get_tile_info); + uint32_t screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect); + void main_map(address_map &map) ATTR_COLD; + void main_io(address_map &map) ATTR_COLD; + + tilemap_t *m_tilemap[2]{}; + + uint8_t m_port_select = 0; + + required_device<cpu_device> m_maincpu; + required_shared_ptr_array<uint8_t, 2> m_vram; + + required_device<gfxdecode_device> m_gfxdecode; + required_ioport_array<4> m_key_matrix; + output_finder<13> m_lamps; +}; + + +template <unsigned N> TILE_GET_INFO_MEMBER(chance32_state::get_tile_info) +{ + const u16 code = (m_vram[N][tile_index * 2 + 1] << 8) | m_vram[N][tile_index * 2]; + const u8 flip = BIT(~code, 12); + tileinfo.set( + N, + code & 0x0fff, + code >> 13, + TILE_FLIPYX(flip << 1 | flip)); +} + +void chance32_state::video_start() +{ + m_tilemap[1] = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(chance32_state::get_tile_info<1>)), TILEMAP_SCAN_ROWS, 16, 8, 35, 29); + m_tilemap[1]->set_transparent_pen(0); + + m_tilemap[0] = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(chance32_state::get_tile_info<0>)), TILEMAP_SCAN_ROWS, 16, 8, 35, 29); + + m_tilemap[0]->set_flip(TILE_FLIPX|TILE_FLIPY); + m_tilemap[1]->set_flip(TILE_FLIPX|TILE_FLIPY); +} + + +uint32_t chance32_state::screen_update(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect) +{ + m_tilemap[0]->draw(screen, bitmap, cliprect, 0, 0); + m_tilemap[1]->draw(screen, bitmap, cliprect, 0, 0); + + return 0; +} + + +void chance32_state::key_matrix_w(uint8_t data) +{ + m_port_select = data; +} + +uint8_t chance32_state::key_matrix_r() +{ + uint8_t res = 0; + for (unsigned i = 0; i < 4; i++) + { + if (BIT(m_port_select, i)) + res |= m_key_matrix[i]->read(); + } + + return res; +} + + +/* flip-flop lamps + + There are 2 groups of 7 output lines muxed in port 60h + The first bit is the group/mux selector. + + - bits - + 7654 3210 + ---- ---x Mux selector. + ---- --x- Small / Big lamps. + ---- -x-- Big / Small lamps. + ---- x--- Hold 5 lamp. + ---x ---- Hold 4 lamp. + --x- ---- Hold 3 lamp. + -x-- ---- Hold 2 lamp. + x--- ---- Hold 1 lamp. + + (alt state) + + - bits - + 7654 3210 + ---- ---x Mux selector. + ---- --x- unknown... + ---- -x-- Fever lamp + ---- x--- Cancel lamp. + ---x ---- D-Up / Take lamps. + --x- ---- Take / D-Up lamps. + -x-- ---- Deal lamp. + x--- ---- Bet lamp. + +*/ +void chance32_state::lamps_ff_w(uint8_t data) +{ + // bit 0 selects between the two banks + if (data & 1) + { + m_lamps[0] = BIT(data, 1); /* Lamp 0 - Small / Big */ + m_lamps[1] = BIT(data, 2); /* Lamp 1 - Big / Small */ + m_lamps[2] = BIT(data, 3); /* Lamp 2 - Hold 5 */ + m_lamps[3] = BIT(data, 4); /* Lamp 3 - Hold 4 */ + m_lamps[4] = BIT(data, 5); /* Lamp 4 - Hold 3 */ + m_lamps[5] = BIT(data, 6); /* Lamp 5 - Hold 2 */ + m_lamps[6] = BIT(data, 7); /* Lamp 6 - Hold 1 */ + + logerror("Lamps A: %02x\n", data); + } + + else + { + // TODO: what's bit 1 for? + m_lamps[7] = BIT(data, 2); /* Lamp 7 - Fever! */ + m_lamps[8] = BIT(data, 3); /* Lamp 8 - Cancel */ + m_lamps[9] = BIT(data, 4); /* Lamp 9 - D-Up / Take */ + m_lamps[10] = BIT(data, 5); /* Lamp 10 - Take / D-Up */ + m_lamps[11] = BIT(data, 6); /* Lamp 11 - Deal */ + m_lamps[12] = BIT(data, 7); /* Lamp 12 - Bet */ + + logerror("Lamps B: %02x\n", data); + } +} + + +void chance32_state::main_map(address_map &map) +{ + map(0x0000, 0xcfff).rom(); + map(0xd800, 0xdfff).ram(); + map(0xe000, 0xefff).ram().w("palette", FUNC(palette_device::write8)).share("palette"); + map(0xf000, 0xf7ff).ram().w(FUNC(chance32_state::vram_w<1>)).share(m_vram[1]); + map(0xf800, 0xffff).ram().w(FUNC(chance32_state::vram_w<0>)).share(m_vram[0]); +} + +void chance32_state::main_io(address_map &map) +{ + map.global_mask(0xff); + map(0x10, 0x10).nopw(); // writing bit3 constantly... watchdog? + map(0x13, 0x13).w(FUNC(chance32_state::key_matrix_w)); + map(0x20, 0x20).portr("DSW0"); + map(0x21, 0x21).portr("DSW1"); + map(0x22, 0x22).portr("DSW2"); + map(0x23, 0x23).portr("DSW3"); + map(0x24, 0x24).portr("DSW4"); + map(0x25, 0x25).r(FUNC(chance32_state::key_matrix_r)); + map(0x26, 0x26).portr("UNK"); // vblank (other bits are checked for different reasons) + map(0x30, 0x30).w("crtc", FUNC(mc6845_device::address_w)); + map(0x31, 0x31).w("crtc", FUNC(mc6845_device::register_w)); + map(0x50, 0x50).rw("oki", FUNC(okim6295_device::read), FUNC(okim6295_device::write)); + map(0x60, 0x60).w(FUNC(chance32_state::lamps_ff_w)); +} + + +// TODO: diplocations are unconfirmed +static INPUT_PORTS_START( chance32 ) + PORT_START("DSW0") + PORT_DIPNAME( 0x01, 0x00, "DSW0" ) PORT_DIPLOCATION("SW0:1") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x01, DEF_STR( On ) ) + PORT_DIPNAME( 0x02, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW0:2") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x02, DEF_STR( On ) ) + PORT_DIPNAME( 0x04, 0x00, "Auto Max Bet" ) PORT_DIPLOCATION("SW0:3") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x04, DEF_STR( On ) ) + PORT_DIPNAME( 0x08, 0x00, DEF_STR( Flip_Screen ) ) PORT_DIPLOCATION("SW0:4") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x08, DEF_STR( On ) ) + PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW0:5") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x10, DEF_STR( On ) ) + PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW0:6") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x20, DEF_STR( On ) ) + PORT_DIPNAME( 0xc0, 0x00, "Maximum Bet" ) PORT_DIPLOCATION("SW0:7,8") + PORT_DIPSETTING( 0x00, "10" ) + PORT_DIPSETTING( 0x40, "20" ) + PORT_DIPSETTING( 0x80, "30" ) + PORT_DIPSETTING( 0xc0, "50" ) + + PORT_START("DSW1") + PORT_DIPNAME( 0x01, 0x00, "DSW1" ) PORT_DIPLOCATION("SW1:1") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x01, DEF_STR( On ) ) + PORT_DIPNAME( 0x02, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:2") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x02, DEF_STR( On ) ) + PORT_DIPNAME( 0x04, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:3") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x04, DEF_STR( On ) ) + PORT_DIPNAME( 0x08, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:4") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x08, DEF_STR( On ) ) + PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:5") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x10, DEF_STR( On ) ) + PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW1:6") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x20, DEF_STR( On ) ) + PORT_DIPNAME( 0x40, 0x00, "Auto Hold" ) PORT_DIPLOCATION("SW1:7") + PORT_DIPSETTING( 0x40, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x00, DEF_STR( On ) ) + PORT_DIPNAME( 0x80, 0x00, "Double-Up Type" ) PORT_DIPLOCATION("SW1:8") + PORT_DIPSETTING( 0x00, "Holds" ) + PORT_DIPSETTING( 0x80, "Big/Small" ) + + PORT_START("DSW2") + PORT_DIPNAME( 0x07, 0x00, "Remote" ) PORT_DIPLOCATION("SW2:1,2,3") + PORT_DIPSETTING( 0x00, "5" ) + PORT_DIPSETTING( 0x01, "10" ) + PORT_DIPSETTING( 0x02, "20" ) + PORT_DIPSETTING( 0x03, "25" ) + PORT_DIPSETTING( 0x04, "40" ) + PORT_DIPSETTING( 0x05, "50" ) + PORT_DIPSETTING( 0x06, "60" ) + PORT_DIPSETTING( 0x07, "100" ) + PORT_DIPNAME( 0x38, 0x00, "A-B Coinage Multiplier" ) PORT_DIPLOCATION("SW2:4,5,6") + PORT_DIPSETTING( 0x00, "x1" ) + PORT_DIPSETTING( 0x08, "x2" ) + PORT_DIPSETTING( 0x10, "x4" ) + PORT_DIPSETTING( 0x18, "x5" ) + PORT_DIPSETTING( 0x20, "x6" ) + PORT_DIPSETTING( 0x28, "x10" ) + PORT_DIPSETTING( 0x30, "x25" ) + PORT_DIPSETTING( 0x38, "x50" ) + PORT_DIPNAME( 0x40, 0x00, "DSW2" ) PORT_DIPLOCATION("SW2:7") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x40, DEF_STR( On ) ) + PORT_DIPNAME( 0x80, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW2:8") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x80, DEF_STR( On ) ) + + PORT_START("DSW3") + PORT_DIPNAME( 0x01, 0x00, "DSW3" ) PORT_DIPLOCATION("SW3:1") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x01, DEF_STR( On ) ) + PORT_DIPNAME( 0x02, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:2") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x02, DEF_STR( On ) ) + PORT_DIPNAME( 0x04, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:3") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x04, DEF_STR( On ) ) + PORT_DIPNAME( 0x08, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:4") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x08, DEF_STR( On ) ) + PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:5") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x10, DEF_STR( On ) ) + PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:6") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x20, DEF_STR( On ) ) + PORT_DIPNAME( 0x40, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:7") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x40, DEF_STR( On ) ) + PORT_DIPNAME( 0x80, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW3:8") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x80, DEF_STR( On ) ) + + PORT_START("DSW4") + PORT_DIPNAME( 0x01, 0x00, "DSW4" ) PORT_DIPLOCATION("SW4:1") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x01, DEF_STR( On ) ) + PORT_DIPNAME( 0x06, 0x00, "Bet Limit" ) PORT_DIPLOCATION("SW4:2,3") + PORT_DIPSETTING( 0x00, "5000" ) + PORT_DIPSETTING( 0x02, "10000" ) + PORT_DIPSETTING( 0x04, "20000" ) + PORT_DIPSETTING( 0x06, "30000" ) + PORT_DIPNAME( 0x08, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:4") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x08, DEF_STR( On ) ) + PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:5") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x10, DEF_STR( On ) ) + PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:6") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x20, DEF_STR( On ) ) + PORT_DIPNAME( 0x40, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:7") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x40, DEF_STR( On ) ) + PORT_DIPNAME( 0x80, 0x00, DEF_STR( Unknown ) ) PORT_DIPLOCATION("SW4:8") + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x80, DEF_STR( On ) ) + + // TODO: sixth DIP bank? + PORT_START("UNK") + PORT_DIPNAME( 0x01, 0x00, "Freeze?" ) // checked at end of irq routine + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x01, DEF_STR( On ) ) + PORT_DIPNAME( 0x02, 0x00, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x02, DEF_STR( On ) ) + PORT_DIPNAME( 0x04, 0x00, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x04, DEF_STR( On ) ) + PORT_DIPNAME( 0x08, 0x00, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x08, DEF_STR( On ) ) + PORT_DIPNAME( 0x10, 0x00, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x10, DEF_STR( On ) ) + PORT_DIPNAME( 0x20, 0x00, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x20, DEF_STR( On ) ) + PORT_DIPNAME( 0x40, 0x00, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x40, DEF_STR( On ) ) + PORT_DIPNAME( 0x80, 0x00, DEF_STR( Unknown ) ) + PORT_DIPSETTING( 0x00, DEF_STR( Off ) ) + PORT_DIPSETTING( 0x80, DEF_STR( On ) ) + + PORT_START("IN0") + PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_POKER_CANCEL ) + PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_GAMBLE_DEAL ) + PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_GAMBLE_D_UP ) + PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_GAMBLE_BOOK ) + PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_GAMBLE_BET ) + PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + + PORT_START("IN1") + PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_POKER_HOLD1 ) + PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_POKER_HOLD2 ) + PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_POKER_HOLD3 ) + PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_POKER_HOLD4 ) + PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_POKER_HOLD5 ) + PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + + PORT_START("IN2") + PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_GAMBLE_LOW ) PORT_NAME("Small / DIP Test (In Book Mode)") + PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_GAMBLE_PAYOUT ) // payout (hopper jam) + PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_GAMBLE_TAKE ) + PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_GAMBLE_HIGH ) PORT_NAME("Big") + PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + + PORT_START("IN3") + PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_COIN1 ) PORT_IMPULSE(3) PORT_NAME("Coin A") + PORT_BIT( 0x04, IP_ACTIVE_HIGH, IPT_UNKNOWN ) + PORT_BIT( 0x08, IP_ACTIVE_HIGH, IPT_MEMORY_RESET ) PORT_NAME("Reset") + PORT_BIT( 0x10, IP_ACTIVE_HIGH, IPT_COIN2 ) PORT_IMPULSE(3) PORT_NAME("Coin B") + // both acts as a flip toggle, game intended for a cocktail cabinet? + PORT_BIT( 0x20, IP_ACTIVE_HIGH, IPT_OTHER ) PORT_NAME("Flip Screen 1") + PORT_BIT( 0x40, IP_ACTIVE_HIGH, IPT_OTHER ) PORT_NAME("Flip Screen 2") + PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_GAMBLE_KEYIN) +INPUT_PORTS_END + + +static const gfx_layout tiles8x8_layout = +{ + 16,8, + RGN_FRAC(1,1), + 8, + { STEP8(0, 1) }, + { STEP16(15*8, -8) }, + { STEP8(7*128, -128) }, + 128*8 +}; + +static GFXDECODE_START( gfx_chance32 ) + GFXDECODE_ENTRY( "gfx1", 0, tiles8x8_layout, 0, 8 ) + GFXDECODE_ENTRY( "gfx2", 0, tiles8x8_layout, 0, 8 ) +GFXDECODE_END + + +void chance32_state::machine_start() +{ + m_lamps.resolve(); +} + +void chance32_state::machine_reset() +{ +} + + +void chance32_state::chance32(machine_config &config) +{ + Z80(config, m_maincpu, 12000000/2); + m_maincpu->set_addrmap(AS_PROGRAM, &chance32_state::main_map); + m_maincpu->set_addrmap(AS_IO, &chance32_state::main_io); + m_maincpu->set_vblank_int("screen", FUNC(chance32_state::irq0_line_hold)); + + screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER)); + screen.set_refresh_hz(52.786); +// screen.set_refresh_hz(60); + screen.set_vblank_time(ATTOSECONDS_IN_USEC(0)); + screen.set_size(40*16, 32*8); + screen.set_visarea(0, 35*16-1, 0, 29*8-1); + screen.set_screen_update(FUNC(chance32_state::screen_update)); + + hd6845s_device &crtc(HD6845S(config, "crtc", 12000000/16)); // 52.786 Hz (similar to Major Poker) + crtc.set_screen("screen"); + crtc.set_show_border_area(false); + crtc.set_char_width(16); + + GFXDECODE(config, m_gfxdecode, "palette", gfx_chance32); + PALETTE(config, "palette").set_format(palette_device::xGRB_555, 0x800); + + SPEAKER(config, "mono").front_center(); + + /* clock at 1050 kHz match the 8000 Hz samples stored inside the ROM */ + OKIM6295(config, "oki", 1.056_MHz_XTAL, okim6295_device::PIN7_HIGH).add_route(ALL_OUTPUTS, "mono", 1.0); // clock frequency & pin 7 not verified +} + + +ROM_START( chance32 ) + ROM_REGION( 0x10000, "maincpu", 0 ) + ROM_LOAD( "0.u52", 0x00000, 0x10000, CRC(331048b2) SHA1(deb4da570b3efe6e15deefb6351f925b642b4614) ) + + ROM_REGION( 0x80000, "gfx1", ROMREGION_INVERT ) + ROM_LOAD16_BYTE( "4.u64", 0x00001, 0x20000, CRC(da80d9bd) SHA1(3b5235ab59fd55f0ec5584b3cf1aa5c8f36c76f6) ) + ROM_LOAD16_BYTE( "5.u65", 0x00000, 0x20000, CRC(7528773b) SHA1(95c8e55cdec2c5c1dcdcc5a7edc6e590e3829f92) ) + ROM_LOAD16_BYTE( "6.u66", 0x40001, 0x20000, CRC(cee2ffb0) SHA1(527c2072d39484317b0320afd975df1bbe244a01) ) + ROM_LOAD16_BYTE( "7.u67", 0x40000, 0x20000, CRC(42dc4b69) SHA1(44c8f902db4c7ac235d5ea15d1b509f98663690a) ) + + ROM_REGION( 0x40000, "gfx2", ROMREGION_INVERT ) + ROM_LOAD16_BYTE( "1.u71", 0x00001, 0x20000, CRC(f8e85873) SHA1(6ad24f7fcbc62a03180e168d70239df1ce662f0d) ) + ROM_LOAD16_BYTE( "2.u72", 0x00000, 0x20000, CRC(860b534d) SHA1(44649ea93acdf173356bfcd7e81916253b52c378) ) + + ROM_REGION( 0x40000, "oki", 0 ) + ROM_LOAD( "8.u21", 0x00000, 0x40000, CRC(161b35dd) SHA1(d20a75a4c4ed9cd9cfc12faee921122274840f06) ) + + ROM_REGION( 0x40000, "gals", 0 ) // no idea if these are any good + ROM_LOAD( "gal20v8a.u53.jed.bin", 0x0000, 0x157, CRC(9f680800) SHA1(2fa41ead85136e851d465432a7b9d3ec848c7a22) ) + ROM_LOAD( "gal20v8a.u54.jed.bin", 0x0000, 0x157, CRC(9f680800) SHA1(2fa41ead85136e851d465432a7b9d3ec848c7a22) ) + ROM_LOAD( "gal20v8a.u55.jed.bin", 0x0000, 0x157, CRC(9f680800) SHA1(2fa41ead85136e851d465432a7b9d3ec848c7a22) ) + ROM_LOAD( "gal20v8a.u56.jed.bin", 0x0000, 0x157, CRC(6bab01ad) SHA1(c69e4be41a989a52788af8062f48bbe26bc3dab8) ) + ROM_LOAD( "gal20v8a.u57.jed.bin", 0x0000, 0x157, CRC(787c4159) SHA1(f4a869b317c6be1024f1ca21bcc4af478c8227c8) ) + ROM_LOAD( "gal20v8a.u58.jed.bin", 0x0000, 0x157, CRC(7b16053b) SHA1(cdb289d4f27c7a1a918393943bb8db9712e2f52e) ) + + ROM_LOAD( "gal16v8a.u47.jed.bin", 0x0000, 0x117, NO_DUMP ) + ROM_LOAD( "gal16v8a.u48.jed.bin", 0x0000, 0x117, CRC(5f1360ef) SHA1(56e4ee0dbae5602d810b2f7c744a71eb1a1e08a8) ) + + ROM_LOAD( "gal16v8a.u32.jed.bin", 0x0000, 0x117, CRC(c0784cd1) SHA1(0ae2ce482d379e29c2a9f130fc0d9ed928faef98) ) + + ROM_LOAD( "gal16v8a.u24.jed.bin", 0x0000, 0x117, NO_DUMP ) +ROM_END + +} // anonymous namespace + + +/************************* +* Game Drivers * +*************************/ + +/* YEAR NAME PARENT MACHINE INPUT CLASS INIT ROT COMPANY FULLNAME FLAGS LAYOUT */ +GAMEL( 19??, chance32, 0, chance32, chance32, chance32_state, empty_init, ROT0, "PAL System Co, Ltd.", "Chance Thirty Two", 0, layout_chance32 ) |