hd6120: IAC also complements LINK on carry out

This commit is contained in:
AJR 2021-10-11 17:13:37 -04:00
parent 0f04623ade
commit c4e8f00006

View File

@ -664,7 +664,13 @@ void hd6120_device::execute_run()
case minor_state::OP1_1:
m_pc = m_temp & 07777;
m_temp = ((BIT(m_ir, 7) ? 0 : m_ac) ^ (BIT(m_ir, 5) ? 07777 : 0)) + (m_ir & 0001);
m_temp = (BIT(m_ir, 7) ? 0 : m_ac) ^ (BIT(m_ir, 5) ? 07777 : 0);
if (BIT(m_ir, 0))
{
++m_temp;
if (m_temp >= 010000)
m_flags ^= 4; // LINK is complemented upon carry out
}
m_state = minor_state::OP1_2;
break;