[Update] XenoBot v2.7.1

Printable View

Show 40 post(s) from this thread on one page

09-01-2012, 12:00 AM
SomeKindOfMonster

Quote:

Originally Posted by kubax36

hold target isnt working while bot is paused

lol thats never worked
09-01-2012, 12:11 AM
Tirekos

mmm if i say true idk how to post it there.. hehe :/
09-01-2012, 12:26 AM
kubax36

Quote:

Originally Posted by SomeKindOfMonster

lol thats never worked

i just answered for Alastorsz :D
09-01-2012, 12:31 AM
Rossie

After X time bot stop the scripter ... I Mean , The script are still there , but he dont work ...Hard to explain xD ... like the bot skip every label...
But this happen after a X time of boting , not a the first road of the map XD :P
09-01-2012, 12:46 AM
Tirekos

Some one can help me and say how can i upload here an lua script?
THANKS!
09-01-2012, 12:55 AM
Tirekos

http://i48.tinypic.com/106nblu.png

lol?
09-01-2012, 07:04 AM
PunktG

Quote:

Originally Posted by Rossie

After X time bot stop the scripter ... I Mean , The script are still there , but he dont work ...Hard to explain xD ... like the bot skip every label...
But this happen after a X time of boting , not a the first road of the map XD :P

today in night i bot 8 accounts
and only on 1 i was ofline
when i log in game bot was on hunt and stand in scarab cave
all rest tibia was working great
will check this today to
09-01-2012, 10:05 AM
Himzelf

mabye equipt items like rings and amulets by hotkey next update? plizzzzzzzzzzzz
09-01-2012, 01:40 PM
Tirekos

[code=lua]BoltsBp = "Purple Backpack"
DefaultBoots = 3079 -- Your Boots ID, Draken Boots ID is 4033, Boots of Haste ID is 3079
ManaToEquip = 90 -- Mana Amount to equip or unequip Soft Boots in percentage

--!!!!!!!!!!!!!!!!!!!!!!!
--!!!DO NOT EDIT BELOW!!!
--!!!!!!!!!!!!!!!!!!!!!!!

function equipSoftBoots()
local BOOTS1ID = 6529 -- Soft Boots ID
local SOFTSINUSE = 3549 -- softs being in use
local Backpack = Container.GetFirst()
if (Self.Feet().id == 6530) then
for Spot = 0, Backpack:ItemCount() do
local Boots = Backpack:GetItemData(Spot)
if (Boots.id == DefaultBoots) then
Backpack:MoveItemToEquipment(Spot, "feet")
end
end
elseif (math.floor((Self.Mana() / Self.MaxMana()) * 100)) < ManaToEquip and (Self.Feet().id ~= SOFTSINUSE) then
for Spot = 0, Backpack:ItemCount() do
local Boots = Backpack:GetItemData(Spot)
if (Boots.id == BOOTS1ID) then
Backpack:MoveItemToEquipment(Spot, "feet")
end
end
elseif (math.floor((Self.Mana() / Self.MaxMana()) * 100)) > ManaToEquip and (Self.Feet().id ~= DefaultBoots) then
for Spot = 0, Backpack:ItemCount() do
local Boots = Backpack:GetItemData(Spot)
if (Boots.id == DefaultBoots) then
Backpack:MoveItemToEquipment(Spot, "feet")
end
end
end
end

function equipLifeRing()
local Backpack = Container.GetFirst()
if (Self.Ring().id ~= 3089) then
for Spot = 0, Backpack:ItemCount() do
local Ring = Backpack:GetItemData(Spot)
if (Ring.id == 3052) then
Backpack:MoveItemToEquipment(Spot, "ring")
end
end
end
end

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

function healer()
if (Self.HealthPercent() < 90) and (Self.HealthPercent() > 71) and (Self.CanCastSpell("exura")) then
Self.Say("exura")
elseif (Self.HealthPercent() < 75) and (Self.HealthPercent() > 56) and (Self.CanCastSpell("exura gran")) then
Self.Say("exura gran")
elseif (Self.HealthPercent() < 60) and (Self.CanCastSpell("exura gran san")) then
Self.Say("exura gran san")
end
end

