static INT32 DrvDraw()
{
KorokoroPaletteUpdate(); // Update the palette
CaveClearScreen(CavePalette[0x3F00]);
CaveSpriteBuffer();
if (bDrawScreen) {
CaveTileRender(1); // Render tiles
}
return 0;
}
void __fastcall korokoroWriteWord(UINT32 sekAddress, UINT16 wordValue)
{
switch (sekAddress) {
case 0x140000:
CaveTileReg[0][0] = wordValue;
break;
case 0x140002:
CaveTileReg[0][1] = wordValue;
break;
case 0x140004:
CaveTileReg[0][2] = wordValue;
break;
case 0x1c0000:
case 0x300000:
nCaveXOffset = wordValue;
return;
case 0x1c0002:
case 0x300002:
nCaveYOffset = wordValue;
return;
case 0x1c0008:
case 0x300008:
CaveSpriteBuffer();
nCaveSpriteBank = wordValue;
return;
case 0x240000:
YMZ280BSelectRegister(wordValue & 0xff);
break;
case 0x240002:
YMZ280BWriteRegister(wordValue & 0xff);
break;
case 0x280008:
return;
case 0x28000a: {
wordValue >>= 8;
korokoro_hopper = wordValue & 0x01;
EEPROMWrite(wordValue & 0x20, wordValue & 0x10, wordValue & 0x40);
break;
}
// default:
// bprintf(PRINT_NORMAL, "Attempt to write word value %x to location %x\n", wordValue, sekAddress);
}
}
void __fastcall donpachiWriteWord(unsigned int sekAddress, unsigned short wordValue)
{
switch (sekAddress) {
case 0x600000:
CaveTileReg[1][0] = wordValue;
break;
case 0x600002:
CaveTileReg[1][1] = wordValue;
break;
case 0x600004:
CaveTileReg[1][2] = wordValue;
break;
case 0x700000:
CaveTileReg[0][0] = wordValue;
break;
case 0x700002:
CaveTileReg[0][1] = wordValue;
break;
case 0x700004:
CaveTileReg[0][2] = wordValue;
break;
case 0x800000:
CaveTileReg[2][0] = wordValue;
break;
case 0x800002:
CaveTileReg[2][1] = wordValue;
break;
case 0x800004:
CaveTileReg[2][2] = wordValue;
break;
case 0x900000:
nCaveXOffset = wordValue;
return;
case 0x900002:
nCaveYOffset = wordValue;
return;
case 0x900008:
CaveSpriteBuffer();
nCaveSpriteBank = wordValue;
return;
case 0xB00000:
case 0xB00002:
MSM6295Command(0, wordValue);
break;
case 0xB00010:
case 0xB00012:
MSM6295Command(1, wordValue);
break;
case 0xB00020:
case 0xB00021:
case 0xB00022:
case 0xB00023:
case 0xB00024:
case 0xB00025:
case 0xB00026:
case 0xB00027:
case 0xB00028:
case 0xB00029:
case 0xB0002A:
case 0xB0002B:
case 0xB0002C:
case 0xB0002D:
case 0xB0002E:
case 0xB0002F: {
int nBank = (sekAddress >> 1) & 3;
int nChip = (sekAddress >> 3) & 1;
int nAddress = wordValue << 16;
while (nAddress > nBankSize[nChip]) {
nAddress -= nBankSize[nChip];
}
if (nChip == 1) {
MSM6295SampleData[1][nBank] = MSM6295ROM + nAddress;
MSM6295SampleInfo[1][nBank] = MSM6295ROM + nAddress + (nBank << 8);
} else {
MSM6295SampleData[0][nBank] = MSM6295ROM + 0x100000 + nAddress;
if (nBank == 0) {
MSM6295SampleInfo[0][0] = MSM6295ROM + 0x100000 + nAddress + 0x0000;
MSM6295SampleInfo[0][1] = MSM6295ROM + 0x100000 + nAddress + 0x0100;
MSM6295SampleInfo[0][2] = MSM6295ROM + 0x100000 + nAddress + 0x0200;
MSM6295SampleInfo[0][3] = MSM6295ROM + 0x100000 + nAddress + 0x0300;
}
}
break;
}
case 0xD00000:
wordValue >>= 8;
EEPROMWrite(wordValue & 0x04, wordValue & 0x02, wordValue & 0x08);
break;
default: {
// bprintf(PRINT_NORMAL, "Attempt to write word value %x to location %x\n", wordValue, sekAddress);
}
}
}
void __fastcall hotdogstWriteWord(UINT32 sekAddress, UINT16 wordValue)
{
switch (sekAddress) {
case 0xa80000:
nCaveXOffset = wordValue;
return;
case 0xa80002:
nCaveYOffset = wordValue;
return;
case 0xa80008:
CaveSpriteBuffer();
nCaveSpriteBank = wordValue;
return;
case 0xa8006e: {
DrvSoundLatch = wordValue;
ZetNmi();
return;
}
case 0xb00000:
CaveTileReg[0][0] = wordValue;
break;
case 0xb00002:
CaveTileReg[0][1] = wordValue;
break;
case 0xb00004:
CaveTileReg[0][2] = wordValue;
break;
case 0xb80000:
CaveTileReg[1][0] = wordValue;
break;
case 0xb80002:
CaveTileReg[1][1] = wordValue;
break;
case 0xb80004:
CaveTileReg[1][2] = wordValue;
break;
case 0xc00000:
CaveTileReg[2][0] = wordValue;
break;
case 0xc00002:
CaveTileReg[2][1] = wordValue;
break;
case 0xc00004:
CaveTileReg[2][2] = wordValue;
break;
case 0xd00000:
if (~wordValue & 0x0100) {
wordValue >>= 8;
EEPROMWrite(wordValue & 0x04, wordValue & 0x02, wordValue & 0x08);
break;
}
case 0xd00002: {
//nop
return;
}
default: {
bprintf(PRINT_NORMAL, _T("Attempt to write word value %x to location %x\n"), wordValue, sekAddress);
}
}
void __fastcall ddonpachWriteWord(UINT32 sekAddress, UINT16 wordValue)
{
switch (sekAddress) {
case 0x300000:
YMZ280BSelectRegister(wordValue);
return;
case 0x300002:
YMZ280BWriteRegister(wordValue);
return;
case 0x800000:
nCaveXOffset = wordValue;
return;
case 0x800002:
nCaveYOffset = wordValue;
return;
case 0x800008:
CaveSpriteBuffer();
nCaveSpriteBank = wordValue;
return;
case 0x900000:
CaveTileReg[0][0] = wordValue;
return;
case 0x900002:
CaveTileReg[0][1] = wordValue;
return;
case 0x900004:
CaveTileReg[0][2] = wordValue;
return;
case 0xA00000:
CaveTileReg[1][0] = wordValue;
return;
case 0xA00002:
CaveTileReg[1][1] = wordValue;
return;
case 0xA00004:
CaveTileReg[1][2] = wordValue;
return;
case 0xB00000:
CaveTileReg[2][0] = wordValue;
return;
case 0xB00002:
CaveTileReg[2][1] = wordValue;
return;
case 0xB00004:
CaveTileReg[2][2] = wordValue;
return;
case 0xE00000:
wordValue >>= 8;
EEPROMWrite(wordValue & 0x04, wordValue & 0x02, wordValue & 0x08);
return;
default: {
// bprintf(PRINT_NORMAL, "Attempt to write word value %x to location %x\n", wordValue, sekAddress);
}
}
}
void __fastcall metmqstrWriteWord(UINT32 sekAddress, UINT16 wordValue)
{
if (sekAddress >= 0xa8000a && sekAddress <= 0xa80068) return;
if (sekAddress >= 0xa8006a && sekAddress <= 0xa8006c) return;
if (sekAddress >= 0xa80004 && sekAddress <= 0xa80006) return;
switch (sekAddress) {
case 0xa80000:
nCaveXOffset = wordValue;
return;
case 0xa80002:
nCaveYOffset = wordValue;
return;
case 0xa80008:
CaveSpriteBuffer();
nCaveSpriteBank = wordValue;
return;
case 0xa8006E:
SoundLatch = wordValue;
SoundLatchStatus |= 0x0C;
ZetNmi();
nCyclesDone[1] += ZetRun(0x0400);
return;
case 0xb00000:
CaveTileReg[2][0] = wordValue;
break;
case 0xb00002:
CaveTileReg[2][1] = wordValue;
break;
case 0xb00004:
CaveTileReg[2][2] = wordValue;
break;
case 0xb80000:
CaveTileReg[1][0] = wordValue;
break;
case 0xb80002:
CaveTileReg[1][1] = wordValue;
break;
case 0xb80004:
CaveTileReg[1][2] = wordValue;
break;
case 0xc00000:
CaveTileReg[0][0] = wordValue;
break;
case 0xc00002:
CaveTileReg[0][1] = wordValue;
break;
case 0xc00004:
CaveTileReg[0][2] = wordValue;
break;
case 0xd00000:
if (~wordValue & 0x0100) {
wordValue >>= 8;
EEPROMWrite(wordValue & 0x04, wordValue & 0x02, wordValue & 0x08);
break;
}
default: {
bprintf(PRINT_NORMAL, _T("Attempt to write word value %x to location %x\n"), wordValue, sekAddress);
}
}
