while true do

--Modify this to move around box
z = 32
p = 0

--HUD
gui.opacity(0.65)
gui.drawbox(110+z,17+p,240+z,40+p, "black")
gui.opacity(0.85)
gui.text(130+z,18+p,"Pos   Speed", "Yellow")
gui.text(116+z,25+p,"X")
gui.text(116+z,32+p,"Y")

----Addresses
--xpos
gui.text(130+z,25+p, memory.readword(0x03003fd0))
--ypos
gui.text(130+z,32+p, memory.readword(0x03003fd4))
--xspd
gui.text(156+z,25+p, memory.readbytesigned(0x03003fa9))
--yspd
gui.text(156+z,32+p, memory.readbytesigned(0x03003fad))

vba.frameadvance()
end