Files
ci-libretro-fceumm/src/boards/fk23c.c
retro-wertz d72a5061ea Update
2017-10-15 19:48:51 +08:00

300 lines
8.4 KiB
C

/* FCE Ultra - NES/Famicom Emulator
*
* Copyright notice for this file:
* Copyright (C) 2006 CaH4e3
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include "mapinc.h"
#include "mmc3.h"
static int is_BMCFK23CA;
static uint8 unromchr;
static uint32 dipswitch = 0;
static uint8 *CHRRAM = NULL;
static uint32 CHRRAMSize;
static void BMCFK23CCW(uint32 A, uint8 V) {
if (EXPREGS[0] & 0x40)
setchr8(EXPREGS[2] | unromchr);
else if (EXPREGS[0] & 0x20) {
setchr1r(0x10, A, V);
} else {
uint16 base=(EXPREGS[2] & 0x7F) << 3;
if (EXPREGS[3] & 2) {
int cbase = (MMC3_cmd & 0x80) << 5;
setchr1(A, V | base);
setchr1(0x0000 ^ cbase, DRegBuf[0] | base);
setchr1(0x0400 ^ cbase, EXPREGS[6] | base);
setchr1(0x0800 ^ cbase, DRegBuf[1] | base);
setchr1(0x0c00 ^ cbase, EXPREGS[7] | base);
} else
setchr1(A, V | base);
}
}
/* some games are wired differently, and this will need to be changed.
* all the WXN games require prg_bonus = 1, and cah4e3's multicarts require prg_bonus = 0
* we'll populate this from a game database
*/
static int prg_mask;
static int prg_bonus = 1;
/*
* prg_bonus = 0
* 4-in-1 (FK23C8021)[p1][!].nes
* 4-in-1 (FK23C8033)[p1][!].nes
* 4-in-1 (FK23C8043)[p1][!].nes
* 4-in-1 (FK23Cxxxx, S-0210A PCB)[p1][!].nes
* prg_bonus = 1
* [m176]大富翁2-上海大亨.wxn.nes
* [m176]宠物翡翠.fix.nes
* [m176]格兰帝亚.wxn.nes
* [m176]梦幻之星.wxn.nes
* [m176]水浒神兽.fix.nes
* [m176]西楚霸王.fix.nes
* [m176]超级大富翁.wxn.nes
* [m176]雄霸天下.wxn.nes
* works as-is under virtuanes m176
* [m176]三侠五义.wxn.nes
* [m176]口袋金.fix.nes
* [m176]爆笑三国.fix.nes
* needs other tweaks
* [m176]三国忠烈传.wxn.nes
* [m176]破釜沉舟.fix.nes
*/
static uint64 CartList[] =
{
0x1606b8c2aff8d942LL, /* 4-in-1 (BS-8088) [p1][!].nes */
0x62b51b108a01d2beLL, /* 4-in-1 (FK23C8021) [p1][!].nes */
0xa37eb9163e001a46LL, /* 4-in-1 (FK23C8026) [p1][!].nes */
0x8bb48490d8d22711LL, /* 4-in-1 (FK23C8033) [p1][!].nes */
0xc75888d7b48cd378LL, /* 4-in-1 (FK23C8043) [p1][!].nes */
0xde5ce25860233f7eLL, /* 4-in-1 (FK23C8045) [p1][!].nes */
0x8b6c9fc7769a5500LL, /* 4-in-1 (FK23C8052) [p1][!].nes */
0x5b3aa4cdc484a088LL, /* 4-in-1 (FK23C8056) [p1][!].nes */
0x497344d14c308a1aLL, /* 4-in-1 (FK23C8078) (Ch) [p1].nes */
0x9342bf9bae1c798aLL, /* 4-in-1 (FK23C8079) [p1][!].nes */
0xf81a376fa54fdd69LL, /* 4-in-1 (FK23Cxxxx, S-0210A PCB)[p1][!].nes */
0x8fd9c235957a6df0LL, /* 5-in-1 (K5003) [p1][!]-1125) (Ch).nes */
0x0315924d00dd7807LL, /* Mortal Kombat 30 Peoples (DH1043) (Ch).nes */
0x4b99c39fdb66128aLL, /* 4-in-1 (FK23C8078) (Ch) [p1][U][!].unf */
0x22a0ba5743191778LL, /* Rockman 4 MI (Hack) */
0
};
static int DetectPRGbonus(CartInfo *tmp) {
int x, i = 0;
uint64 partialmd5 = 0;
for (x = 0; x < 8; x++)
partialmd5 |= (uint64)tmp->MD5[15 - x] << (x * 8);
while (CartList[i] != 0) {
if (CartList[i] == partialmd5) {
return (0);
}
i++;
}
return (1);
}
static void BMCFK23CPW(uint32 A, uint8 V) {
/* Modified (c)May 2017 - Backport older implementations from FCEUmm
* to support big sized FK23CA carts which broke in latest commits.
*/
/* uint32 bank = (EXPREGS[1] & 0x1F); */
uint32 hiblock = ((EXPREGS[0] & 8) << 4) | ((EXPREGS[0] & 0x80) << 1) | (UNIFchrrama ? ((EXPREGS[2] & 0x40) << 3) : 0);
uint32 block = (EXPREGS[1] & 0x60) | hiblock;
uint32 extra = (EXPREGS[3] & 2);
switch (EXPREGS[0] & 7) {
case 4:
setprg32(0x8000,(EXPREGS[1] | block) >> 1);
break;
case 3:
setprg16(0x8000,(EXPREGS[1] | block));
setprg16(0xC000,(EXPREGS[1] | block));
break;
default:
if (EXPREGS[0] & 3) {
uint32 blocksize = (6) - (EXPREGS[0] & 3);
uint32 mask = (1 << blocksize) - 1;
V &= mask;
/* V &= 63; */ /* ??? is this a good idea? */
V |= EXPREGS[1] << 1;
setprg8(A, (V | (hiblock << 1)));
} else
setprg8(A, ((V & prg_mask) | (block << 1)));
if (extra) {
setprg8(0xC000, EXPREGS[4]);
setprg8(0xE000, EXPREGS[5]);
}
break;
}
setprg8r(0x10, 0x6000, A001B & 3);
}
static DECLFW(BMCFK23CHiWrite) {
if (EXPREGS[0] & 0x40) {
if (EXPREGS[0] & 0x30)
unromchr = 0;
else {
unromchr = V & 3;
FixMMC3CHR(MMC3_cmd);
}
} else {
if ((A == 0x8001) && (EXPREGS[3] & 2 && MMC3_cmd & 8)) {
EXPREGS[4 | (MMC3_cmd & 3)] = V;
FixMMC3PRG(MMC3_cmd);
FixMMC3CHR(MMC3_cmd);
} else
if (A < 0xC000) {
if (UNIFchrrama) { /* hacky... strange behaviour, must be bit scramble due to pcb layot restrictions
* check if it not interfer with other dumps
*/
if ((A == 0x8000) && (V == 0x46))
V = 0x47;
else if ((A==0x8000) && (V == 0x47))
V = 0x46;
}
MMC3_CMDWrite(A, V);
FixMMC3PRG(MMC3_cmd);
} else
MMC3_IRQWrite(A, V);
}
}
static DECLFW(BMCFK23CWrite) {
if (A & (1 << (dipswitch + 4))) {
int remap = 0;
EXPREGS[A & 3] = V;
/* sometimes writing to reg0 causes remappings to occur. we think the 2 signifies this.
* if not, 0x24 is a value that is known to work
* however, the low 4 bits are known to control the mapping mode,
* so 0x20 is more likely to be the immediate remap flag
*/
remap |= ((EXPREGS[0] & 0xF0) == 0x20);
/* this is an actual mapping reg. i think reg0 controls what happens
* when reg1 is written. anyway, we have to immediately remap these
*/
remap |= (A & 3) == 1;
/* this too. */
remap |= (A & 3) == 2;
if (remap) {
FixMMC3PRG(MMC3_cmd);
FixMMC3CHR(MMC3_cmd);
}
}
if (is_BMCFK23CA)
if(EXPREGS[3] & 2)
EXPREGS[0] &= ~7; /* hacky hacky! if someone wants extra banking,
* then for sure doesn't want mode 4 for it!
* (allow to run A version boards on normal mapper)
*/
}
static void BMCFK23CReset(void) {
/* !NOT NECESSARY ANYMORE!
*
* this little hack makes sure that we try all the dip switch settings eventually, if we reset enough
* dipswitch++;
* dipswitch&=7;
* printf("BMCFK23C dipswitch set to %d\n",dipswitch);
*/
EXPREGS[0] = EXPREGS[1] = EXPREGS[2] = EXPREGS[3] = 0;
EXPREGS[4] = EXPREGS[5] = EXPREGS[6] = EXPREGS[7] = 0xFF;
MMC3RegReset();
FixMMC3PRG(MMC3_cmd);
FixMMC3CHR(MMC3_cmd);
}
static void BMCFK23CPower(void) {
GenMMC3Power();
dipswitch = 0;
EXPREGS[0] = EXPREGS[1] = EXPREGS[2] = EXPREGS[3] = 0;
EXPREGS[4] = EXPREGS[5] = EXPREGS[6] = EXPREGS[7] = 0xFF;
SetWriteHandler(0x5000, 0x5fff, BMCFK23CWrite);
SetWriteHandler(0x8000, 0xFFFF, BMCFK23CHiWrite);
FixMMC3PRG(MMC3_cmd);
FixMMC3CHR(MMC3_cmd);
}
static void BMCFK23CAPower(void) {
GenMMC3Power();
dipswitch = 0;
EXPREGS[0] = EXPREGS[1] = EXPREGS[2] = EXPREGS[3] = 0;
EXPREGS[4] = EXPREGS[5] = EXPREGS[6] = EXPREGS[7] = 0xFF;
SetWriteHandler(0x5000, 0x5fff, BMCFK23CWrite);
SetWriteHandler(0x8000, 0xFFFF, BMCFK23CHiWrite);
FixMMC3PRG(MMC3_cmd);
FixMMC3CHR(MMC3_cmd);
}
static void BMCFK23CAClose(void) {
if (CHRRAM)
FCEU_gfree(CHRRAM);
CHRRAM=NULL;
}
void BMCFK23C_Init(CartInfo *info) {
is_BMCFK23CA = 0;
GenMMC3_Init(info, 512, 256, 8, 0);
cwrap = BMCFK23CCW;
pwrap = BMCFK23CPW;
info->Power = BMCFK23CPower;
info->Reset = BMCFK23CReset;
AddExState(EXPREGS, 8, 0, "EXPR");
AddExState(&unromchr, 1, 0, "UCHR");
AddExState(&dipswitch, 1, 0, "DPSW");
prg_bonus = DetectPRGbonus(info);
prg_mask = (0x7F >> prg_bonus);
}
void BMCFK23CA_Init(CartInfo *info) {
is_BMCFK23CA = 1;
GenMMC3_Init(info, 512, 256, 8, 0);
cwrap=BMCFK23CCW;
pwrap=BMCFK23CPW;
info->Power=BMCFK23CAPower;
info->Reset=BMCFK23CReset;
info->Close=BMCFK23CAClose;
CHRRAMSize=8192;
CHRRAM=(uint8*)FCEU_gmalloc(CHRRAMSize);
SetupCartCHRMapping(0x10, CHRRAM, CHRRAMSize, 1);
AddExState(CHRRAM, CHRRAMSize, 0, "CRAM");
AddExState(EXPREGS, 8, 0, "EXPR");
AddExState(&unromchr, 1, 0, "UCHR");
AddExState(&dipswitch, 1, 0, "DPSW");
prg_bonus = DetectPRGbonus(info);
prg_mask = (0x7F >> prg_bonus);
}