ShuriZma
/
BizHawk
mirror of https://github.com/TASEmulators/BizHawk.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Accuracy improvement to z80 

properly set interrupt enable after the NEXT instruction
This commit is contained in:
alyosha-tas 2016-11-03 20:50:47 -04:00 committed by GitHub
parent b2920834b1
commit 3fa2828d5b
2 changed files with 18 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
BizHawk.Emulation.Cores/CPUs/Z80/Execute.cs
View File

@ -14,6 +14,8 @@ namespace BizHawk.Emulation.Cores.Components.Z80
private int pendingCycles;
public int PendingCycles { get { return pendingCycles; } set { pendingCycles = value; } }
private int EI_pending;
public bool Debug;
public Action<TraceInfo> Logger;
@ -35,7 +37,8 @@ namespace BizHawk.Emulation.Cores.Components.Z80
while (pendingCycles > 0)
{
Interruptable = true;
//if (interrupt == true)
//Console.WriteLine(totalExecutedCycles);
if (halted)
{
@ -6629,7 +6632,7 @@ namespace BizHawk.Emulation.Cores.Components.Z80
totalExecutedCycles += 10; pendingCycles -= 10;
break;
case 0xFB: // EI
IFF1 = IFF2 = true;
EI_pending = 2;
Interruptable = false;
totalExecutedCycles += 4; pendingCycles -= 4;
break;
@ -8011,7 +8014,7 @@ namespace BizHawk.Emulation.Cores.Components.Z80
totalExecutedCycles += 10; pendingCycles -= 10;
break;
case 0xFB: // EI
IFF1 = IFF2 = true;
EI_pending = 2;
Interruptable = false;
totalExecutedCycles += 4; pendingCycles -= 4;
break;
@ -11857,7 +11860,7 @@ namespace BizHawk.Emulation.Cores.Components.Z80
totalExecutedCycles += 10; pendingCycles -= 10;
break;
case 0xFB: // EI
IFF1 = IFF2 = true;
EI_pending = 2;
Interruptable = false;
totalExecutedCycles += 4; pendingCycles -= 4;
break;
@ -11944,6 +11947,16 @@ namespace BizHawk.Emulation.Cores.Components.Z80
}
IRQCallback();
}
//EI (enable interrupts) actually takes effect after the NEXT instruction
if (EI_pending > 0)
{
EI_pending--;
if (EI_pending == 0)
{
IFF1 = IFF2 = true;
}
}
}
}

1
BizHawk.Emulation.Cores/CPUs/Z80/Z80A.cs
View File

@ -132,6 +132,7 @@ namespace BizHawk.Emulation.Cores.Components.Z80
ser.Sync("Halted", ref halted);
ser.Sync("ExecutedCycles", ref totalExecutedCycles);
ser.Sync("PendingCycles", ref pendingCycles);
ser.Sync("EI_pending", ref EI_pending);
ser.EndSection();
}
}