Błogosławię temu tematowi jako oficjalnemu, zatem wszelkie problemy, pytania i inne kwestie w jakikolwiek sposób związane z xenobotem i działaniem bota kierujemy w tym temacie. Powodzenia. Info w spisie botów dodane.
Powyższy post może być sarkastyczny oraz zawierać śladowe ilości orzechów arachidowych.
----------------------------------------------------------------------------------------------------------
-------------------------------------------------------------------------------------------------------------------
----------------------------------------------------MADE BY SPARKZ023 VERSION 1.0---------------------------------
MPotID = 268 --- mana potion ID
MinMPots = 50 ---- if less then script will exit spawn
MPots = 100 ----- amount to refill
MPotprice = 50 ---- price of 1 single mana pot
HPotID = 266 ---- health potion ID
HPotprice = 45 ---- health potion price
HPots = 30 ---- health potions you want to buy, set none if you do not use them
MinHPots = 10 ---- min of health potions to leave, set none if you do not use them
MinCap = 50 ---- if less then script will exit spawn
--------------------------------------------------------------------
registerEventListener(WALKER_SELECTLABEL, "onWalkerSelectLabel")
dofile("Forgee.lua")
function onWalkerSelectLabel(labelName)
if (labelName == "Checker1") then
delayWalker(1000)
setWalkerEnabled(false)
if (Self.ItemCount(MPotID) <= MinMPots) or (Self.Cap() < MinCap) or (Self.ItemCount(HPotID) <= MinHPots) then
setWalkerEnabled(true)
gotoLabel("Start")
else
setWalkerEnabled(true)
gotoLabel("Go Hunt")
end
elseif (labelName == "Checker2") then
delayWalker(1000)
setWalkerEnabled(false)
if (Self.ItemCount(MPotID) <= MinMPots) or (Self.Cap() < MinCap) or (Self.ItemCount(HPotID) <= MinHPots) then
setWalkerEnabled(true)
gotoLabel("Finish Hunting")
else
setWalkerEnabled(true)
gotoLabel("Keep Hunting")
end
elseif (labelName == "Reach Depot") then
dofile("Forgee.lua")
Self.ReachDepot()
elseif (labelName == "Bank") then
setWalkerEnabled(false)
NpcConv("hi","deposit all","yes","balance")
wait(900, 1200)
Self.WithdrawMoney((MPotprice*(MPots-Self.ItemCount(MPotID))))
wait(900, 1200)
Self.SayToNpc("yes")
wait(900, 1200)
Self.WithdrawMoney((HPotprice*(HPots-Self.ItemCount(HPotID))))
wait(900, 1200)
Self.SayToNpc("yes")
wait(900, 1200)
NpcConv("withdraw", "500", "yes")
wait(3000,5000)
setWalkerEnabled(true)
elseif (labelName == "Deposit") then
setWalkerEnabled(false)
local dprandomise = (math.random(1,2))
Self.DepositItems({5899, 0}, {11443, 0}, {10272, 0}, {9640, 0}, {10279, 0}, {3030, 0}, {11444, 0}, {5902, 0}, {3279, 1}, {3556, 1})
wait(1500,1900)
setWalkerEnabled(true)
elseif (labelName == "Supplies") then
setWalkerEnabled(false)
wait(900, 1200)
Self.SayToNpc({"Hi", "flasks", "yes", "yes", "yes", "Trade"}, 65)
wait(900, 1200)
buyAlotOfItemsBecauseItsSuchAGodDamnBigDeal(MPotID, (MPots-Self.ItemCount(MPotID)))
wait(900, 1200)
buyAlotOfItemsBecauseItsSuchAGodDamnBigDeal(HPotID, (HPots-Self.ItemCount(HPotID)))
wait(900, 1200)
setWalkerEnabled(true)
elseif (labelName == "Backpacks") then
dofile("Forgee.lua")
delayWalker(7000)
resetBackpacks()
elseif (labelName == "Boat to Laguna") then
setWalkerEnabled(false)
wait(200, 300)
Self.ReachNpc("Captain Waverider", 2)
setWalkerEnabled(false)
Self.SayToNpc({"Hi", "Peg Leg", "Yes"}, 65)
wait (1000, 1400)
setWalkerEnabled(true)
elseif (labelName == "Boat to LB") then
setWalkerEnabled(false)
wait(200, 300)
Self.ReachNpc("Sebastian", 2)
setWalkerEnabled(false)
Self.SayToNpc({"Hi", "Go", "Yes"}, 65)
wait (1000, 1400)
setWalkerEnabled(true)
end
end
function buyAlotOfItemsBecauseItsSuchAGodDamnBigDeal(item, count)
count = tonumber(count) or 1
repeat
local amnt = math.min(count, 100)
if(Self.ShopBuyItem(item, amnt) == 0)then
return printf("ERROR: failed to buy item: %s", tostring(item))
end
wait(200,500)
count = (count - amnt)
until count <= 0
end
function NpcConv(...)
for _, str in ipairs(arg) do
wait((tostring(str):len() / 125) * 60000 * math.random(1.1, 1.8))
Self.SayToNpc(str)
end
end
Self.ReachNpc = function(name, tries)
local npc = Creature.GetByName(name)
if (npc:DistanceFromSelf() > 3) then
tries = tries or 15
repeat
local nposi = npc:Position()
Self.UseItemFromGround(nposi.x, nposi.y, nposi.z)
wait(1500)
tries = tries - 1
until (npc:DistanceFromSelf() <= 3) or (tries == 0)
end
end
----------------------------------------------------------------------- <<< THE SHATTERED ISLES QUEST >>> ----------------------------------------------------------------------------------
---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------------------------------------------- <<< SETTINGS >>> ----------------------------------------------------------------------------------------
-----------BACKPACK SETUP----------------------
--- 1 = MAIN BACKPACK
--- 2 = SUPPLIES BACKPACK
--- 3 = WOOOD BACKPACK
--- 4 = QUEST ITEM BACKPACK ('Pirate Voodoo Dolls' and 'Atlas')
------------SUPPLIES--------------------------
--- Note: Don't buy too many potions, it's likely you'll barely use them.
local MaxMana = 50 ------- Manas to enter Cultist Cave with. (To get Black Sheep Corpse)
local ManaName = 'mana potion' ------- Name of mana potion
local ManaCost = 50 ------- Price of Mana potions
local MaxHealth = 15 ------------ Healths to Enter Cultist Cave with. (To get Black Sheep Corpse)
local HealthName = 'health potion' ------------ Name of health potions.
local HealthCost = 45 ------------ Price of health potions.
------------MISC-----------------------------
local WoodBP = "Fur Backpack" --------- Name of the Backpack for Wood. (Aqcuired during Goroma access quest.)
local QuestBP = "Blue Backpack" --------- Name of the Backpack with the 'Atlas' and 5 'Pirate Voodoo Dolls'. You need to acquire these items yourself, before you start the quest. They can usually be found on the market.
local SupplyBP = "Golden Backpack" --------- Name of Supllies Backpack.
------------QUEST----------------------------
local AccessToGoroma = true --------- Do you want to do Access to Goroma quest? (If 'false' script will jump to 'Counterspell Quest')
local GetSpellbook = true --------- Do you want to get 'Spellbook Of Dragha'? (Must Be 'true' if 'CounterSpellQuest' is 'true'!)
local CounterSpellQuest = true --------- Do you want to do 'The Counterspell' quest? (true/false). Recommended 60+ (for speed). Will need atleast (765) cap after refilling the choosen amount of potions. Will fail and repeat if character can't make the travel in 5 minutes.
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-- <<< END OF SETTINGS >>> --
Ostatnio zmieniony przez vegeta454 : 02-11-2013, 11:18
Aktualnie 1 użytkowników przegląda ten temat. (0 użytkowników i 1 gości)
Zakładki