summaryrefslogtreecommitdiffstatshomepage
path: root/src/mame/misc/jokrwild.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/mame/misc/jokrwild.cpp')
-rw-r--r--src/mame/misc/jokrwild.cpp523
1 files changed, 523 insertions, 0 deletions
diff --git a/src/mame/misc/jokrwild.cpp b/src/mame/misc/jokrwild.cpp
new file mode 100644
index 00000000000..656f846ae1a
--- /dev/null
+++ b/src/mame/misc/jokrwild.cpp
@@ -0,0 +1,523 @@
+// license:BSD-3-Clause
+// copyright-holders:Roberto Fresca
+/******************************************************************************
+
+ JOKER'S WILD - SIGMA (1988)
+ Preliminary driver by Roberto Fresca.
+
+
+*******************************************************************************
+
+ Hardware Notes (guessed):
+ ------------------------
+
+ CPU: 1x M6809
+ Video: 1x M6845 CRTC or similar.
+ I/O: 2x PIAs ?? (there is code to initialize PIAs at $8033)
+
+*******************************************************************************
+
+ *** Game Notes ***
+
+ RND old notes:
+ Game is trying to boot, and after approx. 90 seconds an error message appear
+ on screen: "Random number generator is defective", then stuck here.
+ See code at $9859
+
+ Currently the game spit an error about bad RAM, and after approx 90 seconds
+ the playfield is drawn and then hang.
+
+*******************************************************************************
+
+ --------------------
+ *** Memory Map ***
+ --------------------
+
+ 0x0000 - 0x07FF ; Video RAM.
+ 0x2000 - 0x27FF ; Color RAM.
+ 0x4004 - 0x4007 ; PIA?.
+ 0x4008 - 0x400B ; PIA?.
+ 0x6000 - 0x6001 ; M6845 CRTC.
+ 0x8000 - 0xFFFF ; ROM space.
+
+
+ *** MC6545 Initialization ***
+ ----------------------------------------------------------------------------------------------------------------------
+ register: R00 R01 R02 R03 R04 R05 R06 R07 R08 R09 R10 R11 R12 R13 R14 R15 R16 R17
+ ----------------------------------------------------------------------------------------------------------------------
+ value: 0x20 0x18 0x1B 0x64 0x20 0x07 0x1A 0x1D 0x00 0x07 0x00 0x00 0x00 0x00 0x00 0x00 0x00 0x00.
+
+*******************************************************************************
+
+ DRIVER UPDATES:
+
+ [2008-10-30]
+ - Fixed graphics to 2 bits per pixel.
+
+ [2008-10-25]
+ - Initial release.
+ - ROMs load OK.
+ - Proper ROMs decryption.
+ - Added MC6845 CRTC.
+ - Video RAM OK.
+ - Added technical notes.
+
+ TODO:
+
+ - RND number generator.
+ - Inputs
+ - Sound.
+ - A lot of work.
+
+*******************************************************************************/
+
+#include "emu.h"
+#include "cpu/m6809/m6809.h"
+#include "video/mc6845.h"
+#include "machine/6821pia.h"
+#include "machine/nvram.h"
+#include "emupal.h"
+#include "screen.h"
+#include "tilemap.h"
+
+
+namespace{
+
+#define MASTER_CLOCK XTAL(8'000'000) /* guess */
+
+
+class jokrwild_state : public driver_device
+{
+public:
+ jokrwild_state(const machine_config &mconfig, device_type type, const char *tag) :
+ driver_device(mconfig, type, tag),
+ m_videoram(*this, "videoram"),
+ m_colorram(*this, "colorram"),
+ m_maincpu(*this, "maincpu"),
+ m_gfxdecode(*this, "gfxdecode")
+ { }
+
+ void jokrwild(machine_config &config);
+
+ void init_jokrwild();
+
+protected:
+ virtual void video_start() override ATTR_COLD;
+
+private:
+ required_shared_ptr<uint8_t> m_videoram;
+ required_shared_ptr<uint8_t> m_colorram;
+ tilemap_t *m_bg_tilemap = nullptr;
+ required_device<cpu_device> m_maincpu;
+ required_device<gfxdecode_device> m_gfxdecode;
+
+ void jokrwild_videoram_w(offs_t offset, uint8_t data);
+ void jokrwild_colorram_w(offs_t offset, uint8_t data);
+ uint8_t rng_r(offs_t offset);
+ void testa_w(uint8_t data);
+ void testb_w(uint8_t data);
+ TILE_GET_INFO_MEMBER(get_bg_tile_info);
+ void jokrwild_palette(palette_device &palette) const;
+ uint32_t screen_update_jokrwild(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect);
+ void jokrwild_map(address_map &map) ATTR_COLD;
+};
+
+
+/*************************
+* Video Hardware *
+*************************/
+
+void jokrwild_state::jokrwild_videoram_w(offs_t offset, uint8_t data)
+{
+ m_videoram[offset] = data;
+ m_bg_tilemap->mark_tile_dirty(offset);
+}
+
+void jokrwild_state::jokrwild_colorram_w(offs_t offset, uint8_t data)
+{
+ m_colorram[offset] = data;
+ m_bg_tilemap->mark_tile_dirty(offset);
+}
+
+TILE_GET_INFO_MEMBER(jokrwild_state::get_bg_tile_info)
+{
+/* - bits -
+ 7654 3210
+ xx-- ---- bank select.
+ ---- xxxx color code.
+*/
+ int attr = m_colorram[tile_index];
+ int code = m_videoram[tile_index] | ((attr & 0xc0) << 2);
+ int color = (attr & 0x0f);
+
+ tileinfo.set(0, code , color , 0);
+}
+
+void jokrwild_state::video_start()
+{
+ m_bg_tilemap = &machine().tilemap().create(*m_gfxdecode, tilemap_get_info_delegate(*this, FUNC(jokrwild_state::get_bg_tile_info)), TILEMAP_SCAN_ROWS, 8, 8, 24, 26);
+}
+
+uint32_t jokrwild_state::screen_update_jokrwild(screen_device &screen, bitmap_rgb32 &bitmap, const rectangle &cliprect)
+{
+ m_bg_tilemap->draw(screen, bitmap, cliprect, 0, 0);
+ return 0;
+}
+
+void jokrwild_state::jokrwild_palette(palette_device &palette) const
+{
+ //missing proms
+}
+
+
+/*****************************
+* Read/Write Handlers *
+*****************************/
+
+uint8_t jokrwild_state::rng_r(offs_t offset)
+{
+ if(m_maincpu->pc() == 0xab32)
+ return (offset == 0) ? 0x9e : 0x27;
+
+ if(m_maincpu->pc() == 0xab3a)
+ return (offset == 2) ? 0x49 : 0x92;
+
+ return machine().rand() & 0xff;
+}
+
+
+/*************************
+* Memory Map Information *
+*************************/
+
+void jokrwild_state::jokrwild_map(address_map &map)
+{
+ map(0x0000, 0x03ff).ram().w(FUNC(jokrwild_state::jokrwild_videoram_w)).share("videoram");
+ map(0x0400, 0x07ff).ram(); //FIXME: backup RAM
+ map(0x2000, 0x23ff).ram().w(FUNC(jokrwild_state::jokrwild_colorram_w)).share("colorram");
+ map(0x2400, 0x27ff).ram(); //stack RAM
+ map(0x4004, 0x4007).rw("pia0", FUNC(pia6821_device::read), FUNC(pia6821_device::write));
+ map(0x4008, 0x400b).rw("pia1", FUNC(pia6821_device::read), FUNC(pia6821_device::write)); //optical sensor is here
+// map(0x4010, 0x4010).nopr(); /* R ???? */
+ map(0x6000, 0x6000).w("crtc", FUNC(mc6845_device::address_w));
+ map(0x6001, 0x6001).rw("crtc", FUNC(mc6845_device::register_r), FUNC(mc6845_device::register_w));
+ map(0x6100, 0x6100).portr("SW1");
+ map(0x6200, 0x6203).r(FUNC(jokrwild_state::rng_r));//another PIA?
+ map(0x6300, 0x6300).portr("SW2");
+ map(0x8000, 0xffff).rom();
+}
+
+/* I/O byte R/W
+
+
+ -----------------
+
+ unknown writes:
+
+ 4004-400b R/W ; 2x PIAs?
+ 4010 R ; unknown.
+
+ 6100 R/W ; unknown.
+ 6200-6203 R/W ; extra PIA?
+ 6300 R ; unknown.
+
+
+*/
+
+
+/*************************
+* Input Ports *
+*************************/
+
+static INPUT_PORTS_START( jokrwild )
+ PORT_START("IN0")
+ PORT_DIPNAME( 0x01, 0x01, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x01, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x02, 0x02, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x02, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x04, 0x04, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x04, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x08, 0x08, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x08, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x10, 0x10, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x10, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x20, 0x20, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x20, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x40, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x80, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+
+/* PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("0-1") PORT_CODE(KEYCODE_1)
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("0-2") PORT_CODE(KEYCODE_2)
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("0-3") PORT_CODE(KEYCODE_3)
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("0-4") PORT_CODE(KEYCODE_4)
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("0-5") PORT_CODE(KEYCODE_5)
+ PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("0-6") PORT_CODE(KEYCODE_6)
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("0-7") PORT_CODE(KEYCODE_7)
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("0-8") PORT_CODE(KEYCODE_8)
+*/
+ PORT_START("IN1")
+ PORT_DIPNAME( 0x01, 0x01, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x01, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x02, 0x02, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x02, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x04, 0x04, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x04, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x08, 0x08, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x08, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x10, 0x10, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x10, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x20, 0x20, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x20, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x40, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x80, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+/* PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("1-1") PORT_CODE(KEYCODE_Q)
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("1-2") PORT_CODE(KEYCODE_W)
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("1-3") PORT_CODE(KEYCODE_E)
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("1-4") PORT_CODE(KEYCODE_R)
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("1-5") PORT_CODE(KEYCODE_T)
+ PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("1-6") PORT_CODE(KEYCODE_Y)
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("1-7") PORT_CODE(KEYCODE_U)
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("1-8") PORT_CODE(KEYCODE_I)
+*/
+ PORT_START("IN2")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("2-1") PORT_CODE(KEYCODE_A)
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("2-2") PORT_CODE(KEYCODE_S)
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("2-3") PORT_CODE(KEYCODE_D)
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("2-4") PORT_CODE(KEYCODE_F)
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("2-5") PORT_CODE(KEYCODE_G)
+ PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("2-6") PORT_CODE(KEYCODE_H)
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("2-7") PORT_CODE(KEYCODE_J)
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("2-8") PORT_CODE(KEYCODE_K)
+
+ PORT_START("IN3")
+ PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("3-1") PORT_CODE(KEYCODE_Z)
+ PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("3-2") PORT_CODE(KEYCODE_X)
+ PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("3-3") PORT_CODE(KEYCODE_C)
+ PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("3-4") PORT_CODE(KEYCODE_V)
+ PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("3-5") PORT_CODE(KEYCODE_B)
+ PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("3-6") PORT_CODE(KEYCODE_N)
+ PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("3-7") PORT_CODE(KEYCODE_M)
+ PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_SERVICE ) PORT_NAME("3-8") PORT_CODE(KEYCODE_L)
+
+ PORT_START("SW1")
+ PORT_DIPNAME( 0x01, 0x01, "sw1" )
+ PORT_DIPSETTING( 0x01, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x02, 0x02, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x02, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x04, 0x04, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x04, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x08, 0x08, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x08, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x10, 0x10, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x10, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x20, 0x20, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x20, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x40, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x80, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+
+ PORT_START("SW2")
+ PORT_DIPNAME( 0x01, 0x01, "sw2" )
+ PORT_DIPSETTING( 0x01, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x02, 0x02, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x02, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x04, 0x04, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x04, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x08, 0x08, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x08, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x10, 0x10, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x10, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x20, 0x20, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x20, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x40, 0x40, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x40, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+ PORT_DIPNAME( 0x80, 0x80, DEF_STR( Unknown ) )
+ PORT_DIPSETTING( 0x80, DEF_STR( Off ) )
+ PORT_DIPSETTING( 0x00, DEF_STR( On ) )
+INPUT_PORTS_END
+
+
+/*************************
+* Graphics Layouts *
+*************************/
+
+static const gfx_layout charlayout =
+{
+ 8, 8,
+ 0x400, /* tiles */
+ 2, /* 2 bpp */
+ { RGN_FRAC(0,2), RGN_FRAC(1,2) },
+ { 0, 1, 2, 3, 4, 5, 6, 7 },
+ { 0*8, 1*8, 2*8, 3*8, 4*8, 5*8, 6*8, 7*8 },
+ 8*8 /* every char takes 8 consecutive bytes */
+};
+
+
+/******************************
+* Graphics Decode Information *
+******************************/
+
+static GFXDECODE_START( gfx_jokrwild )
+ GFXDECODE_ENTRY( "gfx1", 0, charlayout, 0, 16 )
+GFXDECODE_END
+
+
+/***********************
+* PIA Interfaces *
+***********************/
+
+void jokrwild_state::testa_w(uint8_t data)
+{
+// printf("%02x A\n",data);
+}
+
+void jokrwild_state::testb_w(uint8_t data)
+{
+// printf("%02x B\n",data);
+}
+
+
+/*************************
+* Machine Drivers *
+*************************/
+
+void jokrwild_state::jokrwild(machine_config &config)
+{
+ /* basic machine hardware */
+ M6809(config, m_maincpu, MASTER_CLOCK/2); /* guess */
+ m_maincpu->set_addrmap(AS_PROGRAM, &jokrwild_state::jokrwild_map);
+
+// NVRAM(config, "nvram", nvram_device::DEFAULT_ALL_0);
+
+ pia6821_device &pia0(PIA6821(config, "pia0"));
+ pia0.readpa_handler().set_ioport("IN0");
+ pia0.readpb_handler().set_ioport("IN1");
+ pia0.writepa_handler().set(FUNC(jokrwild_state::testa_w));
+ pia0.writepb_handler().set(FUNC(jokrwild_state::testb_w));
+
+ pia6821_device &pia1(PIA6821(config, "pia1"));
+ pia1.readpa_handler().set_ioport("IN2");
+ pia1.readpb_handler().set_ioport("IN3");
+
+ /* video hardware */
+ screen_device &screen(SCREEN(config, "screen", SCREEN_TYPE_RASTER));
+ screen.set_refresh_hz(60);
+ screen.set_vblank_time(ATTOSECONDS_IN_USEC(0));
+ screen.set_size((32+1)*8, (32+1)*8); // From MC6845, registers 00 & 04. (value-1)
+ screen.set_visarea(0*8, 24*8-1, 0*8, 26*8-1); // From MC6845, registers 01 & 06.
+ screen.set_screen_update(FUNC(jokrwild_state::screen_update_jokrwild));
+
+ GFXDECODE(config, m_gfxdecode, "palette", gfx_jokrwild);
+ PALETTE(config, "palette", FUNC(jokrwild_state::jokrwild_palette), 512);
+
+ mc6845_device &crtc(MC6845(config, "crtc", MASTER_CLOCK/16)); /* guess */
+ crtc.set_screen("screen");
+ crtc.set_show_border_area(false);
+ crtc.set_char_width(8);
+ crtc.out_vsync_callback().set_inputline(m_maincpu, INPUT_LINE_NMI);
+}
+
+
+/*************************
+* Rom Load *
+*************************/
+/*
+ One day I will write about HOW I got this dump... :)
+
+ "Only two things are infinite: The universe and human stupidity...
+ and I'm not sure about the universe." (Albert Einstein)
+
+*/
+ROM_START( jokrwild )
+ ROM_REGION( 0x10000, "maincpu", 0 )
+ ROM_LOAD( "jwild.7b", 0x8000, 0x4000, CRC(744cd029) SHA1(766faea330836344ffc6a1b4e1a64a679b9bf579) )
+ ROM_LOAD( "jwild.7a", 0xc000, 0x4000, CRC(ca8e4f58) SHA1(a4f682980fe562dcd8743890ce94619719cd1153) )
+
+ ROM_REGION( 0x4000, "gfx1", 0 )
+ ROM_LOAD( "jwild.2h", 0x0000, 0x0800, CRC(aed38e00) SHA1(9530078f6c22d67594606476c3698a75e052d1d6) )
+ ROM_LOAD( "jwild.2g", 0x1000, 0x0800, CRC(d635f025) SHA1(f70d5a837797e2250a7e581b96e60a704da25511) )
+ ROM_LOAD( "jwild.2f", 0x0800, 0x0800, CRC(9c1e057c) SHA1(23fd630aa20a4ffa5179d4a4fa32c6ee4b3f9c1b) )
+ ROM_LOAD( "jwild.2e", 0x1800, 0x0800, CRC(a66ae0a1) SHA1(8e6bfcb169148fdbcc36f4f35747c4805762ddd7) )
+ ROM_LOAD( "jwild.2d", 0x2000, 0x0800, CRC(76a0bcb4) SHA1(34c24ad63b1182166209074259e8f0aabe1ad331) )
+ ROM_LOAD( "jwild.2c", 0x3000, 0x0800, CRC(8d5e0b8f) SHA1(da6692d0c2074427f801b3f1861e3d03075963a2) )
+ ROM_LOAD( "jwild.2b", 0x2800, 0x0800, CRC(a264b0be) SHA1(a935dd3df8bbae9b7788d6c2a8c378fad07d2b43) )
+ ROM_LOAD( "jwild.2a", 0x3800, 0x0800, CRC(8084d0c2) SHA1(370f30f0138e2f7743a97df92379c7b879d90aed) )
+
+ ROM_REGION( 0x0100, "proms", 0 )
+ ROM_LOAD( "prom.x", 0x0000, 0x0100, NO_DUMP )
+ROM_END
+
+
+/**************************
+* Driver Initialization *
+**************************/
+
+void jokrwild_state::init_jokrwild()
+{
+ /*****************************************************************************
+
+ Encryption was made by pages of 256 bytes.
+
+ For each page, the value is XORed with a fixed value (0xCC),
+ then XORed again with the offset of the original value inside its own page.
+
+ Example:
+
+ For encrypted value at offset 0x123A (0x89)...
+
+ 0x89 XOR 0xCC XOR 0x3A = 0x7F
+
+ *****************************************************************************/
+ uint8_t *const srcp = memregion( "maincpu" )->base();
+ for (int i = 0x8000; i < 0x10000; i++)
+ {
+ int offs = i & 0xff;
+ srcp[i] = srcp[i] ^ 0xcc ^ offs;
+ }
+}
+
+} // anonymous namespace
+
+
+/*************************
+* Game Drivers *
+*************************/
+
+// YEAR NAME PARENT MACHINE INPUT STATE INIT ROT COMPANY FULLNAME FLAGS
+GAME( 1988, jokrwild, 0, jokrwild, jokrwild, jokrwild_state, init_jokrwild, ROT0, "Sigma", "Joker's Wild (encrypted)", MACHINE_NO_SOUND | MACHINE_NOT_WORKING )