Temat: [XenoBot] Oficjalny temat

function combatHelper(pos, radius, creatureName, amountofCreature)
    local n = 0
    local noPlayer = true
    local pos = Self.Position()
    for i = CREATURES_LOW, CREATURES_HIGH do
        local creature = Creature.GetFromIndex(i)
        local name = creature:Name()
        if (checkPlayer and creature:isPlayer() and (getDistanceBetween(creature:Position(), pos) <= radius)) then
            noPlayer = false
            break
        elseif (creature:isValid()) and creature:ID() ~= Self.ID() then
            for j = 1, table.getn(creatureName) do
                if (name == creatureName[j]) then
                    if (creature:isOnScreen() and creature:isVisible() and creature:isAlive()) then
                        if(getDistanceBetween(creature:Position(), pos) <= radius)then
                            n = n + 1
                        end
                    end
                end
            end
        end
    end
    if (n >= 1) and (pos.y >= 31258) then
        setTargetingEnabled(true)
    elseif (n == 0) then
        setTargetingEnabled(false)
    elseif (n >= 1) and (pos.y <= 31258) then
        setTargetingEnabled(false)
    end
end
 
function SpellCastFlam(spell)
    local Monster1 = "Wyvern"
    local Monster2 = "Mammoth"
    local TargetID = Self.TargetID()
    local Target = Creature.GetByID(TargetID)
    local pos = Self.Position()
    if (Self.CanCastSpell(spell)) and (Target:Name() == Monster1) and (getDistanceBetween(Target:Position(), pos) <= 3)  then
        Self.Say(spell)
    elseif (Self.CanCastSpell(spell)) and (Target:Name() == Monster2) and (getDistanceBetween(Target:Position(), pos) <= 3) then
        Self.Say(spell)
    elseif (not Self.MeetsSpellRequirements(spell)) then
        print("%s can not be cast. You either lack the mana or required level!", spell)
    end
end
 
function SpellCast(spell)
    local Monster1 = "Crystal Spider"
    local Monster2 = "Ice Golem"
    local TargetID = Self.TargetID()
    local Target = Creature.GetByID(TargetID)
    local pos = Self.Position()
    if (Self.CanCastSpell(spell)) and (Target:Name() == Monster1) and (getDistanceBetween(Target:Position(), pos) <= 3)  then
        Self.Say(spell)
    elseif (Self.CanCastSpell(spell)) and (Target:Name() == Monster2) and (getDistanceBetween(Target:Position(), pos) <= 3)  then
        Self.Say(spell)
    elseif (not Self.MeetsSpellRequirements(spell)) then
        print("%s can not be cast. You either lack the mana or required level!", spell)
    end
end
 
function SpellCastDlsMax(spell)
        local Monster1 = "Dragon Lord"
        local TargetID = Self.TargetID()
        local Target = Creature.GetByID(TargetID)
        local pos = Self.Position()
        if (Self.CanCastSpell(spell)) and (Target:Name() == Monster1) and (Target:HealthPercent() <= 35) and (Target:HealthPercent() >= 20) and (getDistanceBetween(Target:Position(), pos) <= 3) then
            Self.Say(spell)
        elseif (not Self.MeetsSpellRequirements(spell)) then
            print("%s can not be cast. You either lack the mana or required level!", spell)
        end
end
 
while (true) do
    SpellCastFlam("exori flam")
    SpellCast("exori amp vis")
    SpellCast("exori vis")
    wait(200)
end