📄 karnov.c
字号:
/*******************************************************************************
Karnov - Bryan McPhail, mish@tendril.force9.net
This file contains drivers for:
* Karnov (Data East USA, 1987)
* Karnov (Japan rom set - Data East Corp, 1987)
* Chelnov (Data East USA, 1988)
* Chelnov (Japan rom set - Data East Corp, 1987)
NOTE! Karnov USA & Karnov Japan sets have different gameplay!
and Chelnov USA & Chelnov Japan sets have different gameplay!
These games use a 68000 main processor with a 6502, YM2203C and YM3526 for
sound. Karnov was a major pain to get going because of the
'protection' on the main player sprite, probably connected to the Intel
microcontroller on the board. The game is very sensitive to the wrong values
at the input ports...
There is another Karnov rom set - a bootleg version of the Japanese roms with
the Data East copyright removed - not supported because the original Japanese
roms work fine.
One of the two color PROMs for chelnov and chelnoj is different; one is most
likely a bad read, but I don't know which one.
Thanks to Oliver Stabel <stabel@rhein-neckar.netsurf.de> for confirming some
of the sprite & control information :)
Cheats:
Karnov - put 0x30 at 0x60201 to skip a level
Chelnov - level number at 0x60189 - enter a value at cartoon intro
*******************************************************************************/
#include "driver.h"
#include "vidhrdw/generic.h"
#include "M6502/m6502.h"
void karnov_vh_convert_color_prom(unsigned char *palette, unsigned short *colortable,const unsigned char *color_prom);
void karnov_vh_screenrefresh(struct osd_bitmap *bitmap,int full_refresh);
void karnov_foreground_w(int offset, int data);
int karnov_vh_start (void);
void karnov_vh_stop (void);
static int i8751_return;
static int KARNOV, CHELNOV; /* :) */
static unsigned char *karnov_ram;
extern int karnov_scroll[4];
/******************************************************************************/
/* Emulation of the protected microcontroller - for coins & general protection */
static void karnov_i8751_w(int data)
{
i8751_return=0;
if (data==0x100 && KARNOV==2) i8751_return=0x56a; /* Japan version */
if (data==0x100 && KARNOV==1) i8751_return=0x56b; /* USA version */
if ((data&0xf00)==0x300) i8751_return=(data&0xff)*0x12; /* Player sprite mapping */
/* I'm not sure the ones marked ^ appear in the right order */
if (data==0x400) i8751_return=0x4000; /* Get The Map... */
if (data==0x402) i8751_return=0x40a6; /* Ancient Ruins */
if (data==0x403) i8751_return=0x4054; /* Forest... */
if (data==0x404) i8751_return=0x40de; /* ^Rocky hills */
if (data==0x405) i8751_return=0x4182; /* Sea */
if (data==0x406) i8751_return=0x41ca; /* Town */
if (data==0x407) i8751_return=0x421e; /* Desert */
if (data==0x401) i8751_return=0x4138; /* ^Whistling wind */
if (data==0x408) i8751_return=0x4276; /* ^Heavy Gates */
cpu_cause_interrupt(0,6); /* Signal main cpu task is complete */
}
static void chelnov_i8751_w(int data)
{
static int level;
i8751_return=0;
if (data==0x200 && CHELNOV==2) i8751_return=0x7734; /* Japan version */
if (data==0x200 && CHELNOV==1) i8751_return=0x783e; /* USA version */
if (data==0x100 && CHELNOV==2) i8751_return=0x71a; /* Japan version */
if (data==0x100 && CHELNOV==1) i8751_return=0x71b; /* USA version */
if (data>=0x6000 && data<0x8000) i8751_return=1; /* patched */
if ((data&0xf000)==0x1000) level=1; /* Level 1 */
if ((data&0xf000)==0x2000) level++; /* Level Increment */
if ((data&0xf000)==0x3000) { /* Sprite table mapping */
int b=data&0xff;
switch (level) {
case 1: /* Level 1, Sprite mapping tables */
if (CHELNOV==1) { /* USA */
if (b<2) i8751_return=0;
else if (b<6) i8751_return=1;
else if (b<0xb) i8751_return=2;
else if (b<0xf) i8751_return=3;
else if (b<0x13) i8751_return=4;
else i8751_return=5;
} else { /* Japan */
if (b<3) i8751_return=0;
else if (b<8) i8751_return=1;
else if (b<0xc) i8751_return=2;
else if (b<0x10) i8751_return=3;
else if (b<0x19) i8751_return=4;
else if (b<0x1b) i8751_return=5;
else if (b<0x22) i8751_return=6;
else if (b<0x28) i8751_return=7;
else i8751_return=8;
}
break;
case 2: /* Level 2, Sprite mapping tables, USA & Japan are the same */
if (b<3) i8751_return=0;
else if (b<9) i8751_return=1;
else if (b<0x11) i8751_return=2;
else if (b<0x1b) i8751_return=3;
else if (b<0x21) i8751_return=4;
else if (b<0x28) i8751_return=5;
else i8751_return=6;
break;
case 3: /* Level 3, Sprite mapping tables, USA & Japan are the same */
if (b<5) i8751_return=0;
else if (b<9) i8751_return=1;
else if (b<0xd) i8751_return=2;
else if (b<0x11) i8751_return=3;
else if (b<0x1b) i8751_return=4;
else if (b<0x1c) i8751_return=5;
else if (b<0x22) i8751_return=6;
else if (b<0x27) i8751_return=7;
else i8751_return=8;
break;
case 4: /* Level 4, Sprite mapping tables, USA & Japan are the same */
if (b<4) i8751_return=0;
else if (b<0xc) i8751_return=1;
else if (b<0xf) i8751_return=2;
else if (b<0x19) i8751_return=3;
else if (b<0x1c) i8751_return=4;
else if (b<0x22) i8751_return=5;
else if (b<0x29) i8751_return=6;
else i8751_return=7;
break;
case 5: /* Level 5, Sprite mapping tables */
if (b<7) i8751_return=0;
else if (b<0xe) i8751_return=1;
else if (b<0x14) i8751_return=2;
else if (b<0x1a) i8751_return=3;
else if (b<0x23) i8751_return=4;
else if (b<0x27) i8751_return=5;
else i8751_return=6;
break;
case 6: /* Level 6, Sprite mapping tables */
if (b<3) i8751_return=0;
else if (b<0xb) i8751_return=1;
else if (b<0x11) i8751_return=2;
else if (b<0x17) i8751_return=3;
else if (b<0x1d) i8751_return=4;
else if (b<0x24) i8751_return=5;
else i8751_return=6;
break;
case 7: /* Level 7, Sprite mapping tables */
if (b<5) i8751_return=0;
else if (b<0xb) i8751_return=1;
else if (b<0x11) i8751_return=2;
else if (b<0x1a) i8751_return=3;
else if (b<0x21) i8751_return=4;
else if (b<0x27) i8751_return=5;
else i8751_return=6;
break;
}
}
cpu_cause_interrupt(0,6); /* Signal main cpu task is complete */
}
/******************************************************************************/
static void karnov_control_w(int offset, int data)
{
/* Mnemonics filled in from the schematics, brackets are my comments */
switch (offset) {
case 0: /* SECLR (Interrupt ack for Level 6 i8751 interrupt) */
return;
case 2: /* SONREQ (Sound CPU byte) */
soundlatch_w(0,data&0xff);
cpu_cause_interrupt (1, M6502_INT_NMI);
break;
case 4: /* DM (Interrupt for DMA by graphics chips?) */
break;
case 6: /* SECREQ (Interrupt & Data to i8751) */
if (KARNOV) karnov_i8751_w(data);
if (CHELNOV) chelnov_i8751_w(data);
break;
case 8: /* HSHIFT (9 bits) - Top bit indicates video flip */
WRITE_WORD (&karnov_scroll[0], data);
break;
case 0xa: /* VSHIFT */
WRITE_WORD (&karnov_scroll[2], data);
break;
case 0xc: /* SECR (Reset i8751) */
i8751_return=0;
break;
case 0xe: /* INTCLR (Interrupt ack for Level 7 vbl interrupt) */
break;
}
}
/******************************************************************************/
static int karnov_control_r(int offset)
{
switch (offset) {
case 0: /* Player controls */
return ( readinputport(0) + (readinputport(1)<<8));
case 2: /* Start buttons & VBL */
return readinputport(2);
case 4: /* Dipswitch A & B */
return ( readinputport(5) + (readinputport(4)<<8));
case 6: /* i8751 return values */
return i8751_return;
}
return 0xffff;
}
/******************************************************************************/
static struct MemoryReadAddress karnov_readmem[] =
{
{ 0x000000, 0x05ffff, MRA_ROM },
{ 0x060000, 0x063fff, MRA_BANK1 },
{ 0x080000, 0x080fff, MRA_BANK2 },
{ 0x0a0000, 0x0a07ff, MRA_BANK3 },
{ 0x0c0000, 0x0c0007, karnov_control_r },
{ -1 } /* end of table */
};
static struct MemoryWriteAddress karnov_writemem[] =
{
{ 0x000000, 0x05ffff, MWA_ROM },
{ 0x060000, 0x063fff, MWA_BANK1 , &karnov_ram },
{ 0x080000, 0x080fff, MWA_BANK2 , &spriteram },
{ 0x0a0000, 0x0a07ff, MWA_BANK3 , &videoram, &videoram_size },
{ 0x0a1000, 0x0a1fff, karnov_foreground_w },
{ 0x0c0000, 0x0c000f, karnov_control_w },
{ -1 } /* end of table */
};
/******************************************************************************/
static struct MemoryReadAddress karnov_s_readmem[] =
{
{ 0x0000, 0x05ff, MRA_RAM},
{ 0x0800, 0x0800, soundlatch_r },
{ 0x8000, 0xffff, MRA_ROM },
{ -1 } /* end of table */
};
static struct MemoryWriteAddress karnov_s_writemem[] =
{
{ 0x0000, 0x05ff, MWA_RAM},
{ 0x1000, 0x1000, YM2203_control_port_0_w }, /* OPN */
{ 0x1001, 0x1001, YM2203_write_port_0_w },
{ 0x1800, 0x1800, YM3526_control_port_0_w }, /* OPL */
{ 0x1801, 0x1801, YM3526_write_port_0_w },
{ 0x8000, 0xffff, MWA_ROM },
{ -1 } /* end of table */
};
/******************************************************************************/
INPUT_PORTS_START( karnov_input_ports )
PORT_START /* Player 1 controls */
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP | IPF_8WAY )
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN | IPF_8WAY )
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT | IPF_8WAY )
PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT | IPF_8WAY )
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 )
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON2 )
PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON3 )
PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) /* Button 4 on schematics */
PORT_START /* Player 2 controls */
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_JOYSTICK_UP | IPF_8WAY | IPF_PLAYER2 )
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_JOYSTICK_DOWN | IPF_8WAY | IPF_PLAYER2 )
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_JOYSTICK_LEFT | IPF_8WAY | IPF_PLAYER2 )
PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_JOYSTICK_RIGHT | IPF_8WAY | IPF_PLAYER2 )
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_BUTTON1 | IPF_PLAYER2 )
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_BUTTON2 | IPF_PLAYER2 )
PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_BUTTON3 | IPF_PLAYER2 )
PORT_BIT( 0x80, IP_ACTIVE_LOW, IPT_UNUSED ) /* Button 4 on schematics */
PORT_START /* start buttons */
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_UNUSED ) /* PL1 Button 5 on schematics */
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_UNUSED ) /* PL2 Button 5 on schematics */
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_START1 )
PORT_BIT( 0x08, IP_ACTIVE_LOW, IPT_START2 )
PORT_BIT( 0x10, IP_ACTIVE_LOW, IPT_UNKNOWN )
PORT_BIT( 0x20, IP_ACTIVE_LOW, IPT_UNKNOWN )
PORT_BIT( 0x40, IP_ACTIVE_LOW, IPT_UNKNOWN )
PORT_BIT( 0x80, IP_ACTIVE_HIGH, IPT_VBLANK )
PORT_START /* Dummy input for i8751 */
PORT_BIT( 0x01, IP_ACTIVE_LOW, IPT_COIN3 )
PORT_BIT( 0x02, IP_ACTIVE_LOW, IPT_COIN2 )
PORT_BIT( 0x04, IP_ACTIVE_LOW, IPT_COIN1 )
PORT_BIT( 0xf8, IP_ACTIVE_LOW, IPT_UNUSED )
PORT_START /* Dip switch bank 2 */
PORT_DIPNAME( 0x03, 0x03, "Lives", IP_KEY_NONE )
PORT_DIPSETTING( 0x01, "1" )
PORT_DIPSETTING( 0x03, "3" )
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -