Специалист: эмуляция

[CityAceE]

Сегодня произвёл серьёзный рефакторинг код, выделив все повторяющиеся части всех логических и арифметических операций в отдельные функции в ущерб и так никакой производительности скрипта. Несколько раз самым внимательным образом сравнил собственную эмуляцию с эталонным эмулятором. Но ALUOP NN, как и прежде, выдаёт ошибку. Даже не знаю в какую сторону копать. Наверное просто глаз замылился и я что-то упускаю.

Ну вот, например, так сейчас у меня выглядит эмуляция команды ORI на Python:

def or_a(reg):
    global reg_a, flag_p, flag_h, flag_c, flag_z, flag_s
    reg_a |= reg
    flag_s = bool(reg_a & 0b10000000)
    flag_z = not reg_a
    flag_h = False
    flag_p = parity[reg_a]
    flag_c = False
    fflag_n(False)
    fflag_3(bool(reg_a & 0b00001000))
    fflag_5(bool(reg_a & 0b00100000))
    return

def b11110110():  # OR A,d
global pc, ticks
    or_a(read_mem(inc_pc()))
    pc = inc_pc2()
    ticks += 7
return

А вот для сравнения как эмуляция той же команды выглядит в эталонном эмуляторе на С:

#define ORA(val) \
{                                               \
    A |= (val);                                 \
    S_FLAG = ((A & 0x80) != 0);                 \
    Z_FLAG = (A == 0);                          \
    CLR(H_FLAG);                                \
    P_FLAG = PARITY(A);                         \
    CLR(C_FLAG);                                \
}


        case 0xF6:            /* ori data8 */
            cpu_cycles = 7;
            work8 = RD_BYTE(PC++);
            ORA(work8);
        break;

Как видите, на выходе получилось практически идентично. И всё равно тест проваливается.

[Advertiser]

[ivagor]

fflag_n(False) fflag_3(bool(reg_a & 0b00001000)) fflag_5(bool(reg_a & 0b00100000))

Для 100% эмуляции 8080 это надо менять. Биты 5 и 3 всегда 0, бит 1 - всегда 1.

[CityAceE]

Для 100% эмуляции 8080 это надо менять. Биты 5 и 3 всегда 0, бит 1 - всегда 1.

Это я учёл, поэтому у меня так:

def fflag_3(flag):
    global flag_3
    if not i8080:
        flag_3 = flag


def fflag_5(flag):
    global flag_5
    if not i8080:
        flag_5 = flag


def fflag_n(flag):
    global flag_n
    if not i8080:
        flag_n = flag

[ivagor]

Если я правильно понимаю, что здесь написано

fflag_n(False)

def fflag_n(flag): global flag_n if not i8080: flag_n = flag

то бит 1 регистра флагов обнуляется, а д.б. всегда 1.

[CityAceE]

При инициализации этому флагу присваивается True и, если это i8080 (а не Z80), то этот флаг у меня больше нигде не трогается. Этот момент я проверял, когда искал потенциальные ошибки.