void RenegadeWriteByte(unsigned short Address, unsigned char Data)
{
switch (Address) {
case 0x3800: {
DrvScrollX[0] = Data;
return;
}
case 0x3801: {
DrvScrollX[1] = Data;
return;
}
case 0x3802: {
DrvSoundLatch = Data;
M6809Open(0);
M6809SetIRQ(M6809_IRQ_LINE, M6809_IRQSTATUS_AUTO);
M6809Close();
return;
}
case 0x3803: {
// flipscreen
return;
}
case 0x3804: {
mcu_w(Data);
return;
}
case 0x3805: {
DrvRomBank = Data & 1;
m6502MapMemory(DrvM6502Rom + 0x8000 + (DrvRomBank * 0x4000), 0x4000, 0x7fff, M6502_ROM);
return;
}
case 0x3806: {
// nop
return;
}
case 0x3807: {
// coin counter
return;
}
default: {
bprintf(PRINT_NORMAL, _T("M6502 Write Byte %04X, %02X\n"), Address, Data);
}
}
}
static int DrvDoReset()
{
DrvReset = 0;
memset (AllRam, 0, RamEnd - AllRam);
M6809Open(0);
M6809Reset();
M6809Close();
ZetOpen(0);
ZetReset();
ZetClose();
BurnYM2203Reset();
return 0;
}
static int DrvDoReset()
{
m6502Open(0);
m6502Reset();
m6502Close();
M6809Open(0);
M6809Reset();
M6809Close();
BurnYM3526Reset();
DrvRomBank = 0;
DrvVBlank = 0;
memset(DrvScrollX, 0, 2);
DrvSoundLatch = 0;
return 0;
}
static void cpu_close()
{
switch (nCpuType)
{
case 1:
SekClose();
break;
case 2:
VezClose();
break;
case 3:
Sh2Close();
break;
case 4:
M6502Close();
break;
case 5:
ZetClose();
break;
case 6:
M6809Close();
break;
case 7:
HD6309Close();
break;
case 8:
break;
case 9:
s2650Close();
break;
}
}
static int DrvFrame()
{
if (DrvReset) {
DrvDoReset();
}
ZetNewFrame();
{
memset (DrvInputs, 0xff, 3);
for (int i = 0; i < 8; i++) {
DrvInputs[0] ^= (DrvJoy1[i] & 1) << i;
DrvInputs[1] ^= (DrvJoy2[i] & 1) << i;
DrvInputs[2] ^= (DrvJoy3[i] & 1) << i;
}
// Clear opposites
if ((DrvInputs[1] & 0x03) == 0) DrvInputs[1] |= 0x03;
if ((DrvInputs[1] & 0x0c) == 0) DrvInputs[1] |= 0x0c;
if ((DrvInputs[2] & 0x03) == 0) DrvInputs[1] |= 0x03;
if ((DrvInputs[2] & 0x0c) == 0) DrvInputs[1] |= 0x0c;
}
int nInterleave = 100;
int nSoundBufferPos = 0;
int nCyclesTotal[2] = { 3072000 / 60, 3072000 / 60 };
M6809Open(0);
ZetOpen(0);
for (int i = 0; i < nInterleave; i++) {
M6809Run(nCyclesTotal[0] / nInterleave);
BurnTimerUpdate(i * (nCyclesTotal[1] / nInterleave));
if (pBurnSoundOut) {
int nSegmentLength = nBurnSoundLen - nSoundBufferPos;
short* pSoundBuf = pBurnSoundOut + (nSoundBufferPos << 1);
BurnYM2203Update(pSoundBuf, nSegmentLength);
nSoundBufferPos += nSegmentLength;
}
}
BurnTimerEndFrame(nCyclesTotal[1]);
if (*irq_enable) M6809SetIRQ(0, M6809_IRQSTATUS_AUTO);
if (pBurnSoundOut) {
int nSegmentLength = nBurnSoundLen - nSoundBufferPos;
short* pSoundBuf = pBurnSoundOut + (nSoundBufferPos << 1);
if (nSegmentLength) {
BurnYM2203Update(pSoundBuf, nSegmentLength);
}
}
ZetClose();
M6809Close();
if (pBurnDraw) {
DrvDraw();
}
return 0;
}
static int DrvInit()
{
AllMem = NULL;
MemIndex();
int nLen = MemEnd - (unsigned char *)0;
if ((AllMem = (unsigned char *)malloc(nLen)) == NULL) return 1;
memset(AllMem, 0, nLen);
MemIndex();
{
if (BurnLoadRom(DrvM6809ROM + 0x08000, 0, 1)) return 1;
memcpy (DrvM6809ROM + 0x4000, DrvM6809ROM + 0xc000, 0x4000);
if (BurnLoadRom(DrvM6809ROM + 0x0c000, 1, 1)) return 1;
if (BurnLoadRom(DrvZ80ROM + 0x00000, 2, 1)) return 1;
if (BurnLoadRom(DrvGfxROM0 + 0x00000, 3, 1)) return 1;
if (BurnLoadRom(DrvGfxROM1 + 0x00000, 4, 1)) return 1;
if (BurnLoadRom(DrvGfxROM1 + 0x08000, 5, 1)) return 1;
if (BurnLoadRom(DrvColPROM + 0x00000, 6, 1)) return 1;
if (BurnLoadRom(DrvColPROM + 0x00100, 7, 1)) return 1;
if (BurnLoadRom(DrvColPROM + 0x00200, 8, 1)) return 1;
if (BurnLoadRom(DrvColPROM + 0x00300, 9, 1)) return 1;
if (BurnLoadRom(DrvColPROM + 0x00400, 10, 1)) return 1;
DrvPaletteInit();
DrvGfxDecode();
}
M6809Init(1);
M6809Open(0);
M6809MapMemory(DrvColRAM, 0x0000, 0x07ff, M6809_RAM);
M6809MapMemory(DrvVidRAM, 0x0800, 0x0fff, M6809_RAM);
M6809MapMemory(DrvSprRAM, 0x1000, 0x1fff, M6809_RAM);
M6809MapMemory(DrvM6809ROM + 0x04000, 0x4000, 0xffff, M6809_ROM);
M6809SetWriteByteHandler(scotrsht_main_write);
M6809SetReadByteHandler(scotrsht_main_read);
M6809Close();
ZetInit(1);
ZetOpen(0);
ZetMapArea(0x0000, 0x3fff, 0, DrvZ80ROM);
ZetMapArea(0x0000, 0x3fff, 2, DrvZ80ROM);
ZetMapArea(0x4000, 0x43ff, 0, DrvZ80RAM);
ZetMapArea(0x4000, 0x43ff, 1, DrvZ80RAM);
ZetMapArea(0x4000, 0x43ff, 2, DrvZ80RAM);
ZetSetReadHandler(scotrsht_sound_read);
ZetSetOutHandler(scotrsht_sound_out);
ZetSetInHandler(scotrsht_sound_in);
ZetMemEnd();
ZetClose();
BurnYM2203Init(1, 3072000, NULL, DrvSynchroniseStream, DrvGetTime, 0);
BurnTimerAttachZet(3072000);
DrvDoReset();
GenericTilesInit();
return 0;
}
static int DrvInit(int nMcuType)
{
int nRet = 0, nLen;
// Allocate and Blank all required memory
Mem = NULL;
MemIndex();
nLen = MemEnd - (unsigned char *)0;
if ((Mem = (unsigned char *)malloc(nLen)) == NULL) return 1;
memset(Mem, 0, nLen);
MemIndex();
DrvTempRom = (unsigned char *)malloc(0x60000);
// Load M6502 Program Roms
nRet = BurnLoadRom(DrvM6502Rom + 0x00000, 0, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvM6502Rom + 0x08000, 1, 1); if (nRet != 0) return 1;
// Load M6809 Program Roms
nRet = BurnLoadRom(DrvM6809Rom + 0x00000, 2, 1); if (nRet != 0) return 1;
// Load and decode the chars
nRet = BurnLoadRom(DrvTempRom, 3, 1); if (nRet != 0) return 1;
GfxDecode(0x400, 3, 8, 8, CharPlaneOffsets, CharXOffsets, CharYOffsets, 0x100, DrvTempRom, DrvChars);
// Load and decode the tiles
memset(DrvTempRom, 0, 0x60000);
nRet = BurnLoadRom(DrvTempRom + 0x00000, 4, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x08000, 5, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x10000, 6, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x18000, 7, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x20000, 8, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x28000, 9, 1); if (nRet != 0) return 1;
GfxDecode(0x100, 3, 16, 16, Tile1PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x00000, DrvTiles + (0x000 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile2PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x00000, DrvTiles + (0x100 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile3PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x00000, DrvTiles + (0x200 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile4PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x00000, DrvTiles + (0x300 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile1PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x18000, DrvTiles + (0x400 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile2PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x18000, DrvTiles + (0x500 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile3PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x18000, DrvTiles + (0x600 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile4PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x18000, DrvTiles + (0x700 * 16 * 16));
// Load and decode the sprites
memset(DrvTempRom, 0, 0x60000);
nRet = BurnLoadRom(DrvTempRom + 0x00000, 10, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x08000, 11, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x10000, 12, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x18000, 13, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x20000, 14, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x28000, 15, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x30000, 16, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x38000, 17, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x40000, 18, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x48000, 19, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x50000, 20, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvTempRom + 0x58000, 21, 1); if (nRet != 0) return 1;
GfxDecode(0x100, 3, 16, 16, Tile1PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x00000, DrvSprites + (0x000 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile2PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x00000, DrvSprites + (0x100 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile3PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x00000, DrvSprites + (0x200 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile4PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x00000, DrvSprites + (0x300 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile1PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x18000, DrvSprites + (0x400 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile2PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x18000, DrvSprites + (0x500 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile3PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x18000, DrvSprites + (0x600 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile4PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x18000, DrvSprites + (0x700 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile1PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x30000, DrvSprites + (0x800 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile2PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x30000, DrvSprites + (0x900 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile3PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x30000, DrvSprites + (0xa00 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile4PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x30000, DrvSprites + (0xb00 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile1PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x48000, DrvSprites + (0xc00 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile2PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x48000, DrvSprites + (0xd00 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile3PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x48000, DrvSprites + (0xe00 * 16 * 16));
GfxDecode(0x100, 3, 16, 16, Tile4PlaneOffsets, TileXOffsets, TileYOffsets, 0x200, DrvTempRom + 0x48000, DrvSprites + (0xf00 * 16 * 16));
// Load ADPCM Roms
nRet = BurnLoadRom(DrvADPCMRom + 0x00000, 22, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvADPCMRom + 0x10000, 23, 1); if (nRet != 0) return 1;
nRet = BurnLoadRom(DrvADPCMRom + 0x18000, 24, 1); if (nRet != 0) return 1;
free(DrvTempRom);
// Setup the M6502 emulation
m6502Init(1);
m6502Open(0);
m6502MapMemory(DrvM6502Ram , 0x0000, 0x17ff, M6502_RAM);
m6502MapMemory(DrvVideoRam2 , 0x1800, 0x1fff, M6502_RAM);
m6502MapMemory(DrvSpriteRam , 0x2000, 0x27ff, M6502_RAM);
m6502MapMemory(DrvVideoRam1 , 0x2800, 0x2fff, M6502_RAM);
m6502MapMemory(DrvPaletteRam1 , 0x3000, 0x30ff, M6502_RAM);
m6502MapMemory(DrvPaletteRam2 , 0x3100, 0x31ff, M6502_RAM);
m6502MapMemory(DrvM6502Rom + 0x8000 , 0x4000, 0x7fff, M6502_ROM);
m6502MapMemory(DrvM6502Rom , 0x8000, 0xffff, M6502_ROM);
m6502SetReadHandler(RenegadeReadByte);
m6502SetWriteHandler(RenegadeWriteByte);
m6502Close();
// Setup the M6809 emulation
M6809Init(1);
M6809Open(0);
M6809MapMemory(DrvM6809Ram , 0x0000, 0x0fff, M6809_RAM);
M6809MapMemory(DrvM6809Rom , 0x8000, 0xffff, M6809_ROM);
M6809SetReadByteHandler(RenegadeM6809ReadByte);
M6809SetWriteByteHandler(RenegadeM6809WriteByte);
M6809Close();
if (nMcuType == MCU_TYPE_RENEGADE) {
mcu_type = 0xda;
mcu_encrypt_table = renegade_xor_table;
mcu_encrypt_table_len = 0x37;
}
if (nMcuType == MCU_TYPE_KUNIOKUN) {
mcu_type = 0x85;
mcu_encrypt_table = kuniokun_xor_table;
mcu_encrypt_table_len = 0x2a;
}
BurnYM3526Init(3000000, &DrvFMIRQHandler, &DrvSynchroniseStream, 1);
BurnTimerAttachM6809YM3526(1500000);
RenegadeADPCMInit(8000);
GenericTilesInit();
// Reset the driver
DrvDoReset();
return 0;
}
