inline void toaplan1SynchroniseZ80(int nExtraCycles)
{
int nCycles = ((long long)SekTotalCycles() * nCyclesTotal[1] / nCyclesTotal[0]) + nExtraCycles;
if (nCycles <= ZetTotalCycles()) {
return;
}
nToa1Cycles68KSync = nCycles - nExtraCycles;
BurnTimerUpdateYM3812(nCycles);
}
void BurnTimerEndFrameYM3812(INT32 nCycles)
{
INT32 nTicks = MAKE_TIMER_TICKS(nCycles, nCPUClockspeed);
BurnTimerUpdateYM3812(nCycles);
if (nTimerCount[0] < MAX_TIMER_VALUE) {
nTimerCount[0] -= nTicks;
}
if (nTimerCount[1] < MAX_TIMER_VALUE) {
nTimerCount[1] -= nTicks;
}
nTicksDone -= nTicks;
if (nTicksDone < 0) {
// bprintf(PRINT_ERROR, _T(" -- ticks done -> %08X\n"), nTicksDone);
nTicksDone = 0;
}
}
static INT32 DrvFrame()
{
INT32 nInterleave = 4;
if (DrvReset) { // Reset machine
DrvDoReset();
}
// Compile digital inputs
DrvInput[0] = 0x00; // Buttons
DrvInput[1] = 0x00; // Player 1
DrvInput[4] = 0x00; // Player 2
for (INT32 i = 0; i < 8; i++) {
DrvInput[0] |= (DrvJoy1[i] & 1) << i;
DrvInput[1] |= (DrvJoy2[i] & 1) << i;
DrvInput[4] |= (DrvButton[i] & 1) << i;
}
ToaClearOpposites(&DrvInput[0]);
ToaClearOpposites(&DrvInput[1]);
SekNewFrame();
ZetNewFrame();
SekOpen(0);
ZetOpen(0);
SekIdle(nCyclesDone[0]);
ZetIdle(nCyclesDone[1]);
nCyclesTotal[0] = (INT32)((INT64)10000000 * nBurnCPUSpeedAdjust / (0x0100 * REFRESHRATE));
nCyclesTotal[1] = INT32(28000000.0 / 8 / REFRESHRATE);
SekSetCyclesScanline(nCyclesTotal[0] / 262);
nToaCyclesDisplayStart = nCyclesTotal[0] - ((nCyclesTotal[0] * (TOA_VBLANK_LINES + 240)) / 262);
nToaCyclesVBlankStart = nCyclesTotal[0] - ((nCyclesTotal[0] * TOA_VBLANK_LINES) / 262);
bVBlank = false;
for (INT32 i = 0; i < nInterleave; i++) {
INT32 nNext;
// Run 68000
nNext = (i + 1) * nCyclesTotal[0] / nInterleave;
// Trigger VBlank interrupt
if (nNext > nToaCyclesVBlankStart) {
if (SekTotalCycles() < nToaCyclesVBlankStart) {
nCyclesSegment = nToaCyclesVBlankStart - SekTotalCycles();
SekRun(nCyclesSegment);
}
if (pBurnDraw) {
DrvDraw(); // Draw screen if needed
}
ToaBufferFCU2Sprites();
bVBlank = true;
if (bEnableInterrupts) {
SekSetIRQLine(4, SEK_IRQSTATUS_AUTO);
}
}
nCyclesSegment = nNext - SekTotalCycles();
if (bVBlank || (!CheckSleep(0))) { // See if this CPU is busywaiting
SekRun(nCyclesSegment);
} else {
SekIdle(nCyclesSegment);
}
BurnTimerUpdateYM3812(i * (nCyclesTotal[1] / nInterleave));
}
nToa1Cycles68KSync = SekTotalCycles();
BurnTimerEndFrameYM3812(nCyclesTotal[1]);
if (pBurnSoundOut) BurnYM3812Update(pBurnSoundOut, nBurnSoundLen);
nCyclesDone[0] = SekTotalCycles() - nCyclesTotal[0];
nCyclesDone[1] = ZetTotalCycles() - nCyclesTotal[1];
// bprintf(PRINT_NORMAL, _T(" %i\n"), nCyclesDone[0]);
ZetClose();
SekClose();
// ToaBufferFCU2Sprites();
return 0;
}
static INT32 DrvFrame()
{
INT32 nInterleave = 4;
if (DrvReset) {
DrvDoReset();
}
memset (DrvInputs, 0, 3);
for (INT32 i = 0; i < 8; i++) {
DrvInputs[0] |= (DrvJoy1[i] & 1) << i;
DrvInputs[1] |= (DrvJoy2[i] & 1) << i;
DrvInputs[2] |= (DrvJoy3[i] & 1) << i;
}
ToaClearOpposites(&DrvInputs[0]);
ToaClearOpposites(&DrvInputs[1]);
SekNewFrame();
ZetNewFrame();
SekOpen(0);
ZetOpen(0);
SekIdle(nCyclesDone[0]);
ZetIdle(nCyclesDone[1]);
nCyclesTotal[0] = (INT32)((INT64)10000000 * nBurnCPUSpeedAdjust / (0x0100 * REFRESHRATE));
nCyclesTotal[1] = INT32(28000000.0 / 8 / REFRESHRATE);
SekSetCyclesScanline(nCyclesTotal[0] / 262);
nToaCyclesDisplayStart = nCyclesTotal[0] - ((nCyclesTotal[0] * (TOA_VBLANK_LINES + 240)) / 262);
nToaCyclesVBlankStart = nCyclesTotal[0] - ((nCyclesTotal[0] * TOA_VBLANK_LINES) / 262);
bVBlank = false;
for (INT32 i = 0; i < nInterleave; i++) {
INT32 nNext;
// Run 68000
nNext = (i + 1) * nCyclesTotal[0] / nInterleave;
// Trigger VBlank interrupt
if (nNext > nToaCyclesVBlankStart) {
if (SekTotalCycles() < nToaCyclesVBlankStart) {
nCyclesSegment = nToaCyclesVBlankStart - SekTotalCycles();
SekRun(nCyclesSegment);
}
if (pBurnDraw) {
DrvDraw();
}
memcpy (DrvSprBuf, DrvSprRAM, 0x1000);
bVBlank = true;
if (bEnableInterrupts) {
SekSetIRQLine(4, SEK_IRQSTATUS_AUTO);
}
}
nCyclesSegment = nNext - SekTotalCycles();
if (bVBlank || (!CheckSleep(0))) {
SekRun(nCyclesSegment);
} else {
SekIdle(nCyclesSegment);
}
BurnTimerUpdateYM3812(i * (nCyclesTotal[1] / nInterleave));
}
nToa1Cycles68KSync = SekTotalCycles();
BurnTimerEndFrameYM3812(nCyclesTotal[1]);
if (pBurnSoundOut) BurnYM3812Update(pBurnSoundOut, nBurnSoundLen);
nCyclesDone[0] = SekTotalCycles() - nCyclesTotal[0];
SekClose();
ZetClose();
return 0;
}