Preliminary driver for Joker's Wild (Sigma, 1988).

- Initial release.
 - ROMs load OK.
 - Proper ROMs decryption.
 - Added MC6845 CRTC.
 - Video RAM OK.
 - Added technical notes.


New games marked as GAME_NOT_WORKING
------------------------------------
Joker's Wild (encrypted) [Roberto Fresca]
This commit is contained in:
Roberto Fresca 2008-10-25 09:09:31 +00:00
parent 0658fcabef
commit b2288ad1d5
4 changed files with 432 additions and 1 deletions

1
.gitattributes vendored
View File

@ -1598,6 +1598,7 @@ src/mame/drivers/jailbrek.c svneol=native#text/plain
src/mame/drivers/jalmah.c svneol=native#text/plain
src/mame/drivers/jchan.c svneol=native#text/plain
src/mame/drivers/jedi.c svneol=native#text/plain
src/mame/drivers/jokrwild.c svneol=native#text/plain
src/mame/drivers/jollyjgr.c svneol=native#text/plain
src/mame/drivers/jongkyo.c svneol=native#text/plain
src/mame/drivers/jpmimpct.c svneol=native#text/plain

428
src/mame/drivers/jokrwild.c Normal file
View File

@ -0,0 +1,428 @@
/******************************************************************************
JOKER'S WILD - SIGMA
--------------------
Preliminary driver by Roberto Fresca.
Games running on this hardware:
* Joker's Wild (encrypted). 1988, Sigma.
*******************************************************************************
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 ***
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
PIAs are commented out just to see the R/W on error log.
*******************************************************************************
--------------------
*** 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-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.
*******************************************************************************/
#define MASTER_CLOCK XTAL_8MHz /* guess */
#include "driver.h"
#include "video/mc6845.h"
#include "machine/6821pia.h"
/*************************
* Video Hardware *
*************************/
static tilemap *bg_tilemap;
static WRITE8_HANDLER( jokrwild_videoram_w )
{
videoram[offset] = data;
tilemap_mark_tile_dirty(bg_tilemap, offset);
}
static WRITE8_HANDLER( jokrwild_colorram_w )
{
colorram[offset] = data;
tilemap_mark_tile_dirty(bg_tilemap, offset);
}
static TILE_GET_INFO( get_bg_tile_info )
{
/* - bits -
7654 3210
---- ---- bank select.
---- ---- color code.
---- ---- seems unused.
*/
// int attr = colorram[tile_index];
int code = videoram[tile_index];
// int bank = (attr & 0x08) >> 3;
// int color = (attr & 0x03);
SET_TILE_INFO( 0 /* bank */, code, 0 /* color */, 0);
}
static VIDEO_START( jokrwild )
{
bg_tilemap = tilemap_create(get_bg_tile_info, tilemap_scan_rows, 8, 8, 24, 26);
}
static VIDEO_UPDATE( jokrwild )
{
tilemap_draw(bitmap, cliprect, bg_tilemap, 0, 0);
return 0;
}
static PALETTE_INIT( jokrwild )
{
}
/*************************
* Machine Init *
*************************/
/*****************************
* Read/Write Handlers *
*****************************/
//static READ8_HANDLER( random_gen_r )
//{
// return mame_rand(machine) & 0xff;
//}
/*************************
* Memory Map Information *
*************************/
static ADDRESS_MAP_START( jokrwild_map, ADDRESS_SPACE_PROGRAM, 8 )
AM_RANGE(0x0000, 0x07ff) AM_RAM AM_WRITE(jokrwild_videoram_w) AM_BASE(&videoram)
AM_RANGE(0x2000, 0x27ff) AM_RAM AM_WRITE(jokrwild_colorram_w) AM_BASE(&colorram)
// AM_RANGE(0x0010, 0x0010) AM_READ(random_gen_r)
// AM_RANGE(0x4004, 0x4007) AM_READWRITE(pia_0_r, pia_0_w)
// AM_RANGE(0x4008, 0x400b) AM_READWRITE(pia_1_r, pia_1_w)
// AM_RANGE(0x4010, 0x4010) AM_READNOP /* R ???? */
AM_RANGE(0x6000, 0x6000) AM_DEVWRITE(MC6845, "crtc", mc6845_address_w)
AM_RANGE(0x6001, 0x6001) AM_DEVREADWRITE(MC6845, "crtc", mc6845_register_r, mc6845_register_w)
// AM_RANGE(0x6100, 0x6100) AM_READWRITENOP /* R/W ???? */
// AM_RANGE(0x6200, 0x6203) another PIA?
// AM_RANGE(0x6300, 0x6300) unknown
AM_RANGE(0x8000, 0xffff) AM_ROM
ADDRESS_MAP_END
/* 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_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_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, 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 ) )
INPUT_PORTS_END
/*************************
* Graphics Layouts *
*************************/
static const gfx_layout charlayout =
{
8, 8,
0x800, /* tiles */
1,
{ 0 },
{ 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( jokrwild )
GFXDECODE_ENTRY( "gfx1", 0, charlayout, 0, 16 )
GFXDECODE_END
/***********************
* PIA Interfaces *
***********************/
static const pia6821_interface pia0_intf =
{
/* PIA inputs: A, B, CA1, CB1, CA2, CB2 */
input_port_0_r, input_port_1_r, 0, 0, 0, 0,
/* PIA outputs: A, B, CA2, CB2 */
0, 0, 0, 0,
/* PIA IRQs: A, B */
0, 0
};
static const pia6821_interface pia1_intf =
{
/* PIA inputs: A, B, CA1, CB1, CA2, CB2 */
input_port_2_r, input_port_3_r, 0, 0, 0, 0,
/* PIA outputs: A, B, CA2, CB2 */
0, 0, 0, 0,
/* PIA IRQs: A, B */
0, 0
};
/*************************
* Machine Drivers *
*************************/
static MACHINE_DRIVER_START( jokrwild )
/* basic machine hardware */
MDRV_CPU_ADD("main", M6809, MASTER_CLOCK/8) /* guess */
MDRV_CPU_PROGRAM_MAP(jokrwild_map, 0)
MDRV_CPU_VBLANK_INT("main", nmi_line_pulse)
// MDRV_NVRAM_HANDLER(generic_0fill)
/* video hardware */
MDRV_SCREEN_ADD("main", RASTER)
MDRV_SCREEN_REFRESH_RATE(60)
MDRV_SCREEN_VBLANK_TIME(ATTOSECONDS_IN_USEC(0))
MDRV_SCREEN_FORMAT(BITMAP_FORMAT_INDEXED16)
MDRV_SCREEN_SIZE((32+1)*8, (32+1)*8) /* From MC6845, registers 00 & 04. (value-1) */
MDRV_SCREEN_VISIBLE_AREA(0*8, 24*8-1, 0*8, 26*8-1) /* From MC6845, registers 01 & 06 */
MDRV_GFXDECODE(jokrwild)
MDRV_PALETTE_INIT(jokrwild)
MDRV_PALETTE_LENGTH(512)
MDRV_VIDEO_START(jokrwild)
MDRV_VIDEO_UPDATE(jokrwild)
MDRV_DEVICE_ADD("crtc", MC6845)
MACHINE_DRIVER_END
/*************************
* 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, "main", 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", ROMREGION_DISPOSE )
ROM_LOAD( "jwild.2h", 0x0000, 0x0800, CRC(aed38e00) SHA1(9530078f6c22d67594606476c3698a75e052d1d6) )
ROM_LOAD( "jwild.2g", 0x0800, 0x0800, CRC(d635f025) SHA1(f70d5a837797e2250a7e581b96e60a704da25511) )
ROM_LOAD( "jwild.2f", 0x1000, 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", 0x2800, 0x0800, CRC(8d5e0b8f) SHA1(da6692d0c2074427f801b3f1861e3d03075963a2) )
ROM_LOAD( "jwild.2b", 0x3000, 0x0800, CRC(a264b0be) SHA1(a935dd3df8bbae9b7788d6c2a8c378fad07d2b43) )
ROM_LOAD( "jwild.2a", 0x3800, 0x0800, CRC(8084d0c2) SHA1(370f30f0138e2f7743a97df92379c7b879d90aed) )
ROM_END
/**************************
* Driver Initialization *
**************************/
static DRIVER_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
*****************************************************************************/
{
int i, offs;
UINT8 *srcp = memory_region( machine, "main" );
for (i = 0x8000; i < 0x10000; i++)
{
offs = i & 0xff;
srcp[i] = srcp[i] ^ 0xcc ^ offs;
}
/* Initializing PIAs... */
// pia_config(0, &pia0_intf);
// pia_config(1, &pia1_intf);
}
/*************************
* Game Drivers *
*************************/
/* YEAR NAME PARENT MACHINE INPUT INIT ROT COMPANY FULLNAME FLAGS */
GAME( 1988, jokrwild, 0, jokrwild, jokrwild, jokrwild, ROT0, "Sigma", "Joker's Wild (encrypted)", GAME_NO_SOUND | GAME_NOT_WORKING )

View File

@ -1590,6 +1590,7 @@ $(MAMEOBJ)/misc.a: \
$(DRIVERS)/itgambl3.o \
$(DRIVERS)/itgamble.o \
$(DRIVERS)/jackpool.o \
$(DRIVERS)/jokrwild.o \
$(DRIVERS)/jongkyo.o \
$(DRIVERS)/kingpin.o \
$(DRIVERS)/koikoi.o \
@ -1634,6 +1635,7 @@ $(MAMEOBJ)/misc.a: \
$(DRIVERS)/quizpun2.o \
$(DRIVERS)/rbmk.o \
$(DRIVERS)/rcorsair.o \
$(DRIVERS)/re900.o \
$(DRIVERS)/sfkick.o \
$(DRIVERS)/shangkid.o $(VIDEO)/shangkid.o \
$(DRIVERS)/skyarmy.o \
@ -1671,7 +1673,6 @@ $(MAMEOBJ)/misc.a: \
$(DRIVERS)/wldarrow.o \
$(DRIVERS)/xyonix.o $(VIDEO)/xyonix.o \
$(DRIVERS)/hikaru.o \
$(DRIVERS)/re900.o \
#-------------------------------------------------

View File

@ -8279,6 +8279,7 @@ Other Sun games
DRIVER( magictg ) /* (c) 199? Acclaim */
DRIVER( magictga ) /* (c) 199? Acclaim */
DRIVER( re900 ) /* (c) 1990 Entretenimientos GEMINI */
DRIVER( jokrwild ) /* (c) 1988 Sigma */
/* InterFlip / Recreativos Franco */
DRIVER( videopkr ) /* (c) 1984 InterFlip */