folkert/KEK
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

MTPI/MTPD fix

Browse source
This commit is contained in:
folkert van heusden 2022-03-21 20:42:06 +01:00
parent f764c01947
commit a4648d8434
1 changed files with 9 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
cpu.cpp
View file

@ -867,18 +867,23 @@ bool cpu::single_operand_instructions(const uint16_t instr)
} }
case 0b00110110: { // MTPI/MTPD case 0b00110110: { // MTPI/MTPD
// FIXME // always words: word_mode-bit is to select between MTPI and MTPD
uint16_t a = getGAMAddress(dst_mode, dst_reg, word_mode, false);
// calculate address in '13/12'-address-space
uint16_t a = getGAMAddress(dst_mode, dst_reg, false, true);
// retrieve word from '15/14'-stack
uint16_t v = popStack(); uint16_t v = popStack();
setPSW_n(word_mode ? v & 0x80 : v & 0x8000); setPSW_n(word_mode ? v & 0x80 : v & 0x8000);
setPSW_z(v == 0); setPSW_z(v == 0);
setPSW_v(false); setPSW_v(false);
fprintf(stderr, "MTP%c: address %06o, value %06o\n", word_mode ? 'D' : 'I', a, v);
if (dst_mode == 0) if (dst_mode == 0)
putGAM(dst_mode, dst_reg, word_mode, v, true); putGAM(dst_mode, dst_reg, false, v, false); // ???
else else
b -> write(a, word_mode, v); // ? b -> write(a, false, v);
break; break;
} }