HUD by Revoltz v0.3

-- [[ General Info HUD by RevoltZ v0.3 ]]

-- [[ Settings ]]
local RaphaelLibrary = false

-- [[ Botting Status by PV! ]]
local showBotting = true

-- [[ Position ]]
local showPosition = false

-- [[ Supplies Counter ]]
local showSupplies = true
local item1 = {name = "Strong Mana Potion", buy = 1200, min = 100}
local item2 = {name = "Onyx Arrow", buy = 1400, min = 100}
local item3 = {name = "Assassin Star", buy = 50, min = 0}
local items = {item1, item2, item3}

-- [[ Supplies Wasted ]]
local showSuppliesWasted = true
local suppliesitems = {'strong mana potion'}
local suppsvalue = {80}

-- [[ Items looted ]]
local showLoots = true
local lootitems = {"Gold Coin", "Platinum Coin", "Strong Health Potion", "Strong Mana Potion", "Great Health Potion", "Great Mana Potion", "Spiked Iron Ball", "Cursed Shoulder Spikes", "Corrupted Flag", "Lizard Scale", "Small Diamond", "Dragon Priest's Wandtip", "Tower Shield", "Lizard Leather", "Scale of Corruption", "Zaoan Shoes", "Zaoan Legs", "Zaoan Armor", "Zaoan Helmet", "High Guard Shoulderplates", "High Guard Flag", "Small Emerald", "Life Ring", "Small Amethyst", "Wand of Inferno", "Terra Rod", "Yellow Gem", "Zaoan Robe", "Focus Cape"}
local lootsvalue = {1, 100, 0, 0, 0, 0, 100, 320, 700, 120, 300, 175, 8000, 150, 680, 5000, 14000, 14000, 45000, 130, 550, 250, 400, 200, 3000, 2000, 1000, 12000, 6000}

local myname = true -- DO NOT DISABLE, make your char stop healing :P

local fontsize = 10
local fontspacing = fontsize+2

-- [[ ENGINE ]] -- do not change it below

local cont = 0
local x = 5
local y = 0
local z = 0
local totals = 0
local totall = 0
local total = 0
local sub = 17

if clientwin.x ~= nil or clientwin.y ~= nil then
   setposition(clientwin.x+13, clientwin.y+30)
else
   setposition(5, 20)
end

setfontstyle("Tahoma", fontsize, "white")
-- [[ Botting ]]
if showBotting then
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   setfontcolor("yellow")
   y = y + 10
   addtext('             [ Botting ]', 15, y)
   y = y + 10
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   y = y + 10
   addtext('Exp Per Hour', x, y)
   addtext('- ' .. exphour, 120, y)
   y = y + 15
   addtext('Exp Left', x, y)
   addtext('- ' .. exptolevel(), 120, y)
   y = y + 15
   addtext('Exp Gained', x, y)
   addtext('- ' .. expgained, 120, y)
   y = y + 15
   addtext('Time To Next Level', x, y)
   addtext('- ' .. timetolevel, 120, y)
   y = y + 15
   addtext('Stamina', x, y)
   addtext('- ', 120, y)
   if stamina >= 2400 then
      setfontcolor("green")
   else if stamina < 2400 and (stamina > 840) then
         setfontcolor("orange")
      else if stamina <= 840 then
         setfontcolor("red")
         end
      end
   end
   if RaphaelLibrary then
      addtext(time(stamina), 130, y)
   else
      addtext(stamina, 130, y)
   end
   y = y + 15
   setfontcolor("white")
   addtext('Time Played', x, y)
   addtext('- ' .. timehunt, 120, y)
   y = y + 15
   addtext('Cavebot', x, y)
   addtext('- ', 120, y)
   if cavebot then
      setfontcolor("green")
      addtext('ON', 130, y)
   else
      setfontcolor("red")
      addtext('OFF', 130, y)
   end
   y = y + 15
   setfontcolor("white")
   addtext('- ', 120, y)
   addtext('Targeting', x, y)
   if targeting then
      setfontcolor("green")
      addtext('ON', 130, y)
   else
      setfontcolor("red")
      addtext('OFF', 130, y)
   end
   y = y + 15
   setfontcolor("white")
   addtext('Looting', x, y)
   addtext('- ', 120, y)
   if looting then
      setfontcolor("green")
      addtext('ON', 130, y)
   else
      setfontcolor("red")
      addtext('OFF', 130, y)
   end
   y = y + 15
   setfontcolor("white")
   addtext('Walk Through', x, y)
   addtext('- ', 120, y)
   if getsettings("Settings/CaveBot/Pathfinding/WalkThroughPlayers") == 'yes' then
      setfontcolor("green")
      addtext('ON', 130, y)
   elseif getsettings("Settings/CaveBot/Pathfinding/WalkThroughPlayers") == 'no' then
      setfontcolor("red")
      addtext('OFF', 130, y)
   else
      setfontcolor("yellow")
      addtext('???', 130, y)
   end
   y = y + 15
   setfontcolor("white")
   addtext('Balance', x, y)
   addtext('- ', 120, y)
   if balance == -1 then
      addtext('?', 130, y)
   else
      addtext(balance, 130, y)
   end
   y = y + 10
