while true do

-- gui hud
gui.opacity(0.70)
gui.drawbox(60,3,230,36,"#00008b", "#dcdcdc")


-- Weapon
weapon = memory.readbyte(0x0200c1b6)
if weapon == 0 then gui.text(65,21, "[Standard gun]")
elseif weapon == 1 then gui.text(65,21, "[Slime gun]", "#7fff00")
elseif weapon == 2 then gui.text(65,21, "[Flame thrower]", "#ffa500")
elseif weapon == 3 then gui.text(65,21, "[Ice gun]", "#00ffff")
elseif weapon == 4 then gui.text(65,21, "[Laser shotgun]", "#ff00ff")
elseif weapon == 5 then gui.text(65,21, "[Laser beam]", "#ff4500")
elseif weapon == 6 then gui.text(65,21, "[Multi gun]", "#ffff00")
elseif weapon == 7 then gui.text(65,21, "[Light ball]", "yellow")
else gui.text(64,20, "unknown weapon") end

-- Position, speed
gui.text(140,5, "X-Pos: " ..memory.readbyte(0x03000cfc))
gui.text(140,13, "Y-Pos: " ..memory.readbyte(0x03000cfe))
 gui.text(190,5, "(defect)")
 gui.text(190,13, "(defect)")

gui.text(140,20, "X-Speed: " ..memory.readbytesigned(0x03000449))



-- Boss HP (addresses are variable) (FBI truck has 40 HP)
-- TODO: Implement Boss HP display
-- gui.text(140,28, "FBI truck: " ..memory.readbytesigned(0x02012350))


vba.frameadvance()
end