static void bankswitch(int data)
{
nDrvBank[0] = data;
int offs = 0x10000 + (data & 0x1e) * 0x1000;
M6809MapMemory(DrvM6809ROM + offs, 0x6000, 0x7fff, M6809_ROM);
}
static void DrvSetRAMBank(UINT8 bank, UINT8 data)
{
nDrvRomBank[1] = bank;
nDrvRomBank[2] = data;
if (data & 0x10) {
M6809MapMemory(DrvPalRAM, 0x0000, 0x07ff, M6809_RAM);
} else if (data & 0x20) {
if (bank & 0x80) {
M6809MapMemory(DrvPMCRAM, 0x0000, 0x07ff, M6809_RAM);
} else {
// unmap
M6809MapMemory(DrvM6809ROM + 0x800, 0x0000, 0x07ff, M6809_ROM);
M6809MapMemory(DrvM6809ROM + 0x000, 0x0000, 0x07ff, M6809_WRITE);
}
} else {
M6809MapMemory(DrvBankRAM, 0x0000, 0x07ff, M6809_RAM);
}
}
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;
}
