O2Hawk: DAA work, might still be wrongfor some cases.

2019-12-31 21:46:59 -05:00 · 2019-12-31 21:46:59 -05:00 · edefd123d5
parent 8548859a67
commit edefd123d5
1 changed files with 8 additions and 5 deletions
--- a/BizHawk.Emulation.Cores/CPUs/Intel8048/Operations.cs
+++ b/BizHawk.Emulation.Cores/CPUs/Intel8048/Operations.cs
@ -35,6 +35,12 @@ namespace BizHawk.Emulation.Common.Components.I8048

 			ushort ans = (ushort)(Reg16_d & 0xFF);

+			// redo for aux carry flag
+			Reg16_d = Regs[dest] & 0xF;
+			Reg16_d += (Regs[src] & 0xF);
+
+			FlagAC = Reg16_d.Bit(4);
+
 			Regs[dest] = ans;
 		}

@ -122,15 +128,12 @@ namespace BizHawk.Emulation.Common.Components.I8048
 				a += 0x60;
 			}

+			// FlagAC is not reset, nor is FlagC reset
 			if (a > 0xFF)
 			{
 				FlagC = true;
 			}
-			else
-			{
-				FlagC = false;
-			}
-			
+
 			Regs[src] = (byte)a;
 		}
 	}