Memory viewer

--Lua script by FractalFusion
--http://tasvideos.org/

--Starting address
--Recommended to end in 0
local address=0x7E0A00

--Number of rows displayed (each row has 16=0x10 bytes)
local rows=20

--Keys to move around memory.
--First key = forward by 256=0x100 bytes.
--Second key = backward by 256=0x100 bytes.
local key={"8", "7"}

--not very useful
local xfix=0
local yfix=0

local c
local i,j

prev=input.get()
while true do
 tabl=input.get()

 if tabl[key[1]] and not prev[key[1]] then
 address=address+0x100
 end

 if tabl[key[2]] and not prev[key[2]] then
 address=address-0x100
 end
--gui.text(0,0,"test","#FFFF00FF")

 prev=tabl

gui.text(xfix,yfix+12, string.sub(bit.tohex(address),3,5), "#FFFF00FF")

for j=0,15,1 do
 gui.text(xfix+15+j*15, yfix+12,string.sub(bit.tohex(j),8,8),"#FFFF00FF")
end

for i=0,rows-1,1 do
gui.text(xfix,yfix+20+i*8,string.sub(bit.tohex(address+16*i),6,8),"#FFFF00FF")
 for j=0,15,1 do
  gui.text(xfix+15+j*15,yfix+20+i*8,memory.readbyte(address+16*i+j))

 end
end

emu.frameadvance()
end