--[[
    Archlight Archer Skill rotation -- Darkk0n
]]

-- Configs
local dist = 5 -- Distance from the target to use the spell (recommended 2 sqm for exevo en vis)
local mana = 200 -- Minimum mana to try to use an spell (stop spam)
local health = 95 -- Health x% to use manarune/exura san
local mana = 80 -- Mana x% to use manarune
local runemonk = 11632 -- ManaruneID

-- Exaus Configuration (for otservers) -- Don't touch this if you don't know what are you doing.
local spell1 = "exori gran con"
local spell2 = "exevo tera hur"
local spell3 = "exevo gran mas flam"
local spell4 = "exevo vis hur"
local spell5 = "exura gran san"

-- Spells to use
local words1 = "exori gran con"
local words2 = "snaring shot"
local words3 = "focused shot"
local words4 = "energy cannon"
local words5 = "exura san"

--  Don't touch this if you don't know what are you doing.
Module.New('MonkAll', function(mod)
local creature = Creature.GetByID(Self.TargetID())

    Self.HealthPercent = function()
        return math.abs(Self.Health()/(Self.MaxHealth()*0.01))
    end

    Self.ManaPercent = function()
        return math.abs(Self.Mana()/(Self.MaxMana()*0.01))
    end

    if creature:isValid() and creature:isAlive()  and creature:isTarget() and creature:DistanceFromSelf() <= dist then
        if Self.GetSpellCooldown(spell1) == 0 then
            Self.Cast(words1, mana)
        end

        if Self.GetSpellCooldown(spell2) == 0 then
            Self.Cast(words2, mana)
        end

        if Self.GetSpellCooldown(spell3) == 0 then
            Self.Cast(words3, mana)
        end

	if Self.GetSpellCooldown(spell3) == 0 then
            Self.Cast(words4, mana)
        end


    end
    -- Mana rune and Exura San
        if Self.GetSpellCooldown(spell4) == 0 and Self.HealthPercent() <= health then
            Self.Cast(words5, mana)
        end

        if Self.HealthPercent() <= health or Self.ManaPercent() <= mana then
            Self.UseItem(runemonk)
        end

    -- Utani Kura

        if not Self.isHasted() then
            Self.Cast('Aiming Haste', 60)
        end
end)