--Vaillant
--#main

--#panels

--#macros
local singleTargetSpell = 'exori gran pura'
local multiTargetSpell = 'exevo mas pura'
local strongTargetSpell = 'exevo gran max mort'
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 gran pura'
local distance = 7
local amountOfMonsters = 2

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 gran pura'
local strongTargetSpell = 'exevo gran max mort'
local distance = 4
local amountOfMonsters = 2

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)
    end
end)
--

macro(2500, "open monster boxes",  function()
  for i, tile in ipairs(g_map.getTiles(posz())) do
    for u,item in ipairs(tile:getItems()) do
      if (item:getId() == 9586) then
        g_game.use(item)
        return
      end
    end
  end
end)

--

macro(1000, "invasion portal",  function()
  for i, tile in ipairs(g_map.getTiles(posz())) do
      for u,item in ipairs(tile:getItems()) do
          if (item:getId() == 25058) then
            autoWalk(tile:getPosition(), 100, {ignoreNonPathable = true})
          end
        end
    end
end)


--

macro(1000, "black skull flames",  function()
  for i, tile in ipairs(g_map.getTiles(posz())) do
      for u,item in ipairs(tile:getItems()) do
          if (item:getId() == 21463) then
            autoWalk(tile:getPosition(), 100, {ignoreNonPathable = true})
          end
        end
    end
end)

--

local oldTarget
macro(200, "hold target",  function()
    if g_game.isAttacking() then
        oldTarget = g_game.getAttackingCreature()
    end
    if (oldTarget and not g_game.isAttacking() and getDistanceBetween(pos(), oldTarget:getPosition()) <= 8) then
        g_game.attack(oldTarget)
    end
end)

--

local manaId = 28650
local manaPercent = 95
macro(200, "faster potting",  function()
  if (manapercent() <= manaPercent) then
    usewith(manaId, player)
  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)