60 lines
1.3 KiB
Lua
Executable File
60 lines
1.3 KiB
Lua
Executable File
#!/usr/bin/env lua5.3
|
|
|
|
require 'std.strict'
|
|
require 'lib' ("..")
|
|
local _6502 = require '6502'
|
|
|
|
local cpu = _6502:new()
|
|
|
|
local inspect = require "inspect"
|
|
|
|
local running = true
|
|
local mmu = { ram = {} }
|
|
local mmu_metatable = { __index = function(t, key)
|
|
return t.ram[key] or 0
|
|
end,
|
|
__newindex = function(t, k, v)
|
|
if (k == 0x200 and v ~= nil) then
|
|
if (v == 240) then
|
|
print("All tests successful!")
|
|
running = false
|
|
-- os.exit(0)
|
|
else
|
|
print(string.format("Start test %d", v))
|
|
end
|
|
end
|
|
t.ram[k] = v
|
|
end,
|
|
}
|
|
|
|
setmetatable(mmu, mmu_metatable)
|
|
cpu.ram = mmu
|
|
|
|
cpu:init()
|
|
cpu:rst()
|
|
|
|
local f = assert(io.open("6502_functional_test.bin", "rb") or
|
|
io.open("tests/6502_functional_test.bin", "rb"))
|
|
|
|
local data = f:read("*a")
|
|
assert(#data == 65536)
|
|
|
|
local i = 0
|
|
while (i < #data) do
|
|
cpu:writemem(i, data:byte(i+1))
|
|
i = i + 1
|
|
end
|
|
|
|
cpu.pc = 0x400
|
|
while (running) do
|
|
local o = cpu:readmem(cpu.pc)
|
|
-- print(string.format("Executing opcode %s [0x%X]", cpu.opname[cpu.opcodes[o][1]], o))
|
|
local cc = cpu:step()
|
|
-- print(string.format("%d OP $%.2X #%d 0x%.2X X 0x%.2X Y 0x%.2X A 0x%.2X SP 0x%.2X S 0x%.2X",
|
|
-- cpu.cycles, cpu:readmem(cpu.pc), cpu:readmem(0x200),
|
|
-- cpu.pc, cpu.X, cpu.Y, cpu.A, cpu.sp, cpu.F))
|
|
|
|
end
|
|
|
|
|