AxibugEmuOnline/AxibugEmuOnline.Client/Assets/VirtualNes.Core/Mapper/Mapper005.cs

848 lines
19 KiB
C#
Raw Normal View History

2024-08-05 23:16:39 +08:00
//////////////////////////////////////////////////////////////////////////
// Mapper005 Nintendo MMC5 //
//////////////////////////////////////////////////////////////////////////
using static VirtualNes.MMU;
using static VirtualNes.Core.CPU;
using INT = System.Int32;
using BYTE = System.Byte;
using Codice.CM.Client.Differences;
namespace VirtualNes.Core
{
public class Mapper005 : Mapper
{
BYTE sram_size;
BYTE prg_size; // $5100
BYTE chr_size; // $5101
BYTE sram_we_a, sram_we_b; // $5102-$5103
BYTE graphic_mode; // $5104
BYTE nametable_mode; // $5105
BYTE[] nametable_type = new byte[4]; // $5105 use
BYTE sram_page; // $5113
BYTE fill_chr, fill_pal; // $5106-$5107
BYTE split_control; // $5200
BYTE split_scroll; // $5201
BYTE split_page; // $5202
BYTE split_x;
ushort split_addr;
ushort split_yofs;
BYTE chr_type;
BYTE chr_mode; // $5120-$512B use
//BYTE chr_page[2][8];
BYTE[,] chr_page = new byte[2,8]; // $5120-$512B
LPBYTE BG_MEM_BANK[8]; // BGパターン用バンク
BYTE BG_MEM_PAGE[8];
BYTE irq_status; // $5204(R)
BYTE irq_enable; // $5204(W)
BYTE irq_line; // $5203
BYTE irq_scanline;
BYTE irq_clear; // HSyncで使用
BYTE irq_type;
BYTE mult_a, mult_b; // $5205-$5206
public Mapper005(NES parent) : base(parent) { }
public override void Reset()
{
INT i;
prg_size = 3;
chr_size = 3;
sram_we_a = 0x00;
sram_we_b = 0x00;
graphic_mode = 0;
nametable_mode = 0;
for (i = 0; i < 4; i++)
{
nametable_type[i] = 0;
}
fill_chr = fill_pal = 0;
split_control = split_scroll = split_page = 0;
irq_enable = 0;
irq_status = 0;
irq_scanline = 0;
irq_line = 0;
irq_clear = 0;
irq_type = 0;
mult_a = mult_b = 0;
chr_type = 0;
chr_mode = 0;
for (i = 0; i < 8; i++)
{
chr_page[0][i] = i;
chr_page[1][i] = 4 + (i & 0x03);
}
SetPROM_32K_Bank(PROM_8K_SIZE - 1, PROM_8K_SIZE - 1, PROM_8K_SIZE - 1, PROM_8K_SIZE - 1);
SetVROM_8K_Bank(0);
for (i = 0; i < 8; i++)
{
BG_MEM_BANK[i] = VROM + 0x0400 * i;
BG_MEM_PAGE[i] = i;
}
// SRAM設定
SetBank_SRAM(3, 0);
sram_size = 0;
nes.SetSAVERAM_SIZE(16 * 1024);
uint crc = nes.rom.GetPROM_CRC();
if (crc == 0x2b548d75 // Bandit Kings of Ancient China(U)
|| crc == 0xf4cd4998 // Dai Koukai Jidai(J)
|| crc == 0x8fa95456 // Ishin no Arashi(J)
|| crc == 0x98c8e090 // Nobunaga no Yabou - Sengoku Gunyuu Den(J)
|| crc == 0x8e9a5e2f // L'Empereur(Alt)(U)
|| crc == 0x57e3218b // L'Empereur(U)
|| crc == 0x2f50bd38 // L'Empereur(J)
|| crc == 0xb56958d1 // Nobunaga's Ambition 2(U)
|| crc == 0xe6c28c5f // Suikoden - Tenmei no Chikai(J)
|| crc == 0xcd35e2e9)
{ // Uncharted Waters(U)
sram_size = 1;
nes.SetSAVERAM_SIZE(32 * 1024);
}
else
if (crc == 0xf4120e58 // Aoki Ookami to Shiroki Mejika - Genchou Hishi(J)
|| crc == 0x286613d8 // Nobunaga no Yabou - Bushou Fuuun Roku(J)
|| crc == 0x11eaad26 // Romance of the Three Kingdoms 2(U)
|| crc == 0x95ba5733)
{ // Sangokushi 2(J)
sram_size = 2;
nes.SetSAVERAM_SIZE(64 * 1024);
}
if (crc == 0x95ca9ec7)
{ // Castlevania 3 - Dracula's Curse(U)
nes.SetRenderMethod(NES::TILE_RENDER);
}
if (crc == 0xcd9acf43)
{ // Metal Slader Glory(J)
irq_type = MMC5_IRQ_METAL;
}
if (crc == 0xe91548d8)
{ // Shin 4 Nin Uchi Mahjong - Yakuman Tengoku(J)
chr_type = 1;
}
nes.ppu.SetExtLatchMode(true);
nes.apu.SelectExSound(8);
}
//BYTE Mapper005::ReadLow(WORD addr)
public override byte ReadLow(ushort addr)
{
BYTE data = (BYTE)(addr >> 8);
switch (addr)
{
case 0x5015:
data = nes.apu.ExRead(addr);
break;
case 0x5204:
data = irq_status;
// irq_status = 0;
irq_status &= ~0x80;
nes.cpu.ClrIRQ(IRQ_MAPPER);
break;
case 0x5205:
data = mult_a * mult_b;
break;
case 0x5206:
data = (BYTE)(((WORD)mult_a * (WORD)mult_b) >> 8);
break;
}
if (addr >= 0x5C00 && addr <= 0x5FFF)
{
if (graphic_mode >= 2)
{ // ExRAM mode
data = VRAM[0x0800 + (addr & 0x3FF)];
}
}
else if (addr >= 0x6000 && addr <= 0x7FFF)
{
data = base.ReadLow(addr);
}
return data;
}
//void Mapper005::WriteLow(WORD addr, BYTE data)
public override void WriteLow(ushort addr, byte data)
{
INT i;
#if FALSE//0
if( addr >= 0x5000 && addr <=0x50FF ) {
DEBUGOUT( "$%04X=%02X C:%10d\n", addr, data, nes.cpu.GetTotalCycles() );
}
#endif
switch (addr)
{
case 0x5100:
prg_size = data & 0x03;
break;
case 0x5101:
chr_size = data & 0x03;
break;
case 0x5102:
sram_we_a = data & 0x03;
break;
case 0x5103:
sram_we_b = data & 0x03;
break;
case 0x5104:
graphic_mode = data & 0x03;
break;
case 0x5105:
nametable_mode = data;
for (i = 0; i < 4; i++)
{
nametable_type[i] = data & 0x03;
SetVRAM_1K_Bank(8 + i, nametable_type[i]);
data >>= 2;
}
break;
case 0x5106:
fill_chr = data;
break;
case 0x5107:
fill_pal = data & 0x03;
break;
case 0x5113:
SetBank_SRAM(3, data & 0x07);
break;
case 0x5114:
case 0x5115:
case 0x5116:
case 0x5117:
SetBank_CPU(addr, data);
break;
case 0x5120:
case 0x5121:
case 0x5122:
case 0x5123:
case 0x5124:
case 0x5125:
case 0x5126:
case 0x5127:
chr_mode = 0;
chr_page[0][addr & 0x07] = data;
SetBank_PPU();
break;
case 0x5128:
case 0x5129:
case 0x512A:
case 0x512B:
chr_mode = 1;
chr_page[1][(addr & 0x03) + 0] = data;
chr_page[1][(addr & 0x03) + 4] = data;
SetBank_PPU();
break;
case 0x5200:
split_control = data;
break;
case 0x5201:
split_scroll = data;
break;
case 0x5202:
split_page = data & 0x3F;
break;
case 0x5203:
irq_line = data;
nes.cpu.ClrIRQ(IRQ_MAPPER);
break;
case 0x5204:
irq_enable = data;
nes.cpu.ClrIRQ(IRQ_MAPPER);
break;
case 0x5205:
mult_a = data;
break;
case 0x5206:
mult_b = data;
break;
default:
if (addr >= 0x5000 && addr <= 0x5015)
{
nes.apu.ExWrite(addr, data);
}
else if (addr >= 0x5C00 && addr <= 0x5FFF)
{
if (graphic_mode == 2)
{ // ExRAM
VRAM[0x0800 + (addr & 0x3FF)] = data;
}
else if (graphic_mode != 3)
{ // Split,ExGraphic
if ((irq_status & 0x40)!=0)
{
VRAM[0x0800 + (addr & 0x3FF)] = data;
}
else
{
VRAM[0x0800 + (addr & 0x3FF)] = 0;
}
}
}
else if (addr >= 0x6000 && addr <= 0x7FFF)
{
if ((sram_we_a == 0x02) && (sram_we_b == 0x01))
{
if (CPU_MEM_TYPE[3] == BANKTYPE_RAM)
{
CPU_MEM_BANK[3][addr & 0x1FFF] = data;
}
}
}
break;
}
}
//void Mapper005::Write(WORD addr, BYTE data)
public override void Write(ushort addr, byte data)
{
if (sram_we_a == 0x02 && sram_we_b == 0x01)
{
if (addr >= 0x8000 && addr < 0xE000)
{
if (CPU_MEM_TYPE[addr >> 13] == BANKTYPE_RAM)
{
CPU_MEM_BANK[addr >> 13][addr & 0x1FFF] = data;
}
}
}
}
void SetBank_CPU(uint addr, BYTE data)
{
if ((data & 0x80)!=0)
{
// PROM Bank
switch (addr & 7)
{
case 4:
if (prg_size == 3)
{
SetPROM_8K_Bank(4, data & 0x7F);
}
break;
case 5:
if (prg_size == 1 || prg_size == 2)
{
SetPROM_16K_Bank(4, (data & 0x7F) >> 1);
}
else if (prg_size == 3)
{
SetPROM_8K_Bank(5, (data & 0x7F));
}
break;
case 6:
if (prg_size == 2 || prg_size == 3)
{
SetPROM_8K_Bank(6, (data & 0x7F));
}
break;
case 7:
if (prg_size == 0)
{
SetPROM_32K_Bank((data & 0x7F) >> 2);
}
else if (prg_size == 1)
{
SetPROM_16K_Bank(6, (data & 0x7F) >> 1);
}
else if (prg_size == 2 || prg_size == 3)
{
SetPROM_8K_Bank(7, (data & 0x7F));
}
break;
}
}
else
{
// WRAM Bank
switch (addr & 7)
{
case 4:
if (prg_size == 3)
{
SetBank_SRAM(4, data & 0x07);
}
break;
case 5:
if (prg_size == 1 || prg_size == 2)
{
SetBank_SRAM(4, (data & 0x06) + 0);
SetBank_SRAM(5, (data & 0x06) + 1);
}
else if (prg_size == 3)
{
SetBank_SRAM(5, data & 0x07);
}
break;
case 6:
if (prg_size == 2 || prg_size == 3)
{
SetBank_SRAM(6, data & 0x07);
}
break;
}
}
}
void SetBank_SRAM(BYTE page, BYTE data)
{
if (sram_size == 0) data = (byte)((data > 3) ? 8 : 0);
if (sram_size == 1) data = (byte)((data > 3) ? 1 : 0);
if (sram_size == 2) data = (byte)((data > 3) ? 8 : data);
if (sram_size == 3) data = (byte)((data > 3) ? 4 : data);
if (data != 8)
{
SetPROM_Bank(page, &WRAM[0x2000 * data], BANKTYPE_RAM);
CPU_MEM_PAGE[page] = data;
}
else
{
CPU_MEM_TYPE[page] = BANKTYPE_ROM;
}
}
void Mapper005::SetBank_PPU()
{
INT i;
if (chr_mode == 0)
{
// PPU SP Bank
switch (chr_size)
{
case 0:
SetVROM_8K_Bank(chr_page[0][7]);
break;
case 1:
SetVROM_4K_Bank(0, chr_page[0][3]);
SetVROM_4K_Bank(4, chr_page[0][7]);
break;
case 2:
SetVROM_2K_Bank(0, chr_page[0][1]);
SetVROM_2K_Bank(2, chr_page[0][3]);
SetVROM_2K_Bank(4, chr_page[0][5]);
SetVROM_2K_Bank(6, chr_page[0][7]);
break;
case 3:
SetVROM_8K_Bank(chr_page[0][0],
chr_page[0][1],
chr_page[0][2],
chr_page[0][3],
chr_page[0][4],
chr_page[0][5],
chr_page[0][6],
chr_page[0][7]);
break;
}
}
else if (chr_mode == 1)
{
// PPU BG Bank
switch (chr_size)
{
case 0:
for (i = 0; i < 8; i++)
{
BG_MEM_BANK[i] = VROM + 0x2000 * (chr_page[1][7] % VROM_8K_SIZE) + 0x0400 * i;
BG_MEM_PAGE[i] = (chr_page[1][7] % VROM_8K_SIZE) * 8 + i;
}
break;
case 1:
for (i = 0; i < 4; i++)
{
BG_MEM_BANK[i + 0] = VROM + 0x1000 * (chr_page[1][3] % VROM_4K_SIZE) + 0x0400 * i;
BG_MEM_BANK[i + 4] = VROM + 0x1000 * (chr_page[1][7] % VROM_4K_SIZE) + 0x0400 * i;
BG_MEM_PAGE[i + 0] = (chr_page[1][3] % VROM_4K_SIZE) * 4 + i;
BG_MEM_PAGE[i + 4] = (chr_page[1][7] % VROM_4K_SIZE) * 4 + i;
}
break;
case 2:
for (i = 0; i < 2; i++)
{
BG_MEM_BANK[i + 0] = VROM + 0x0800 * (chr_page[1][1] % VROM_2K_SIZE) + 0x0400 * i;
BG_MEM_BANK[i + 2] = VROM + 0x0800 * (chr_page[1][3] % VROM_2K_SIZE) + 0x0400 * i;
BG_MEM_BANK[i + 4] = VROM + 0x0800 * (chr_page[1][5] % VROM_2K_SIZE) + 0x0400 * i;
BG_MEM_BANK[i + 6] = VROM + 0x0800 * (chr_page[1][7] % VROM_2K_SIZE) + 0x0400 * i;
BG_MEM_PAGE[i + 0] = (chr_page[1][1] % VROM_2K_SIZE) * 2 + i;
BG_MEM_PAGE[i + 2] = (chr_page[1][3] % VROM_2K_SIZE) * 2 + i;
BG_MEM_PAGE[i + 4] = (chr_page[1][5] % VROM_2K_SIZE) * 2 + i;
BG_MEM_PAGE[i + 6] = (chr_page[1][7] % VROM_2K_SIZE) * 2 + i;
}
break;
case 3:
for (i = 0; i < 8; i++)
{
BG_MEM_BANK[i] = VROM + 0x0400 * (chr_page[1][i] % VROM_1K_SIZE);
BG_MEM_PAGE[i] = (chr_page[1][i] % VROM_1K_SIZE) + i;
}
break;
}
}
}
void Mapper005::HSync(INT scanline)
{
if (irq_type & MMC5_IRQ_METAL)
{
if (irq_scanline == irq_line)
{
irq_status |= 0x80;
}
}
// if( nes.ppu.IsDispON() && scanline < 239 ) {
if (nes.ppu.IsDispON() && scanline < 240)
{
irq_scanline++;
irq_status |= 0x40;
irq_clear = 0;
}
else if (irq_type & MMC5_IRQ_METAL)
{
irq_scanline = 0;
irq_status &= ~0x80;
irq_status &= ~0x40;
}
if (!(irq_type & MMC5_IRQ_METAL))
{
if (irq_scanline == irq_line)
{
irq_status |= 0x80;
}
if (++irq_clear > 2)
{
irq_scanline = 0;
irq_status &= ~0x80;
irq_status &= ~0x40;
nes.cpu.ClrIRQ(IRQ_MAPPER);
}
}
if ((irq_enable & 0x80) && (irq_status & 0x80) && (irq_status & 0x40))
{
nes.cpu.SetIRQ(IRQ_MAPPER);
/// nes.cpu.IRQ_NotPending();
#if 0
{
LPBYTE lpScn = nes.ppu.GetScreenPtr();
lpScn = lpScn+(256+16)*scanline;
for( INT i = 0; i < 256+16; i++ ) {
lpScn[i] = 22;
}
}
#endif
}
// For Split mode!
if (scanline == 0)
{
split_yofs = (ushort)(split_scroll & 0x07);
split_addr = (ushort)(((split_scroll & 0xF8) << 2));
}
else if (nes.ppu.IsDispON())
{
if (split_yofs == 7)
{
split_yofs = 0;
if ((split_addr & 0x03E0) == 0x03A0)
{
split_addr &= 0x001F;
}
else
{
if ((split_addr & 0x03E0) == 0x03E0)
{
split_addr &= 0x001F;
}
else
{
split_addr += 0x0020;
}
}
}
else
{
split_yofs++;
}
}
}
//void Mapper005::PPU_ExtLatchX(INT x)
public override void PPU_ExtLatchX(int x)
{
split_x = x;
}
//void Mapper005::PPU_ExtLatch(WORD addr, BYTE& chr_l, BYTE& chr_h, BYTE& attr )
public override void PPU_ExtLatch(ushort addr, ref byte chr_l, ref byte chr_h, ref byte attr)
{
ushort ntbladr, attradr, tileadr, tileofs;
ushort tile_yofs;
uint tilebank;
bool bSplit;
tile_yofs = nes.ppu.GetTILEY();
bSplit = FALSE;
if (split_control & 0x80)
{
if (!(split_control & 0x40))
{
// Left side
if ((split_control & 0x1F) > split_x)
{
bSplit = TRUE;
}
}
else
{
// Right side
if ((split_control & 0x1F) <= split_x)
{
bSplit = TRUE;
}
}
}
if (!bSplit)
{
if (nametable_type[(addr & 0x0C00) >> 10] == 3)
{
// Fill mode
if (graphic_mode == 1)
{
// ExGraphic mode
ntbladr = 0x2000 + (addr & 0x0FFF);
// Get Nametable
tileadr = fill_chr * 0x10 + tile_yofs;
// Get TileBank
tilebank = 0x1000 * ((VRAM[0x0800 + (ntbladr & 0x03FF)] & 0x3F) % VROM_4K_SIZE);
// Attribute
attr = (fill_pal << 2) & 0x0C;
// Get Pattern
chr_l = VROM[tilebank + tileadr];
chr_h = VROM[tilebank + tileadr + 8];
}
else
{
// Normal
tileofs = (PPUREG[0] & PPU_BGTBL_BIT) ? 0x1000 : 0x0000;
tileadr = tileofs + fill_chr * 0x10 + tile_yofs;
attr = (fill_pal << 2) & 0x0C;
// Get Pattern
if (chr_type)
{
chr_l = PPU_MEM_BANK[tileadr >> 10][tileadr & 0x03FF];
chr_h = PPU_MEM_BANK[tileadr >> 10][(tileadr & 0x03FF) + 8];
}
else
{
chr_l = BG_MEM_BANK[tileadr >> 10][tileadr & 0x03FF];
chr_h = BG_MEM_BANK[tileadr >> 10][(tileadr & 0x03FF) + 8];
}
}
}
else if (graphic_mode == 1)
{
// ExGraphic mode
ntbladr = 0x2000 + (addr & 0x0FFF);
// Get Nametable
tileadr = (WORD)PPU_MEM_BANK[ntbladr >> 10][ntbladr & 0x03FF] * 0x10 + tile_yofs;
// Get TileBank
tilebank = 0x1000 * ((VRAM[0x0800 + (ntbladr & 0x03FF)] & 0x3F) % VROM_4K_SIZE);
// Get Attribute
attr = (VRAM[0x0800 + (ntbladr & 0x03FF)] & 0xC0) >> 4;
// Get Pattern
chr_l = VROM[tilebank + tileadr];
chr_h = VROM[tilebank + tileadr + 8];
}
else
{
// Normal or ExVRAM
tileofs = (PPUREG[0] & PPU_BGTBL_BIT) ? 0x1000 : 0x0000;
ntbladr = 0x2000 + (addr & 0x0FFF);
attradr = 0x23C0 + (addr & 0x0C00) + ((addr & 0x0380) >> 4) + ((addr & 0x001C) >> 2);
// Get Nametable
tileadr = tileofs + PPU_MEM_BANK[ntbladr >> 10][ntbladr & 0x03FF] * 0x10 + tile_yofs;
// Get Attribute
attr = PPU_MEM_BANK[attradr >> 10][attradr & 0x03FF];
if (ntbladr & 0x0002) attr >>= 2;
if (ntbladr & 0x0040) attr >>= 4;
attr = (attr & 0x03) << 2;
// Get Pattern
if (chr_type)
{
chr_l = PPU_MEM_BANK[tileadr >> 10][tileadr & 0x03FF];
chr_h = PPU_MEM_BANK[tileadr >> 10][(tileadr & 0x03FF) + 8];
}
else
{
chr_l = BG_MEM_BANK[tileadr >> 10][tileadr & 0x03FF];
chr_h = BG_MEM_BANK[tileadr >> 10][(tileadr & 0x03FF) + 8];
}
}
}
else
{
ntbladr = ((split_addr & 0x03E0) | (split_x & 0x1F)) & 0x03FF;
// Get Split TileBank
tilebank = 0x1000 * ((INT)split_page % VROM_4K_SIZE);
tileadr = (ushort)VRAM[0x0800 + ntbladr] * 0x10 + split_yofs;
// Get Attribute
attradr = 0x03C0 + ((ntbladr & 0x0380) >> 4) + ((ntbladr & 0x001C) >> 2);
attr = VRAM[0x0800 + attradr];
if (ntbladr & 0x0002) attr >>= 2;
if (ntbladr & 0x0040) attr >>= 4;
attr = (attr & 0x03) << 2;
// Get Pattern
chr_l = VROM[tilebank + tileadr];
chr_h = VROM[tilebank + tileadr + 8];
}
}
//void Mapper005::SaveState(LPBYTE p)
public override void SaveState(byte[] p)
{
p[0] = prg_size;
p[1] = chr_size;
p[2] = sram_we_a;
p[3] = sram_we_b;
p[4] = graphic_mode;
p[5] = nametable_mode;
p[6] = nametable_type[0];
p[7] = nametable_type[1];
p[8] = nametable_type[2];
p[9] = nametable_type[3];
p[10] = sram_page;
p[11] = fill_chr;
p[12] = fill_pal;
p[13] = split_control;
p[14] = split_scroll;
p[15] = split_page;
p[16] = chr_mode;
p[17] = irq_status;
p[18] = irq_enable;
p[19] = irq_line;
p[20] = irq_scanline;
p[21] = irq_clear;
p[22] = mult_a;
p[23] = mult_b;
INT i, j;
for (j = 0; j < 2; j++)
{
for (i = 0; i < 8; i++)
{
p[24 + j * 8 + i] = chr_page[j][i];
}
}
// for( i = 0; i < 8; i++ ) {
// p[40+i] = BG_MEM_PAGE[i];
// }
}
//void Mapper005::LoadState(LPBYTE p)
public override void LoadState(byte[] p)
{
prg_size = p[0];
chr_size = p[1];
sram_we_a = p[2];
sram_we_b = p[3];
graphic_mode = p[4];
nametable_mode = p[5];
nametable_type[0] = p[6];
nametable_type[1] = p[7];
nametable_type[2] = p[8];
nametable_type[3] = p[9];
sram_page = p[10];
fill_chr = p[11];
fill_pal = p[12];
split_control = p[13];
split_scroll = p[14];
split_page = p[15];
chr_mode = p[16];
irq_status = p[17];
irq_enable = p[18];
irq_line = p[19];
irq_scanline = p[20];
irq_clear = p[21];
mult_a = p[22];
mult_b = p[23];
INT i, j;
for (j = 0; j < 2; j++)
{
for (i = 0; i < 8; i++)
{
chr_page[j][i] = p[24 + j * 8 + i];
}
}
// // BGバンクの再設定処理
// for( i = 0; i < 8; i++ ) {
// BG_MEM_PAGE[i] = p[40+i]%VROM_1K_SIZE;
// }
// for( i = 0; i < 8; i++ ) {
// BG_MEM_BANK[i] = VROM+0x0400*BG_MEM_PAGE[i];
// }
SetBank_PPU();
}
public override bool IsStateSave()
{
return true;
}
}
}