end

-- [[ Position ]]

if showPosition then
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   setfontcolor("yellow")
   y = y + 10
   addtext('            [ Position ]', 15, y)
   y = y + 10
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   y = y + 10
   addtext("Position X ", x, y)
   addtext("- "..posx, 120, y)
   y = y + 15
   addtext("Position Y ", x, y)
   addtext("- "..posy, 120, y)
   y = y + 15
   addtext("Position Z ", x, y)
   addtext("- "..posz, 120, y)
   y = y + 15
   addtext("Cursor ID", x, y)
   addtext('- '..cursorinfo().id, 120, y)
   y = y + 10
end

-- [[ Supplies ]]

if showSupplies then
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   setfontcolor("yellow")
   y = y + 10
   addtext('            [ Supplies ]', 15, y)
   y = y + 10
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   y = y + 10
   for i, j in pairs(items) do
      if itemid(items[i].name) == ammo then
         cont = itemcount(items[i].name) + ammoamount
      elseif itemid(items[i].name) == weapon then
         cont = itemcount(items[i].name) + weaponamount
      else
         cont = itemcount(items[i].name)
      end
      addtext(items[i].name, x, y)
      addtext('-', 120, y)
      if cont <= items[i].min then
         setfontcolor("red")
      elseif cont <= (items[i].buy/2) then
         setfontcolor("yellow")
      elseif cont < items[i].buy then
         setfontcolor("white")
      else
         setfontcolor("green")
      end
      if itemid(items[i].name) == ammo then
         addtext(cont, 130, y)
      elseif itemid(items[i].name) == weapon then
         addtext(cont, 130, y)
      else
         addtext(cont, 130, y)
      end
      setfontcolor("white")
      y = y + 15
   end
   y = y - 5
end

-- [[ Supplies Wasted ]]

if showSuppliesWasted then
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   y = y + 10
   setfontcolor("yellow")
   addtext('       [ Supplies wasted ]', 15, y)
   y = y + 10
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   y = y + 10
   local supps = getitems(unpack(suppliesitems))
   local qtds = supps.count-1
   for i=0,qtds do
      if string.len(supps[i].name) > 17 then
         addtext(string.sub((supps[i].name), 1, sub).."...", x, y)
      else
         addtext(supps[i].name, x, y)
      end
      addtext("- "..supps[i].usage.." ("..(math.floor(supps[i].usage*suppsvalue[i+1] / 100)/10).."k)", 120, y)
      totals = totals + supps[i].usage*suppsvalue[i+1]
      y = y + 15
   end
   addtext("Total", x, y)
   addtext("-", 120, y)
   addtext(totals.." GPs", 130, y)
   y = y + 10
end

-- [[ Loots ]]

if showLoots then
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   setfontcolor("yellow")
   y = y + 10
   addtext('         [ Items looted ]', 15, y)
   y = y + 10
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   y = y + 10
   local loots = getitems(unpack(lootitems))
   local qtdl = loots.count-1
   for i=0,qtdl do
      if loots[i].loot > 0 then
         if string.len(loots[i].name) > 17 then
            addtext(string.sub(loots[i].name, 1, sub).."..", x, y)
         else
            addtext(loots[i].name, x, y)
         end
         addtext("- "..loots[i].loot.." ("..(math.floor(loots[i].loot*lootsvalue[i+1] / 100)/10).."k)", 120, y)
         totall = totall + loots[i].loot*lootsvalue[i+1]
         y = y + 15
      end
   end
   addtext("Total", x, y)
   addtext("-", 120, y)
   addtext(totall.." GPs", 130, y)
   y = y + 10
end

if showSuppliesWasted and showLoots then
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
   y = y + 10
   total = totall - totals
   if totall-totals > 0 then
      setfontcolor("green")
      addtext("PROFIT:", x, y)
   else
      setfontcolor("red")
      addtext("WASTE:", x, y)
   end
   setfontcolor("white")
   addtext(total.." GPs ("..(math.floor((total/(tosec(timehunt)/3600))/100)/10).."k/h)", x + 50, y)
   y = y + 10
end

setfontcolor("white")
addtext('-----------------------------------------', 0, y)
if myname then
   setfontcolor("yellow")
   y = y + 10
   addtext('          [ HUD by RevoltZ ]', 5, y)
   y = y + 10
   setfontcolor("white")
   addtext('-----------------------------------------', 0, y)
end