public static function opcode31(Core $core)
{
$carry_flag = $core->FCarry ? 0x80 : 0;
$core->FCarry = ($core->registerA & 1) == 1;
$core->registerA = ($core->registerA >> 1) + $carry_flag;
$core->FZero = $core->FSubtract = $core->FHalfCarry = false;
}