// license:BSD-3-Clause
// copyright-holders:Zsolt Vasvari
/***************************************************************************
Hana Awase driver by Zsolt Vasvari
edge connector
----------------------------
GND |A| 1| GND
GND |B| 1| 1P "3"
+5V |C| 3| +5V
NC |D| 4| NC
+12V |E| 5| +12V
SPEAKER(+)|F| 6|SPEAKER(-)
SYNC |H| 7| NC
B |J| 8|SERVICE SW
G |K| 9| COIN SW
R |L|10| NC
NC |M|11| 1P,2P "10"
2P "11" |N|12| 1P,2P "9"
2P "4" |P|13| 1P,2P "8"
NC |R|14| 1P,2P "7"
1P "4" |S|15| 1P,2P "5"
1P "11" |T|16| 1P,2P "6"
NC |U|17| NC
1P "1" |V|18| 1P "2"
***************************************************************************/
#include "emu.h"
#include "includes/hanaawas.h"
#include "cpu/z80/z80.h"
#include "sound/ay8910.h"
#include "screen.h"
#include "speaker.h"
READ8_MEMBER(hanaawas_state::hanaawas_input_port_0_r)
{
int i, ordinal = 0;
uint16_t buttons = 0;
// TODO: key matrix seems identical to speedatk.cpp, needs merging
if(m_coin_impulse > 0)
{
m_coin_impulse--;
return 0x80;
}
if((ioport("COINS")->read() & 1) || (ioport("COINS")->read() & 2))
{
m_coin_impulse = m_coin_settings*2;
m_coin_impulse--;
return 0x80;
}
switch (m_mux)
{
case 1: /* start buttons */
buttons = ioport("START")->read();
break;
case 2: /* player 1 buttons */
buttons = ioport("P1")->read();
break;
case 4: /* player 2 buttons */
buttons = ioport("P2")->read();
break;
}
/* map button pressed into 1-10 range */
for (i = 0; i < 10; i++)
{
if (buttons & (1 << i))
{
ordinal = (i + 1);
break;
}
}
return ordinal;
}
WRITE8_MEMBER(hanaawas_state::hanaawas_inputs_mux_w)
{
m_mux = data;
}
WRITE8_MEMBER(hanaawas_state::irq_ack_w)
{
m_maincpu->set_input_line(0,CLEAR_LINE);
}
WRITE8_MEMBER(hanaawas_state::key_matrix_status_w)
{
if((data & 0xf0) == 0x40) //coinage setting command
m_coin_settings = data & 0xf;
}
void hanaawas_state::hanaawas_map(address_map &map)
{
map(0x0000, 0x2fff).rom();
map(0x4000, 0x4fff).rom();
map(0x6000, 0x6fff).rom();
map(0x8000, 0x83ff).ram().w(FUNC(hanaawas_state::hanaawas_videoram_w)).share("videoram");
map(0x8400, 0x87ff).ram().w(FUNC(hanaawas_state::hanaawas_colorram_w)).share("colorram");
map(0x8800, 0x8bff).ram();
map(0xb000, 0xb000).w(FUNC(hanaawas_state::irq_ack_w));
}
void hanaawas_state::io_map(address_map &map)
{
map.global_mask(0xff);
map(0x00, 0x00).rw(FUNC(hanaawas_state::hanaawas_input_port_0_r), FUNC(hanaawas_state::hanaawas_inputs_mux_w));
map(0x01, 0x01).nopr().w(FUNC(hanaawas_state::key_matrix_status_w)); /* r bit 1: status ready, presumably of the input mux device / w = configure device? */
map(0x10, 0x10).r("aysnd", FUNC(ay8910_device::data_r));
map(0x10, 0x11).w("aysnd", FUNC(ay8910_device::address_data_w));
map(0xc0, 0xc0).nopw(); // watchdog
}
static INPUT_PORTS_START( hanaawas )
PORT_START("COINS")
PORT_BIT( 0x01, IP_ACTIVE_HIGH, IPT_COIN1 ) PORT_IMPULSE(1)
PORT_BIT( 0x02, IP_ACTIVE_HIGH, IPT_COIN2 ) PORT_IMPULSE(1)
PORT_START("DSW")
PORT_DIPNAME( 0x01, 0x00, DEF_STR( Unknown ) )
PORT_DIPSETTING( 0x00, DEF_STR( Off ) )
PORT_DIPSETTING( 0x01, DEF_STR( On ) )
PORT_DIPNAME( 0x06, 0x00, DEF_STR( Difficulty ) )
PORT_DIPSETTING( 0x00, "1" )
PORT_DIPSETTING( 0x02, "1.5" )
PORT_DIPSETTING( 0x04, "2" )
PORT_DIPSETTING( 0x06, "2.5" )
PORT_DIPNAME( 0x18, 0x10, "Key Time-Out" )
PORT_DIPSETTING( 0x00, "15 sec" )
PORT_DIPSETTING( 0x08, "20 sec" )
PORT_DIPSETTING( 0x10, "25 sec" )
PORT_DIPSETTING( 0x18, "30 sec" )
PORT_DIPNAME( 0x20, 0x00, "Time Per Coin" )
PORT_DIPSETTING( 0x20, "50" )
PORT_DIPSETTING( 0x00, "100" )
PORT_DIPNAME( 0x40, 0x00, DEF_STR( Cabinet ) )
PORT_DIPSETTING( 0x00, DEF_STR( Upright ) )
PORT_DIPSETTING( 0x40, DEF_STR( Cocktail ) )
PORT_DIPNAME( 0x80, 0x00, DEF_STR( Coinage ) )
PORT_DIPSETTING( 0x00, DEF_STR( 1C_1C ) )
PORT_DIPSETTING( 0x80, DEF_STR( 1C_2C ) )
/* fake port. The button depressed gets converted to an integer in the 1-10 range */
PORT_START("P1")
PORT_BIT( 0x001, IP_ACTIVE_HIGH, IPT_HANAFUDA_A )
PORT_BIT( 0x002, IP_ACTIVE_HIGH, IPT_HANAFUDA_B )
PORT_BIT( 0x004, IP_ACTIVE_HIGH, IPT_HANAFUDA_C )
PORT_BIT( 0x008, IP_ACTIVE_HIGH, IPT_HANAFUDA_D )
PORT_BIT( 0x010, IP_ACTIVE_HIGH, IPT_HANAFUDA_E )
PORT_BIT( 0x020, IP_ACTIVE_HIGH, IPT_HANAFUDA_F )
PORT_BIT( 0x040, IP_ACTIVE_HIGH, IPT_HANAFUDA_G )
PORT_BIT( 0x080, IP_ACTIVE_HIGH, IPT_HANAFUDA_H )
PORT_BIT( 0x100, IP_ACTIVE_HIGH, IPT_HANAFUDA_YES )
PORT_BIT( 0x200, IP_ACTIVE_HIGH, IPT_HANAFUDA_NO )
/* fake port. The button depressed gets converted to an integer in the 1-10 range */
PORT_START("P2")
PORT_BIT( 0x001, IP_ACTIVE_HIGH, IPT_HANAFUDA_A ) PORT_PLAYER(2)
PORT_BIT( 0x002, IP_ACTIVE_HIGH, IPT_HANAFUDA_B ) PORT_PLAYER(2)
PORT_BIT( 0x004, IP_ACTIVE_HIGH, IPT_HANAFUDA_C ) PORT_PLAYER(2)
PORT_BIT( 0x008, IP_ACTIVE_HIGH, IPT_HANAFUDA_D ) PORT_PLAYER(2)
PORT_BIT( 0x010, IP_ACTIVE_HIGH, IPT_HANAFUDA_E ) PORT_PLAYER(2)
PORT_BIT( 0x020, IP_ACTIVE_HIGH, IPT_HANAFUDA_F ) PORT_PLAYER(2)
PORT_BIT( 0x040, IP_ACTIVE_HIGH, IPT_HANAFUDA_G ) PORT_PLAYER(2)
PORT_BIT( 0x080, IP_ACTIVE_HIGH, IPT_HANAFUDA_H ) PORT_PLAYER(2)
PORT_BIT( 0x100, IP_ACTIVE_HIGH, IPT_HANAFUDA_YES ) PORT_PLAYER(2)
PORT_BIT( 0x200, IP_ACTIVE_HIGH, IPT_HANAFUDA_NO ) PORT_PLAYER(2)
PORT_START("START")
PORT_BIT( 0x001, IP_ACTIVE_HIGH, IPT_START1 )
PORT_BIT( 0x002, IP_ACTIVE_HIGH, IPT_START2 )
INPUT_PORTS_END
#define GFX(name, offs1, offs2, offs3) \
static const gfx_layout name = \
{ \
8,8, /* 8*8 chars */ \
512, /* 512 characters */ \
3, /* 3 bits per pixel */ \
{ offs1, offs2, offs3 }, /* bitplanes */ \
{ 8*8+0, 8*8+1, 8*8+2, 8*8+3, 0, 1, 2, 3 }, \
{ 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 }, \
8*16 /* every char takes 16 consecutive bytes */ \
};
GFX( charlayout_1bpp, 0x2000*8+4, 0x2000*8+4, 0x2000*8+4 )
GFX( charlayout_3bpp, 0x2000*8, 0, 4 )
static GFXDECODE_START( gfx_hanaawas )
GFXDECODE_ENTRY( "gfx1", 0, charlayout_1bpp, 0, 32 )
GFXDECODE_ENTRY( "gfx1", 0, charlayout_3bpp, 0, 32 )
GFXDECODE_END
void hanaawas_state::machine_start()
{
save_item(NAME(m_mux));
save_item(NAME(m_coin_settings));
save_item(NAME(m_coin_impulse));
}
void hanaawas_state::machine_reset()
{
m_mux = 0;
}
MACHINE_CONFIG_START(hanaawas_state::hanaawas)
/* basic machine hardware */
MCFG_DEVICE_ADD("maincpu", Z80,18432000/6) /* 3.072 MHz ??? */
MCFG_DEVICE_PROGRAM_MAP(hanaawas_map)
MCFG_DEVICE_IO_MAP(io_map)
MCFG_DEVICE_VBLANK_INT_DRIVER("screen", hanaawas_state, irq0_line_assert)
/* video hardware */
MCFG_SCREEN_ADD("screen", RASTER)
MCFG_SCREEN_REFRESH_RATE(60)
MCFG_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(2500) /* not accurate */)
MCFG_SCREEN_SIZE(32*8, 32*8)
MCFG_SCREEN_VISIBLE_AREA(0*8, 32*8-1, 0*8, 32*8-1)
MCFG_SCREEN_UPDATE_DRIVER(hanaawas_state, screen_update_hanaawas)
MCFG_SCREEN_PALETTE("palette")
GFXDECODE(config, m_gfxdecode, "palette", gfx_hanaawas);
PALETTE(config, "palette", FUNC(hanaawas_state::hanaawas_palette), 32 * 8, 16);
/* sound hardware */
SPEAKER(config, "mono").front_center();
ay8910_device &aysnd(AY8910(config, "aysnd", 18432000/12));
aysnd.port_a_read_callback().set_ioport("DSW");
aysnd.port_b_write_callback().set(FUNC(hanaawas_state::hanaawas_portB_w));
aysnd.add_route(ALL_OUTPUTS, "mono", 0.50);
MACHINE_CONFIG_END
/***************************************************************************
Game driver(s)
***************************************************************************/
ROM_START( hanaawas )
ROM_REGION( 0x10000, "maincpu", 0 )
ROM_LOAD( "1.1e", 0x0000, 0x2000, CRC(618dc1e3) SHA1(31817f256512352db0d27322998d9dcf95a993cf) )
ROM_LOAD( "2.3e", 0x2000, 0x1000, CRC(5091b67f) SHA1(5a66740b8829b9b4d3aea274f9ff36e0b9e8c151) )
ROM_LOAD( "3.4e", 0x4000, 0x1000, CRC(dcb65067) SHA1(37964ff4016bd927b9f13b4358b831bb667f993b) )
ROM_LOAD( "4.6e", 0x6000, 0x1000, CRC(24bee0dc) SHA1(a4237ad3611c923b563923462e79b0b3f66cc721) )
ROM_REGION( 0x4000, "gfx1", 0 )
ROM_LOAD( "5.9a", 0x0000, 0x1000, CRC(304ae219) SHA1(c1eac4973a6aec9fd8e848c206870667a8bb0922) )
ROM_LOAD( "6.10a", 0x1000, 0x1000, CRC(765a4e5f) SHA1(b2f148c60cffb75d1a841be8b924a874bff22ce4) )
ROM_LOAD( "7.12a", 0x2000, 0x1000, CRC(5245af2d) SHA1(a1262fa5828a52de28cc953ab465cbc719c56c32) )
ROM_LOAD( "8.13a", 0x3000, 0x1000, CRC(3356ddce) SHA1(68818d0692fca548a49a74209bd0ef6f16484eba) )
ROM_REGION( 0x0220, "proms", 0 )
ROM_LOAD( "13j.bpr", 0x0000, 0x0020, CRC(99300d85) SHA1(dd383db1f3c8c6d784121d32f20ffed3d83e2278) ) /* color PROM */
ROM_LOAD( "2a.bpr", 0x0020, 0x0100, CRC(e26f21a2) SHA1(d0df06f833e0f97872d9d2ffeb7feef94aaaa02a) ) /* lookup table */
ROM_LOAD( "6g.bpr", 0x0120, 0x0100, CRC(4d94fed5) SHA1(3ea8e6fb95d5677991dc90fe7435f91e5320bb16) ) /* I don't know what this is */
ROM_END
GAME( 1982, hanaawas, 0, hanaawas, hanaawas, hanaawas_state, empty_init, ROT0, "Seta Kikaku, Ltd.", "Hana Awase", MACHINE_SUPPORTS_SAVE )