notwa/mm
1
0
Fork 0
mirror of https://github.com/notwa/mm synced 2024-11-04 20:09:03 -08:00
Code Issues Releases Wiki Activity

flag dumping

Browse source
This commit is contained in:
Connor Olding 2015-05-14 00:50:47 -07:00
parent 9dc97426c7
commit 391c51575c
2 changed files with 55 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
Lua/classes.lua
View file

@ -11,15 +11,24 @@ function Monitor:init(name, a)
self.dirty = false
end
function Monitor:diff()
function Monitor:read()
-- bizhawk has an off-by-one bug where this returns length + 1 bytes
local bytes = mainmemory.readbyterange(self.begin, self.len-1)
local raw = mainmemory.readbyterange(self.begin, self.len-1)
local bytes = {}
local begin = self.begin
for k, v in pairs(raw) do
bytes[k - begin] = v
end
return bytes
end
function Monitor:diff()
local bytes = self:read()
local old_bytes = self.old_bytes
if self.once then
for k, v in pairs(bytes) do
local i = k - self.begin
for i, v in pairs(bytes) do
local x = v
local x1 = old_bytes[k]
local x1 = old_bytes[i]
if x ~= x1 then
self:mark(i, x, x1)
end

48
Lua/event flag monitor.lua
View file

@ -53,10 +53,44 @@ function FlagMonitor:mark(i, x, x1)
end
end
function FlagMonitor:dump(current)
local t = current and self:read() or self.modified
local size = mm and 8 or 16
local rows = math.floor(self.len/size*8)
local buff = self.name..'\n'
buff = buff..' \t'
for col = size-1, 0, -1 do
buff = buff..('%X'):format(col)
if col % 4 == 0 then buff = buff..' ' end
end
for row = 0, rows-1 do
s = ('%02i\t'):format(row)
for col = size-1, 0, -1 do
local B, b = row, col
if size == 16 then
B = row*2 + (col < 8 and 1 or 0)
b = col % 8
end
local ib = B*8 + b
local v
if current then v = bit.band(t[B], 2^b) > 0 else v = t[ib] end
s = s..(v and '1' or '0')
if col % 4 == 0 then s = s..' ' end
end
buff = buff..'\n'..s
end
return buff
end
if mm then
local weg = FlagMonitor('weg', addrs.week_event_reg)
local inf = FlagMonitor('inf', addrs.event_inf)
local mmb = FlagMonitor('mmb', addrs.mask_mask_bit)
weg = FlagMonitor('weg', addrs.week_event_reg)
inf = FlagMonitor('inf', addrs.event_inf)
mmb = FlagMonitor('mmb', addrs.mask_mask_bit)
weg:load('data/_weg.lua')
inf:load('data/_inf.lua')
while mm do
@ -69,10 +103,10 @@ if mm then
emu.frameadvance()
end
elseif oot then
local eci = FlagMonitor('eci', AL(0xED4, 0x1C))
local igi = FlagMonitor('igi', AL(0xEF0, 0x8))
local it_ = FlagMonitor('it ', AL(0xEF8, 0x3C))
local ei_ = FlagMonitor('ei ', AL(0x13FA, 0x8))
eci = FlagMonitor('eci', AL(0xED4, 0x1C))
igi = FlagMonitor('igi', AL(0xEF0, 0x8))
it_ = FlagMonitor('it ', AL(0xEF8, 0x3C))
ei_ = FlagMonitor('ei ', AL(0x13FA, 0x8))
eci:load('data/_eci.lua')
igi:load('data/_igi.lua')
it_:load('data/_it.lua')