function SpellCast(spell)
local Monster1 = "Lizard High Guard"
local Monster2 = "Lizard Legionnaire"
local Monster3 = "Lizard Dragon Priest"
local Monster4 = "Killer Caiman"
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) <= 4) then
Self.Say(spell)
elseif (Self.CanCastSpell(spell)) and (Target:Name() == Monster2) and (getDistanceBetween(Target:Position(), pos) <= 4) then
Self.Say(spell)
elseif (Self.CanCastSpell(spell)) and (Target:Name() == Monster3) and (getDistanceBetween(Target:Position(), pos) <= 4) then
Self.Say(spell)
elseif (Self.CanCastSpell(spell)) and (Target:Name() == Monster4) and (getDistanceBetween(Target:Position(), pos) <= 4) 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
healer()
SpellCast("exori san")
equipSoftBoots()
equipLifeRing()
if (Self.DistanceFromPosition(33197, 31347, 6) < 1) then
gotoLabel("AfterTP")
wait(1000)
elseif (Self.DistanceFromPosition(33144, 31248, 6) < 1) then
gotoLabel("AfterTP1")
wait(1000)
elseif (Self.DistanceFromPosition(33200, 31347, 6) < 1) then
gotoLabel("AfterTP2")
wait(1000)
elseif Self.ItemCount(236) >= 1 and (Self.HealthPercent() <= 65) then
Self.UseItemWithMe(236)
sleep(math.random(200, 600))
elseif Self.ItemCount(283) >= (math.random(10, 15)) then
Self.DropItems(Self.Position().x, Self.Position().y, Self.Position().z, 283, 284, 285)
elseif Self.ItemCount(10328) > 0 then
Self.DropItems(Self.Position().x, Self.Position().y, Self.Position().z, 10328)
elseif Self.ItemCount(3450) >= 1 then
local MainBp = Container.GetFirst()
local DestinationBp = Container.GetByName(BoltsBp)
for spot = 0, MainBp:ItemCount() do
local item = MainBp:GetItemData(spot)
if (item.id == 3450) then
MainBp:MoveItemToContainer(spot, DestinationBp:Index(), 0)
wait(500)
break
end
end
end
wait(200)
end [/code]
09-01-2012, 05:24 PM
Rossie

Quote:

Originally Posted by Rossie

After X time bot stop the scripter ... I Mean , The script are still there , but he dont work ...Hard to explain xD ... like the bot skip every label...
But this happen after a X time of boting , not a the first road of the map XD :P

Ok I use 2 lua fil in my script , and I notice just one stop work ... maybe it the way they are made ? .. beacause I botted 7 account .. and 3 with the same script , and only this 3 get bug , but before the update I never notice this bug ..

registerEventListener(WALKER_SELECTLABEL, "onWalkerSelectLabel")
function onWalkerSelectLabel(labelName)
if (labelName == "Check1") then
setBotEnabled(false)
if ((Self.ItemCount(3031) >= 1000)) or (Self.Cap() < 90) or ((Self.ItemCount(12517) >= 3)) then
setBotEnabled(true)
gotoLabel("Godepot")
else
setBotEnabled(true)
gotoLabel("Cave2")
end
elseif (labelName == "Check2") then
setBotEnabled(false)
if ((Self.ItemCount(3031) >= 1000)) or (Self.Cap() < 90) or ((Self.ItemCount(12517) >= 3)) then
setBotEnabled(true)
gotoLabel("Godepot")
else
setBotEnabled(true)
gotoLabel("Cave3")
end
elseif (labelName == "Check3") then
setBotEnabled(false)
if ((Self.ItemCount(3031) >= 1000)) or (Self.Cap() < 90) or ((Self.ItemCount(12517) >= 3)) then
setBotEnabled(true)
gotoLabel("Godepot")
else
setBotEnabled(true)
gotoLabel("Cave1")
end

elseif (labelName == "AllezHunt") then
setBotEnabled(false)
gotoLabel("Gocave")
setBotEnabled(true)
elseif (labelName == "Allezdepot") then
setBotEnabled(false)
gotoLabel("Godepot")
setBotEnabled(true)
elseif (labelName == "Place1") then
setBotEnabled(false)
gotoLabel("Cave1")
setBotEnabled(true)
elseif (labelName == "Place2") then
setBotEnabled(false)
gotoLabel("Cave2")
setBotEnabled(true)
elseif (labelName == "Place3") then
setBotEnabled(false)
gotoLabel("Cave3")
setBotEnabled(true)
elseif (labelName == "Bin voir") then
setBotEnabled(false)
gotoLabel("Gocave")
setBotEnabled(true)
elseif (labelName == "Acheterbp") then
setBotEnabled(false)
gotoLabel("Temple")
setBotEnabled(true)
end
end

Show 40 post(s) from this thread on one page