// license:BSD-3-Clause
// copyright-holders:Pierpaolo Prazzoli
/********************************************************************
F-E1-32 driver
Supported Games PCB-ID
----------------------------------
Mosaic F-E1-32-009
Royal Poker 2 F-E1-32N-COM9e
driver by Pierpaolo Prazzoli
*********************************************************************/
/*
royalpk2 : to get 'secret. OK.'
0002D92C: MOV L18, L29
0002D92E: CMPI L18, $1
0002D930: BNE $2d94c
go 2d92c
do l29 = 1
f5
*/
#include "emu.h"
#include "cpu/e132xs/e132xs.h"
#include "machine/eepromser.h"
#include "sound/ym2151.h"
#include "sound/okim6295.h"
#include "screen.h"
#include "speaker.h"
class mosaicf2_state : public driver_device
{
public:
mosaicf2_state(const machine_config &mconfig, device_type type, const char *tag)
: driver_device(mconfig, type, tag),
m_maincpu(*this, "maincpu") ,
m_videoram(*this, "videoram"){ }
/* devices */
required_device<hyperstone_device> m_maincpu;
/* memory pointers */
required_shared_ptr<uint32_t> m_videoram;
DECLARE_READ32_MEMBER(f32_input_port_1_r);
uint32_t screen_update_mosaicf2(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect);
void mosaicf2(machine_config &config);
void royalpk2(machine_config &config);
void common_map(address_map &map);
void mosaicf2_io(address_map &map);
void royalpk2_io(address_map &map);
void royalpk2_map(address_map &map);
};
uint32_t mosaicf2_state::screen_update_mosaicf2(screen_device &screen, bitmap_ind16 &bitmap, const rectangle &cliprect)
{
offs_t offs;
for (offs = 0; offs < 0x10000; offs++)
{
int y = offs >> 8;
int x = offs & 0xff;
if ((x < 0xa0) && (y < 0xe0))
{
bitmap.pix16(y, (x * 2) + 0) = (m_videoram[offs] >> 16) & 0x7fff;
bitmap.pix16(y, (x * 2) + 1) = (m_videoram[offs] >> 0) & 0x7fff;
}
}
return 0;
}
void mosaicf2_state::common_map(address_map &map)
{
map(0x00000000, 0x001fffff).ram();
map(0x40000000, 0x4003ffff).ram().share("videoram");
map(0x80000000, 0x80ffffff).rom().region("user2", 0);
map(0xfff00000, 0xffffffff).rom().region("user1", 0);
}
READ32_MEMBER(mosaicf2_state::f32_input_port_1_r)
{
/* burn a bunch of cycles because this is polled frequently during busy loops */
offs_t pc = m_maincpu->pc();
if ((pc == 0x000379de) || (pc == 0x000379cc) )
m_maincpu->eat_cycles(100);
//else printf("PC %08x\n", pc );
return ioport("SYSTEM_P2")->read();
}
void mosaicf2_state::mosaicf2_io(address_map &map)
{
map(0x4003, 0x4003).r("oki", FUNC(okim6295_device::read));
map(0x4813, 0x4813).r("ymsnd", FUNC(ym2151_device::status_r));
map(0x5000, 0x5003).portr("P1");
map(0x5200, 0x5203).r(this, FUNC(mosaicf2_state::f32_input_port_1_r));
map(0x5400, 0x5403).portr("EEPROMIN");
map(0x6003, 0x6003).w("oki", FUNC(okim6295_device::write));
map(0x6803, 0x6803).w("ymsnd", FUNC(ym2151_device::data_w));
map(0x6813, 0x6813).w("ymsnd", FUNC(ym2151_device::register_w));
map(0x7000, 0x7003).portw("EEPROMCLK");
map(0x7200, 0x7203).portw("EEPROMCS");
map(0x7400, 0x7403).portw("EEPROMOUT");
}
static INPUT_PORTS_START( mosaicf2 )
PORT_START("P1")
PORT_BIT( 0x0000ffff, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_BIT( 0x00010000, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_PLAYER(1)
PORT_BIT( 0x00020000, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_PLAYER(1)
PORT_BIT( 0x00040000, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_PLAYER(1)
PORT_BIT( 0x00080000, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(1)
PORT_BIT( 0x00100000, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(1)
PORT_BIT( 0x00200000, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(1)
PORT_BIT( 0x00400000, IP_ACTIVE_LOW, IPT_BUTTON3 ) PORT_PLAYER(1)
PORT_BIT( 0x00800000, IP_ACTIVE_LOW, IPT_START1 )
PORT_BIT( 0xff000000, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_START("SYSTEM_P2")
PORT_BIT( 0x000000ff, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_BIT( 0x00000100, IP_ACTIVE_LOW, IPT_COIN1 )
PORT_BIT( 0x00000200, IP_ACTIVE_LOW, IPT_COIN2 )
PORT_SERVICE_NO_TOGGLE( 0x00000400, IP_ACTIVE_LOW )
PORT_BIT( 0x00007800, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_BIT( 0x00008000, IP_ACTIVE_LOW, IPT_CUSTOM ) PORT_VBLANK("screen")
PORT_BIT( 0x00010000, IP_ACTIVE_LOW, IPT_JOYSTICK_UP ) PORT_PLAYER(2)
PORT_BIT( 0x00020000, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN ) PORT_PLAYER(2)
PORT_BIT( 0x00040000, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT ) PORT_PLAYER(2)
PORT_BIT( 0x00080000, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT ) PORT_PLAYER(2)
PORT_BIT( 0x00100000, IP_ACTIVE_LOW, IPT_BUTTON1 ) PORT_PLAYER(2)
PORT_BIT( 0x00200000, IP_ACTIVE_LOW, IPT_BUTTON2 ) PORT_PLAYER(2)
PORT_BIT( 0x00400000, IP_ACTIVE_LOW, IPT_BUTTON3 ) PORT_PLAYER(2)
PORT_BIT( 0x00800000, IP_ACTIVE_LOW, IPT_START2 )
PORT_BIT( 0xff000000, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_START( "EEPROMIN" )
PORT_BIT( 0x00000001, IP_ACTIVE_HIGH, IPT_CUSTOM ) PORT_READ_LINE_DEVICE_MEMBER("eeprom", eeprom_serial_93cxx_device, do_read)
PORT_START( "EEPROMOUT" )
PORT_BIT( 0x00000001, IP_ACTIVE_HIGH, IPT_OUTPUT ) PORT_WRITE_LINE_DEVICE_MEMBER("eeprom", eeprom_serial_93cxx_device, di_write)
PORT_START( "EEPROMCLK" )
PORT_BIT( 0x00000001, IP_ACTIVE_HIGH, IPT_OUTPUT ) PORT_WRITE_LINE_DEVICE_MEMBER("eeprom", eeprom_serial_93cxx_device, clk_write)
PORT_START( "EEPROMCS" )
PORT_BIT( 0x00000001, IP_ACTIVE_HIGH, IPT_OUTPUT ) PORT_WRITE_LINE_DEVICE_MEMBER("eeprom", eeprom_serial_93cxx_device, cs_write)
INPUT_PORTS_END
MACHINE_CONFIG_START(mosaicf2_state::mosaicf2)
/* basic machine hardware */
MCFG_DEVICE_ADD("maincpu", E132XN, XTAL(20'000'000)*4) /* 4x internal multiplier */
MCFG_DEVICE_PROGRAM_MAP(common_map)
MCFG_DEVICE_IO_MAP(mosaicf2_io)
MCFG_DEVICE_VBLANK_INT_DRIVER("screen", mosaicf2_state, irq0_line_hold)
MCFG_EEPROM_SERIAL_93C46_ADD("eeprom")
MCFG_EEPROM_ERASE_TIME(attotime::from_usec(1))
MCFG_EEPROM_WRITE_TIME(attotime::from_usec(1))
/* 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(512, 512)
MCFG_SCREEN_VISIBLE_AREA(0, 319, 0, 223)
MCFG_SCREEN_UPDATE_DRIVER(mosaicf2_state, screen_update_mosaicf2)
MCFG_SCREEN_PALETTE("palette")
MCFG_PALETTE_ADD_RRRRRGGGGGBBBBB("palette")
/* sound hardware */
SPEAKER(config, "lspeaker").front_left();
SPEAKER(config, "rspeaker").front_right();
MCFG_DEVICE_ADD("ymsnd", YM2151, XTAL(14'318'181)/4) /* 3.579545 MHz */
MCFG_SOUND_ROUTE(0, "lspeaker", 1.0)
MCFG_SOUND_ROUTE(1, "rspeaker", 1.0)
MCFG_DEVICE_ADD("oki", OKIM6295, XTAL(14'318'181)/8, okim6295_device::PIN7_HIGH) /* 1.7897725 MHz */
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "lspeaker", 1.0)
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "rspeaker", 1.0)
MACHINE_CONFIG_END
static INPUT_PORTS_START( royalpk2 )
PORT_START("P1")
PORT_START("SYSTEM_P2")
PORT_BIT( 0x00800000, IP_ACTIVE_LOW, IPT_CUSTOM ) PORT_VBLANK("screen")
PORT_BIT( 0xff7fffff, IP_ACTIVE_HIGH, IPT_UNKNOWN )
PORT_START( "EEPROMIN" )
PORT_BIT( 0x00000001, IP_ACTIVE_HIGH, IPT_CUSTOM ) PORT_READ_LINE_DEVICE_MEMBER("eeprom", eeprom_serial_93cxx_device, do_read)
PORT_START( "EEPROMOUT" )
PORT_BIT( 0x00000001, IP_ACTIVE_HIGH, IPT_OUTPUT ) PORT_WRITE_LINE_DEVICE_MEMBER("eeprom", eeprom_serial_93cxx_device, di_write)
PORT_START( "EEPROMCLK" )
PORT_BIT( 0x00000001, IP_ACTIVE_HIGH, IPT_OUTPUT ) PORT_WRITE_LINE_DEVICE_MEMBER("eeprom", eeprom_serial_93cxx_device, clk_write)
PORT_START( "EEPROMCS" )
PORT_BIT( 0x00000001, IP_ACTIVE_HIGH, IPT_OUTPUT ) PORT_WRITE_LINE_DEVICE_MEMBER("eeprom", eeprom_serial_93cxx_device, cs_write)
INPUT_PORTS_END
void mosaicf2_state::royalpk2_map(address_map &map)
{
map(0x00000000, 0x003fffff).ram();
map(0x40000000, 0x4003ffff).ram().share("videoram");
map(0x80000000, 0x807fffff).rom().region("user2", 0);
map(0xfff00000, 0xffffffff).rom().region("user1", 0);
}
void mosaicf2_state::royalpk2_io(address_map &map)
{
map(0x4900, 0x4903).portr("SYSTEM_P2");
map(0x4a00, 0x4a03).portr("EEPROMIN");
map(0x6800, 0x6803).portw("EEPROMCLK");
map(0x6900, 0x6903).portw("EEPROMCS");
map(0x6a00, 0x6a03).portw("EEPROMOUT");
}
MACHINE_CONFIG_START(mosaicf2_state::royalpk2)
/* basic machine hardware */
MCFG_DEVICE_ADD("maincpu", GMS30C2132, XTAL(50'000'000))
MCFG_DEVICE_PROGRAM_MAP(royalpk2_map)
MCFG_DEVICE_IO_MAP(royalpk2_io)
MCFG_DEVICE_VBLANK_INT_DRIVER("screen", mosaicf2_state, irq1_line_hold)
MCFG_EEPROM_SERIAL_93C46_ADD("eeprom")
MCFG_EEPROM_ERASE_TIME(attotime::from_usec(1))
MCFG_EEPROM_WRITE_TIME(attotime::from_usec(1))
/* 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(512, 512)
MCFG_SCREEN_VISIBLE_AREA(0, 319, 0, 223)
MCFG_SCREEN_UPDATE_DRIVER(mosaicf2_state, screen_update_mosaicf2)
MCFG_SCREEN_PALETTE("palette")
MCFG_PALETTE_ADD_RRRRRGGGGGBBBBB("palette")
/* sound hardware */
SPEAKER(config, "lspeaker").front_left();
SPEAKER(config, "rspeaker").front_right();
// MCFG_DEVICE_ADD("ymsnd", YM2151, XTAL(14'318'181)/4) /* 3.579545 MHz */
// MCFG_SOUND_ROUTE(0, "lspeaker", 1.0)
// MCFG_SOUND_ROUTE(1, "rspeaker", 1.0)
MCFG_DEVICE_ADD("oki", OKIM6295, XTAL(14'318'181)/8, okim6295_device::PIN7_HIGH) /* 1.7897725 MHz */
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "lspeaker", 1.0)
MCFG_SOUND_ROUTE(ALL_OUTPUTS, "rspeaker", 1.0)
// there is a 16c550 for communication
MACHINE_CONFIG_END
/*
Mosaic (c) 1999 F2 System
CPU: Hyperstone E1-32XN
Video: QuickLogic QL2003-XPL84C FPGA
Sound: OKI 6295, BS901 (YM2151) & BS902 (YM3012)
OSC: 20MHz & 14.31818MHz
EEPROM: 93C46 (controlled through FPGA)
F-E1-32-009
+------------------------------------------------------------------+
| VOL +---------+ |
+-+ YM3812 | SND | |
| +---------+ |
+-+ YM2151 OKI6295 |
| |
| +---------------+ |
| | | |
|J +-------+ | | |
|A | VRAML | | QuickLogic | 14.31818MHz |
|M +-------+ | QL2003-XPL84C | |
|M +-------+ | 9819 BA | +-----+ |
|A | VRAMU | | | |93C46| |
| +-------+ +---------------+ +-----+ |
|C |
|O +---------+ +---------+ |
|N | L00 | | U00 | |
|N | | | | |
|E +---------+ +---------+ |
|C +------------+ +---------+ +---------+ |
|T | | | L01 | | U01 | |
|O | | | | | | |
|R | HyperStone | +---------+ +---------+ |
| | E1-32XN | +---------+ +---------+ |
| | | | L02 | | U02 | |
| +-----+ | | | | | | |
| |DRAML| +------------+ +---------+ +---------+ |
+-+ +-----+ +---------+ +---------+ |
| +-----+ 20MHz | L03 | | U03 | |
+-+ |DRAMU| | | | | |
| +-----+ +----------+ +---------+ +---------+ |
| +--+ +--+ | ROM1 | |
| |S3| |S1| +----------+ |
+------------------------------------------------------------------+
S3 is a reset button
S1 is the setup button
VRAML & VRAMU are KM6161002CJ-12
DRAML & DRAMU are GM71C18163CJ6
ROM1 & SND are stardard 27C040 and/or 27C020 eproms
L00-L03 & U00-U03 are 29F1610ML Flash roms
todo: royalpk2 layout (it's very different)
*/
ROM_START( mosaicf2 ) /* Released October 1999 */
ROM_REGION32_BE( 0x100000, "user1", ROMREGION_ERASE00 ) /* Hyperstone CPU Code */
/* 0 - 0x80000 empty */
ROM_LOAD( "rom1.bin", 0x80000, 0x080000, CRC(fceb6f83) SHA1(b98afb477627c3b2d584c0f0fb26c4dd5b1a31e2) )
ROM_REGION32_BE( 0x1000000, "user2", 0 ) /* gfx data */
ROM_LOAD32_WORD_SWAP( "u00.bin", 0x000000, 0x200000, CRC(a2329675) SHA1(bff8974fab9120274821c9c9646744317f47c79c) )
ROM_LOAD32_WORD_SWAP( "l00.bin", 0x000002, 0x200000, CRC(d96fe93b) SHA1(005d9889077825fc0e308d2981f6fca5e6b51fe8) )
ROM_LOAD32_WORD_SWAP( "u01.bin", 0x400000, 0x200000, CRC(6379e73f) SHA1(fe5abafbcbd828795cb06a08763fae1bbe2a75ad) )
ROM_LOAD32_WORD_SWAP( "l01.bin", 0x400002, 0x200000, CRC(a269ea82) SHA1(d962a8b3293c6f46dbefa49859b2b3e594e7a386) )
ROM_LOAD32_WORD_SWAP( "u02.bin", 0x800000, 0x200000, CRC(c17f95cd) SHA1(1c701185be138b615d2851866288647f40809c28) )
ROM_LOAD32_WORD_SWAP( "l02.bin", 0x800002, 0x200000, CRC(69cd9c5c) SHA1(6b4d204a6ab5f36dfba9053bb3be2d094fcfdd00) )
ROM_LOAD32_WORD_SWAP( "u03.bin", 0xc00000, 0x200000, CRC(0e47df20) SHA1(6f6c3e7fc8c99db7ddc73d8d10a661373bb72a1a) )
ROM_LOAD32_WORD_SWAP( "l03.bin", 0xc00002, 0x200000, CRC(d79f6ca8) SHA1(4735dda9269aa05ba1251d335dc73914f5cb43b0) )
ROM_REGION( 0x40000, "oki", 0 ) /* Oki Samples */
ROM_LOAD( "snd.bin", 0x000000, 0x040000, CRC(4584589c) SHA1(5f9824724f840767c3dc1dc04b203ddf3d78b84c) )
ROM_END
ROM_START( royalpk2 )
ROM_REGION32_BE( 0x100000, "user1", ROMREGION_ERASE00 ) /* Hyperstone CPU Code */
/* 0 - 0x80000 empty */
ROM_LOAD( "prog1", 0x80000, 0x080000, CRC(e1546304) SHA1(b628b347ba7fbbae948e98e72aa5ea190c5d0f2b) )
ROM_REGION32_BE( 0x800000, "user2", 0 ) /* gfx data */
ROM_LOAD32_WORD_SWAP( "1.u00", 0x000000, 0x200000, CRC(b397a805) SHA1(3fafa8533c793f41d0567b76667d3f3478eb9c1d) )
ROM_LOAD32_WORD_SWAP( "2.l00", 0x000002, 0x200000, CRC(83a67d20) SHA1(9bf4c3da0cd1aab2488f260f694493d8ee25883e) )
ROM_LOAD32_WORD_SWAP( "3.u01", 0x400000, 0x200000, CRC(f7b9d508) SHA1(5d98687c6cf158df8134d88d3726778d3762b411) )
ROM_LOAD32_WORD_SWAP( "4.l01", 0x400002, 0x200000, CRC(dcff4960) SHA1(f742c7a3b62262c4b0210db9df03f51b3f600bf2) )
ROM_REGION( 0x80000, "oki", 0 ) /* Oki Samples */
ROM_LOAD( "snd2", 0x000000, 0x080000, CRC(f25e3315) SHA1(ce5350ecba6769b17bb01d82b55f26ded4d51773) )
ROM_END
GAME( 1999, mosaicf2, 0, mosaicf2, mosaicf2, mosaicf2_state, empty_init, ROT0, "F2 System", "Mosaic (F2 System)", MACHINE_SUPPORTS_SAVE )
GAME( 1999, royalpk2, 0, royalpk2, royalpk2, mosaicf2_state, empty_init, ROT0, "F2 System", "Royal Poker 2 (Network version 3.12)", MACHINE_NOT_WORKING )