--Boss Hunter
--#main
 local BuffSpell = 'utevo gran lux'

macro(200, "utevo gran lux", function()
    say(BuffSpell)
      delay(29800)
end)

--

local manaId = 9112
local manaPercent = 95
macro(200, "faster potting",  function()
  if (manapercent() <= manaPercent) or (hppercent() <= manaPercent) then
    usewith(manaId, player)
  end
end)

--

local castBelowHp = 60
local deactiveBelowMana = 40
macro(100, "advanced manashield",  function()
  if (hppercent() <= castBelowHp and manapercent() >= deactiveBelowMana and not hasManaShield()) then
    say('utamo vita')
  end
  if (manapercent() <= deactiveBelowMana and  hppercent() >= castBelowHp and hasManaShield()) then
      say('utamo vita')
  end
end)


local trainSpell = 'utevo mana'
local manaPercent = 90
macro(200, "mana train",  function()
  if (manapercent() > manaPercent) then
    say(trainSpell)
  end
end)

macro(250, "Eat Food", function()
      use(3725)
        delay(59750)
end)
--#panels

--#macros
local singleTargetSpell = 'exori max star'
local multiTargetSpell = 'exevo max row'
local strongTargetSpell = 'exevo gran mas san'
local distance = 3
local amountOfMonsters = 2

macro(250, "multi target spell",  function()
    local specAmount = 0
    if not g_game.isAttacking() then
        return
    end
    for i,mob in ipairs(getSpectators()) do
        if (getDistanceBetween(player:getPosition(), mob:getPosition())  <= distance and mob:isMonster())  then
            specAmount = specAmount + 1
        end
    end
    if (specAmount >= amountOfMonsters) then
        say(strongTargetSpell)
        say(multiTargetSpell)
    else
        say(strongTargetSpell)
        say(singleTargetSpell)
    end
end)

local singleTargetSpell = 'exori max star'
local distance = 3
local amountOfMonsters = 1

macro(250, "PVP target spell",  function()
    local specAmount = 0
    if not g_game.isAttacking() then
        return
    end
    for i,mob in ipairs(getSpectators()) do
        if (getDistanceBetween(player:getPosition(), mob:getPosition())  <= distance and mob:isPlayer())  then
            specAmount = specAmount + 1
        end
    end
    if (specAmount >= amountOfMonsters) then
        say(singleTargetSpell)

    end
end)

local singleTargetSpell = 'exori max star'
local strongTargetSpell = 'exevo gran mas san'
local distance = 3
local amountOfMonsters = 1

macro(250, "boss target spell",  function()
    local specAmount = 0
    if not g_game.isAttacking() then
        return
    end
    for i,mob in ipairs(getSpectators()) do
        if (getDistanceBetween(player:getPosition(), mob:getPosition())  <= distance and mob:isMonster())  then
            specAmount = specAmount + 1
        end
    end
    if (specAmount >= amountOfMonsters) then
        say(strongTargetSpell)
        say(singleTargetSpell)
    else
        say(singleTargetSpell)

    end
end)


local multiTargetSpell = 'exevo max row'
local strongTargetSpell = 'exevo gran mas san'
local distance = 3
local amountOfMonsters = 1

macro(250, "dung target spell",  function()
    local specAmount = 0

    for i,mob in ipairs(getSpectators()) do
        if (getDistanceBetween(player:getPosition(), mob:getPosition())  <= distance and mob:isMonster())  then
            specAmount = specAmount + 1
        end
    end
    if (specAmount >= amountOfMonsters) then
        say(strongTargetSpell)
        say(multiTargetSpell)

    end
end)



--
 local walkButton = modules.game_luniabot.walkButton
function turnOnWalking()
  walkButton:setChecked(true)
end
function turnOffWalking()
  walkButton:setChecked(false)
end

macro(500, "Exp Mode",  function()
  for i, tile in ipairs(g_map.getTiles(posz())) do
      for u,item in ipairs(tile:getItems()) do
          if (item:getId() == 25058) or (item:getId() == 21463) then
      turnOffWalking()
            autoWalk(tile:getPosition(), 100, {ignoreNonPathable = true})
      schedule(5000, turnOnWalking)
    elseif (item:getId() == 9586) then
    turnOffWalking()
      g_game.use(item)
    schedule(5000, turnOnWalking)
          delay(1500)
          end
        end
    end
end)

local walk_button = modules.game_luniabot.walkButton;

function hasEffect(tile, effect)
  for i, fx in ipairs(tile:getEffects()) do
    if fx:getId() == effect then
      return true
    end
  end
  return false
end

macro(100, "Exp Essence",  function()
  for _, tile in pairs(g_map.getTiles(posz())) do
    if (hasEffect(tile, 56) or hasEffect(tile, 56)) then
      walk_button:setChecked(false);
      autoWalk(tile:getPosition(), 100, { ignoreNonPathable = true });
      schedule(5000, function() walk_button:setChecked(true); end);
    end
  end
end)

--
--


--#hotkeys

--#callbacks

--#other
onAddThing(function(tile, thing)
  if thing:isItem() and thing:getId() == 2129 then
    local pos = tile:getPosition().x .. "," .. tile:getPosition().y .. "," .. tile:getPosition().z
    if not storage[pos] or storage[pos] < now then
      storage[pos] = now + 20000
    end
    tile:setTimer(storage[pos] - now)
  end
end)

local playerToFollow = 'Vaillant'
macro(250, "auto follow",  function()
    if g_game.isFollowing() then
        return
    end
    for _, followcreature in ipairs(g_map.getSpectators(pos(), false)) do
        if (followcreature:getName() == playerToFollow and getDistanceBetween(pos(), followcreature:getPosition()) <= 8) then
            g_game.follow(followcreature)
        end
    end
end)

macro(10, "Reattack", function()
  if (not g_game.isAttacking()) then
    attack(target);
  end
end)

macro(2000, "say target", function()
  local creature = g_game.getAttackingCreature();
  if (creature) then
    say("!bg " .. creature:getName());
  end
end)