I'm making the encodes and writing the rest of the text now. Please wait.
Also:
while true do
-- Determine whether or not in field
if memory.readbyte(0x0300608E) ~= 0 and memory.readbyte(0x0300608E) < 10 then
-- General Info
gui.text(0, 0, "Health:"..memory.readbyte(0x030037F0))
gui.text(0, 8, "Bubble Charge:"..memory.readwordunsigned(0x03002F06))
-- The player
local p = memory.readbyteunsigned(0x03006DC0)
local px = memory.readwordunsigned(0x03003784)+16
local py = memory.readwordunsigned(0x03003788)+16
local char = {
[1] = "Patrick",
[9] = "Patrick",
[13] = "Patrick",
[17] = "Patrick",
[25] = "Patrick",
[29] = "Patrick",
[33] = "Patrick",
[41] = "Patrick",
[45] = "Patrick",
[49] = "Patrick",
[57] = "Patrick",
[61] = "Patrick",
[65] = "Patrick",
[73] = "Patrick",
[77] = "Patrick",
[129] = "Patrick",
[145] = "Patrick",
[161] = "Patrick",
[177] = "Patrick",
[193] = "Patrick",
[2] = "Sandy",
[6] = "Sandy",
[14] = "Sandy",
[18] = "Sandy",
[22] = "Sandy",
[30] = "Sandy",
[34] = "Sandy",
[38] = "Sandy",
[46] = "Sandy",
[50] = "Sandy",
[54] = "Sandy",
[62] = "Sandy",
[66] = "Sandy",
[70] = "Sandy",
[78] = "Sandy",
[130] = "Sandy",
[146] = "Sandy",
[162] = "Sandy",
[178] = "Sandy",
[194] = "Sandy",
[3] = "Mr.Krabs",
[7] = "Mr.Krabs",
[11] = "Mr.Krabs",
[19] = "Mr.Krabs",
[23] = "Mr.Krabs",
[27] = "Mr.Krabs",
[35] = "Mr.Krabs",
[39] = "Mr.Krabs",
[43] = "Mr.Krabs",
[51] = "Mr.Krabs",
[55] = "Mr.Krabs",
[59] = "Mr.Krabs",
[67] = "Mr.Krabs",
[71] = "Mr.Krabs",
[75] = "Mr.Krabs",
[131] = "Mr.Krabs",
[147] = "Mr.Krabs",
[163] = "Mr.Krabs",
[179] = "Mr.Krabs",
[195] = "Mr.Krabs",
[4] = "Spongebob",
[8] = "Spongebob",
[12] = "Spongebob",
[20] = "Spongebob",
[24] = "Spongebob",
[28] = "Spongebob",
[36] = "Spongebob",
[40] = "Spongebob",
[44] = "Spongebob",
[52] = "Spongebob",
[56] = "Spongebob",
[60] = "Spongebob",
[68] = "Spongebob",
[72] = "Spongebob",
[76] = "Spongebob",
[132] = "Spongebob",
[136] = "Spongebob",
[140] = "Spongebob",
[148] = "Spongebob",
[152] = "Spongebob",
[156] = "Spongebob",
[164] = "Spongebob",
[168] = "Spongebob",
[172] = "Spongebob",
[180] = "Spongebob",
[184] = "Spongebob",
[188] = "Spongebob",
[196] = "Spongebob",
[200] = "Spongebob",
[204] = "Spongebob"
}
gui.text(px+4, py-7, p .."("..memory.readbyte(0x030037F0)..")")
gui.text(0, 16, "Character: "..char[p] .." (" ..p ..")")
gui.text(0, 16, p)
gui.text(px, py, "X:"..memory.readdwordsigned(0x030037D4))
gui.text(px, py+7, "Y:"..memory.readdwordsigned(0x030037D8))
gui.text(memory.readdwordsigned(0x03003950),memory.readdwordsigned(0x03003954),"P")
--The enemies (mostly based on MUGG's Wario land 2 script :P)
for i = 0x03005608, 0x03005928, 160 do
if memory.readbytesigned(i) ~= 0 and memory.readbytesigned(i+4) ~= -1 then
local id = memory.readbytesigned(i)
local x = memory.readwordunsigned(i+88)
local y = memory.readwordunsigned(i+92)
gui.text(x+9, y, id .."("..memory.readbyte(i+7)..")")
gui.text(x, y+7, "X:"..memory.readdwordsigned(i+36))
gui.text(x, y+14, "Y:"..memory.readdwordsigned(i+40))
end
end
--The interactable objects (platforms, falling rocks, etc)
for i = 0x030038D0, 0x030042C8, 116 do
local id = memory.readbytesigned(i+111)
local x = memory.readdwordsigned(i+12)
local y = memory.readdwordsigned(i+16)
gui.text(x, y, id .."("..memory.readbyte(i+106)..")")
gui.text(x, y+7, "X:"..memory.readdwordsigned(i+84))
gui.text(x, y+14, "Y:"..memory.readdwordsigned(i+88))
end
--The pickups
for i = 0x03006094, 0x030062D8, 116 do
if memory.readdwordsigned(i+24) ~= 0 then
local id = memory.readbytesigned(i+26)
local x = memory.readdwordsigned(i+44)
local y = memory.readdwordsigned(i+48)
gui.text(x, y, id .."("..memory.readbyte(i+24)..")")
gui.text(x, y+7, "X:"..memory.readdwordsigned(i))
gui.text(x, y+14, "Y:"..memory.readdwordsigned(i+4))
end
end
end
vba.frameadvance()
end
Edit: It's late at night atm, so I'll update the post tomorrow morning.