400 lines
7.6 KiB
C++
400 lines
7.6 KiB
C++
/* FCE Ultra - NES/Famicom Emulator
|
|
*
|
|
* Copyright notice for this file:
|
|
* Copyright (C) 2002 Xodnizel
|
|
*
|
|
* 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include "mapinc.h"
|
|
|
|
static uint8 cmd;
|
|
static uint8 latch[8];
|
|
|
|
static void S74LS374MSync(uint8 mirr)
|
|
{
|
|
switch(mirr&3)
|
|
{
|
|
case 0:setmirror(MI_V);break;
|
|
case 1:setmirror(MI_H);break;
|
|
case 2:setmirrorw(0,1,1,1);break;
|
|
case 3:setmirror(MI_0);break;
|
|
}
|
|
}
|
|
|
|
static void S74LS374NSynco(void)
|
|
{
|
|
setprg32(0x8000,latch[0]);
|
|
setchr8(latch[1]|latch[3]|latch[4]);
|
|
S74LS374MSync(latch[2]);
|
|
}
|
|
|
|
static DECLFW(S74LS374NWrite)
|
|
{
|
|
A&=0x4101;
|
|
if(A==0x4100)
|
|
cmd=V&7;
|
|
else
|
|
{
|
|
switch(cmd)
|
|
{
|
|
case 2:latch[0]=V&1; latch[3]=(V&1)<<3;break;
|
|
case 4:latch[4]=(V&1)<<2;break;
|
|
case 5:latch[0]=V&7;break;
|
|
case 6:latch[1]=V&3;break;
|
|
case 7:latch[2]=V>>1;break;
|
|
}
|
|
S74LS374NSynco();
|
|
}
|
|
}
|
|
|
|
static DECLFR(S74LS374NRead)
|
|
{
|
|
uint8 ret;
|
|
if((A&0x4100)==0x4100)
|
|
// ret=(X.DB&0xC0)|((~cmd)&0x3F);
|
|
ret=~cmd&0x3F;
|
|
else
|
|
ret=X.DB;
|
|
return ret;
|
|
}
|
|
|
|
static void S74LS374NPower(void)
|
|
{
|
|
latch[0]=latch[1]=latch[2]=latch[3]=latch[4]=0;
|
|
S74LS374NSynco();
|
|
SetReadHandler(0x8000,0xFFFF,CartBR);
|
|
SetWriteHandler(0x4100,0x7FFF,S74LS374NWrite);
|
|
SetReadHandler(0x4100,0x5fff,S74LS374NRead);
|
|
}
|
|
|
|
static void S74LS374NRestore(int version)
|
|
{
|
|
S74LS374NSynco();
|
|
}
|
|
|
|
void S74LS374N_Init(CartInfo *info)
|
|
{
|
|
info->Power=S74LS374NPower;
|
|
GameStateRestore=S74LS374NRestore;
|
|
AddExState(latch, 5, 0, "LATC");
|
|
AddExState(&cmd, 1, 0, "CMD");
|
|
}
|
|
|
|
static void S74LS374NASynco(void)
|
|
{
|
|
setprg32(0x8000,latch[0]);
|
|
setchr8(latch[1]);
|
|
S74LS374MSync(latch[2]);
|
|
}
|
|
|
|
static DECLFW(S74LS374NAWrite)
|
|
{
|
|
A&=0x4101;
|
|
if(A==0x4100)
|
|
cmd=V&7;
|
|
else
|
|
{
|
|
switch(cmd)
|
|
{
|
|
case 0:latch[0]=0;latch[1]=3;break;
|
|
case 2:latch[3]=(V&1)<<3;break;
|
|
case 4:latch[1]=(latch[1]&6)|(V&3);break;
|
|
case 5:latch[0]=V&1;break;
|
|
case 6:latch[1]=(latch[1]&1)|latch[3]|((V&3)<<1);break;
|
|
case 7:latch[2]=V&1;break;
|
|
}
|
|
S74LS374NASynco();
|
|
}
|
|
}
|
|
|
|
static void S74LS374NAPower(void)
|
|
{
|
|
latch[0]=latch[2]=latch[3]=latch[4]=0;
|
|
latch[1]=3;
|
|
S74LS374NASynco();
|
|
SetReadHandler(0x8000,0xFFFF,CartBR);
|
|
SetWriteHandler(0x4100,0x7FFF,S74LS374NAWrite);
|
|
}
|
|
|
|
void S74LS374NA_Init(CartInfo *info)
|
|
{
|
|
info->Power=S74LS374NAPower;
|
|
GameStateRestore=S74LS374NRestore;
|
|
AddExState(latch, 5, 0, "LATC");
|
|
AddExState(&cmd, 1, 0, "CMD");
|
|
}
|
|
|
|
static int type;
|
|
static void S8259Synco(void)
|
|
{
|
|
int x;
|
|
setprg32(0x8000,latch[5]&7);
|
|
|
|
if(!UNIFchrrama) // No CHR RAM? Then BS'ing is ok.
|
|
{
|
|
for(x=0;x<4;x++)
|
|
{
|
|
int bank;
|
|
if(latch[7]&1)
|
|
bank=(latch[0]&0x7)|((latch[4]&7)<<3);
|
|
else
|
|
bank=(latch[x]&0x7)|((latch[4]&7)<<3);
|
|
switch (type)
|
|
{
|
|
case 00: bank=(bank<<1)|(x&1); setchr2(0x800*x,bank); break;
|
|
case 01: setchr2(0x800*x,bank); break;
|
|
case 02: bank=(bank<<2)|(x&3); setchr2(0x800*x,bank); break;
|
|
case 03: bank=latch[x]&7;
|
|
switch (x&3)
|
|
{
|
|
case 01: bank|=(latch[4]&1)<<4;break;
|
|
case 02: bank|=(latch[4]&2)<<3;break;
|
|
case 03: bank|=((latch[4]&4)<<2)|((latch[6]&1)<<3);break;
|
|
}
|
|
setchr1(0x400*x,bank);
|
|
setchr4(0x1000,~0);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
if(!(latch[7]&1))
|
|
S74LS374MSync(latch[7]>>1);
|
|
else
|
|
setmirror(MI_V);
|
|
}
|
|
|
|
static DECLFW(S8259Write)
|
|
{
|
|
A&=0x4101;
|
|
if(A==0x4100)
|
|
cmd=V;
|
|
else
|
|
{
|
|
latch[cmd&7]=V;
|
|
S8259Synco();
|
|
}
|
|
}
|
|
|
|
static void S8259Reset(void)
|
|
{
|
|
int x;
|
|
cmd=0;
|
|
|
|
for(x=0;x<8;x++) latch[x]=0;
|
|
setchr8(0);
|
|
|
|
S8259Synco();
|
|
SetReadHandler(0x8000,0xFFFF,CartBR);
|
|
SetWriteHandler(0x4100,0x7FFF,S8259Write);
|
|
}
|
|
|
|
static void S8259Restore(int version)
|
|
{
|
|
S8259Synco();
|
|
}
|
|
|
|
void S8259A_Init(CartInfo *info) // Kevin's Horton 141 mapper
|
|
{
|
|
info->Power=S8259Reset;
|
|
GameStateRestore=S8259Restore;
|
|
AddExState(latch, 8, 0, "LATC");
|
|
AddExState(&cmd, 1, 0, "CMD");
|
|
type=0;
|
|
}
|
|
|
|
void S8259B_Init(CartInfo *info) // Kevin's Horton 138 mapper
|
|
{
|
|
info->Power=S8259Reset;
|
|
GameStateRestore=S8259Restore;
|
|
AddExState(latch, 8, 0, "LATC");
|
|
AddExState(&cmd, 1, 0, "CMD");
|
|
type=1;
|
|
}
|
|
|
|
void S8259C_Init(CartInfo *info) // Kevin's Horton 139 mapper
|
|
{
|
|
info->Power=S8259Reset;
|
|
GameStateRestore=S8259Restore;
|
|
AddExState(latch, 8, 0, "LATC");
|
|
AddExState(&cmd, 1, 0, "CMD");
|
|
type=2;
|
|
}
|
|
|
|
void S8259D_Init(CartInfo *info) // Kevin's Horton 137 mapper
|
|
{
|
|
info->Power=S8259Reset;
|
|
GameStateRestore=S8259Restore;
|
|
AddExState(latch, 8, 0, "LATC");
|
|
AddExState(&cmd, 1, 0, "CMD");
|
|
type=3;
|
|
}
|
|
|
|
static void(*WSync)(void);
|
|
|
|
static DECLFW(SAWrite)
|
|
{
|
|
if(A&0x100)
|
|
{
|
|
latch[0]=V;
|
|
WSync();
|
|
}
|
|
}
|
|
|
|
static void SAPower(void)
|
|
{
|
|
latch[0]=0;
|
|
WSync();
|
|
SetReadHandler(0x8000,0xFFFF,CartBR);
|
|
SetWriteHandler(0x4100,0x5FFF,SAWrite);
|
|
}
|
|
|
|
static void SARestore(int version)
|
|
{
|
|
WSync();
|
|
}
|
|
|
|
static DECLFW(SADWrite)
|
|
{
|
|
latch[0]=V;
|
|
WSync();
|
|
}
|
|
|
|
static void SADPower(void)
|
|
{
|
|
latch[0]=0;
|
|
WSync();
|
|
SetReadHandler(0x8000,0xFFFF,CartBR);
|
|
SetWriteHandler(0x8000,0xFFFF,SADWrite);
|
|
}
|
|
|
|
static void SA0161MSynco()
|
|
{
|
|
setprg32(0x8000,(latch[0]>>3)&1);
|
|
setchr8(latch[0]&7);
|
|
}
|
|
|
|
static void SA72007Synco()
|
|
{
|
|
setprg32(0x8000,0);
|
|
setchr8(latch[0]>>7);
|
|
}
|
|
|
|
static void SA72008Synco()
|
|
{
|
|
setprg32(0x8000,(latch[0]>>2)&1);
|
|
setchr8(latch[0]&3);
|
|
}
|
|
|
|
void SA0161M_Init(CartInfo *info)
|
|
{
|
|
WSync=SA0161MSynco;
|
|
GameStateRestore=SARestore;
|
|
info->Power=SAPower;
|
|
AddExState(&latch[0], 1, 0, "LATC");
|
|
}
|
|
|
|
void SA72007_Init(CartInfo *info)
|
|
{
|
|
WSync=SA72007Synco;
|
|
GameStateRestore=SARestore;
|
|
info->Power=SAPower;
|
|
AddExState(&latch[0], 1, 0, "LATC");
|
|
}
|
|
|
|
void SA72008_Init(CartInfo *info)
|
|
{
|
|
WSync=SA72008Synco;
|
|
GameStateRestore=SARestore;
|
|
info->Power=SAPower;
|
|
AddExState(&latch[0], 1, 0, "LATC");
|
|
}
|
|
|
|
void SA0036_Init(CartInfo *info)
|
|
{
|
|
WSync=SA72007Synco;
|
|
GameStateRestore=SARestore;
|
|
info->Power=SADPower;
|
|
AddExState(&latch[0], 1, 0, "LATC");
|
|
}
|
|
|
|
void SA0037_Init(CartInfo *info)
|
|
{
|
|
WSync=SA0161MSynco;
|
|
GameStateRestore=SARestore;
|
|
info->Power=SADPower;
|
|
AddExState(&latch[0], 1, 0, "LATC");
|
|
}
|
|
|
|
static void TCU01Synco()
|
|
{
|
|
setprg32(0x8000,(latch[0]>>2)&1);
|
|
setchr8((latch[0]>>3)&0xF);
|
|
}
|
|
|
|
static DECLFW(TCWrite)
|
|
{
|
|
if((A&0x103)==0x102)
|
|
{
|
|
latch[0]=V;
|
|
TCU01Synco();
|
|
}
|
|
}
|
|
|
|
static void TCU01Reset(void)
|
|
{
|
|
latch[0]=0;
|
|
SetReadHandler(0x8000,0xFFFF,CartBR);
|
|
SetWriteHandler(0x4100,0xFFFF,TCWrite);
|
|
TCU01Synco();
|
|
}
|
|
|
|
static void TCU01Restore(int version)
|
|
{
|
|
TCU01Synco();
|
|
}
|
|
|
|
void TCU01_Init(CartInfo *info)
|
|
{
|
|
GameStateRestore=TCU01Restore;
|
|
info->Power=TCU01Reset;
|
|
AddExState(&latch[0], 1, 0, "LATC");
|
|
}
|
|
|
|
static DECLFR(TCA01Read)
|
|
{
|
|
uint8 ret;
|
|
if((A&0x4100)==0x4100)
|
|
ret=(X.DB&0xC0)|((~A)&0x3F);
|
|
else
|
|
ret=X.DB;
|
|
return ret;
|
|
}
|
|
|
|
static void TCA01Reset(void)
|
|
{
|
|
setprg16(0x8000,0);
|
|
setprg16(0xC000,1);
|
|
setchr8(0);
|
|
SetReadHandler(0x8000,0xFFFF,CartBR);
|
|
SetReadHandler(0x4100,0x5FFF,TCA01Read);
|
|
}
|
|
|
|
void TCA01_Init(CartInfo *info)
|
|
{
|
|
info->Power=TCA01Reset;
|
|
}
|
|
|