bsnes/higan/processor/v30mz/instructions-adjust.cpp

//27  daa
//2f  das
auto V30MZ::opDecimalAdjust(bool negate) {
  wait(9);
  uint8 al = r.al;
  if(r.f.h || ((al & 0x0f) > 0x09)) {
    r.al += negate ? -0x06 : 0x06;
    r.f.h = 1;
  }
  if(r.f.c || (al > 0x99)) {
    r.al += negate ? -0x06 : 0x60;
    r.f.c = 1;
  }
  r.f.s = r.al & 0x80;
  r.f.z = r.al == 0;
  r.f.p = parity(r.al);
}

//37  aaa
//3f  aas
auto V30MZ::opAsciiAdjust(bool negate) {
  wait(8);
  if(r.f.h || ((r.al & 0x0f) > 0x09)) {
    r.al += negate ? -0x06 : 0x06;
    r.ah += negate ? -0x01 : 0x01;
    r.f.h = 1;
    r.f.c = 1;
  } else {
    r.f.h = 0;
    r.f.c = 0;
  }
  r.al &= 0x0f;
}

//d4  aam,immb
auto V30MZ::opAdjustAfterMultiply() {
  wait(16);
  auto imm = fetch();
  if(imm == 0) return interrupt(0);
  r.ah = r.al / imm;
  r.al %= imm;
  r.f.p = parity(r.al);
  r.f.s = r.ax & 0x8000;
  r.f.z = r.ax == 0;
}

//d5  aad,immw
auto V30MZ::opAdjustAfterDivide() {
  wait(5);
  auto imm = fetch();
  r.al += r.ah * imm;
  r.ah = 0;
  r.f.p = parity(r.al);
  r.f.s = r.ax & 0x8000;
  r.f.z = r.ax == 0;
}