我终于达到了我的 6502 仿真器通过了 AllSuiteA.asm 中的所有测试的地步,但我的仿真器无法模拟增强型基本版,我以 C000 美元的价格加载了它。发生的情况是 PC 缓慢攀升至 $C03E,然后 JSR 攀升至 $C892。之后,它稳步上升到 $C908,在那里它再次 JSR 到 $E0ED,然后 JMP 间接到 $0。
尽管 AllSuiteA 说我的模拟器很好,为什么增强型基本无限循环?
以下是相关功能:
操作码:
JSR:
case "JSR":
var t = pc + 1;
memory[0x0100 + sp] = (t & 0xFF00) >> 8;
sp--;
memory[0x0100 + sp] = t & 0x00FF;
sp--;
pc = address - opcode[2];
break;
JMP:
case "JMP":
pc = address - opcode[2];
break;
寻址模式:
IND:
case "IND":
var b1 = memory[pc + 1];
var b2 = memory[pc + 2];
var mem = (b2 << 8) | b1;
var bb1 = memory[mem];
var bb2 = memory[mem + 1];
address = (bb2 << 8) | bb1;
break;
ABS:
case "ABS":
var b1 = memory[pc + 1];
var b2 = memory[pc + 2];
address = (b2 << 8) | b1;
break;
注意:opcode[2] 是正在执行的操作码的字节数
这是正在运行的程序的 JSFiddle。 此小提琴中包含 ehbasic.bin 的十六进制表示。