ma ktos skrypta na przekladanie manasow z glownego bp do innego?
Wersja do druku
ma ktos skrypta na przekladanie manasow z glownego bp do innego?
siema ściągnąłem właśnie xenobota, a nigdy go wcześniej nie używałem, ma ktoś może jakieś waypointy skrypty na roty/dwarfy/minotaru facc?
www.forums.xenobot.netCytuj:
Knight123 napisał
--Stusse--Cytuj:
Nikaspro napisał
ManaBp = "Backpack Of Holding"
ManaPotID = Item.GetID("great spirit potion")
GSPID= Item.GetID("Great Spirit Potion")
SDID = Item.GetID("mana potion")
SHPID = Item.GetID("Ultimate Health Potion")
GHPID = Item.GetID("demon shield")
while true do
if (Self.ItemCount(ManaPotID) >= 1) or (Self.ItemCount(GSPID) >=1) or (Self.ItemCount(SHPID) >=1) or (Self.ItemCount(GHPID) >=1) then
local MainBp = Container.GetFirst()
local DestinationBp = Container.GetByName(ManaBp)
for spot = 0, MainBp:ItemCount() do
local item = MainBp:GetItemData(spot)
if (item.id == ManaPotID) or (item.id == SDID) or (item.id == SHPID) or (item.id == GHPID) or (item.id == GSPID) then
MainBp:MoveItemToContainer(spot, DestinationBp:Index(), 0)
wait(5000)
break
end
wait(200)
end
end
end
Panowie dało by rade jakiś scrypt dla 120 Rp + ? : D bo szuka i szuka i nie mogę nić ciekawego znaleźć
Dla 120 Rp mam na dragon lordy na zao oraz vampy na derefi ?
Ma ktoś może dla EK na corymy port hope ?
@trixx ; @marek94zg ;
local itemID = {3358, 3377, 3354,3367,3269}
local containerName = "Fur Backpack"
Module.New('lootFromGround', function(module)
if (Self.TargetID() <= 0) then
for y = -1, 1 do
for x = -1, 1 do
if table.contains(itemID, Map.GetTopUseItem(Self.Position().x + x, Self.Position().y + y, Self.Position().z).id) then
Map.PickupItem(Self.Position().x+x, Self.Position().y+y, Self.Position().z, Container.GetByName(containerName):Index(), 0)
module:Delay(math.random(100,200))
end
end
end
end
end)
Wystarczy zmienić id itemów i plecaka :)
Takie pytanko bo bot latał a teraz idzie przez yalachar i jak chce przejść przez bramkę z NPC to Pisze Hi i dalej stoi może ktos wie czemu tak się dzieje
Nie mam pojecia ;/ Może nie może drogi do WP znaleźć?
Pozwole tutaj sobie zapytać - czy kupno premium na PandoriumX dla skryptów do xenobota jest opłacalne? Dużo tego tam jest?
Mam pytanie co jest nie tak z tym skryptem ?
Załącznik 331337
Błędna wartość zmiennej czy tam funkcji getuseitem, albo źle zakodowany( źle zapisany, na forum bota jest informacja jak to naprawić :-P)
czyli co musze zrobic
Mój skrypt
Cytuj:
------------------------------------------------------------------------------------------------------------------------------------------------------AcidScripts-------------------------------------------
-------------------------------------------Yalahar Mutated Humans-------------------------------------
-------------------------------------------------EK (50+)---------------------------------------------
------------------------------------------------------------------------------------------------------
---------------------------------
-- VARIABLES --
---------------------------------
local ManaID = 268 -- ID of mana potions
local MinMana = 50 -- manas to leave spawn
local MaxMana = 175 -- manas to buy
local ManaPrice = 50 -- price of mana pots
local HealthID = 236 --ID of health potions
local MinHealth = 10 -- healths to leave spawn
local MaxHealth = 20 -- healths to buy
local HealthPrice = 75 -- price of health pots
local MinCap = 50 -- caps to leave spawn
local StaminaLogout = true -- logout if stamina under 18hrs
local MainBP = "grey backpack" -- main backpack color
local LootBP = "brocade backpack" -- loot bp color
local GoldBP = "camouflage backpack" -- gold bp color
---------------------------------
-- MISC --
---------------------------------
registerEventListener(WALKER_SELECTLABEL, "onWalkerSelectLabel")
dofile("Forgee.lua")
function onWalkerSelectLabel(labelName)
if (labelName == "deposit_items") then
print("~Depositing Items~")
Walker.Stop()
Self.ReachDepot()
wait(1800, 2400)
Self.DepositItems({10308, 0}, {9053, 0}, {9054, 0}, {8072, 1}, {3428, 1}, {3049, 1})
if (Self.Stamina() < 960) or (StaminaLogout == false) then
Walker.Stop()
print("~Stamina Low, Stopping Bot~")
else
Walker.Start()
print("~Sufficient Stamina, Bot will Continue~")
end
elseif (labelName == "bank") then
Walker.Stop()
print("~Depositing Cash and Withdrawing for Supplies~")
wait(1200, 1600)
Self.SayToNpc("hi")
wait(1200, 1600)
Self.SayToNpc("deposit all")
wait(800, 1200)
Self.SayToNpc("yes")
wait(1200, 1600)
Self.WithdrawMoney((ManaPrice*(MaxMana-Self.ItemCount(ManaID)))+1000)
wait(1200, 1600)
Self.SayToNpc("yes")
wait(1200, 1600)
Self.WithdrawMoney((HealthPrice*(MaxHealth-Self.ItemCount(HealthID))))
wait(1200, 1600)
Self.SayToNpc("yes")
wait(800, 1200)
Self.SayToNpc("balance")
wait(800, 1200)
print("~Resetting Backpacks~")
wait(1200, 1600)
Self.CloseContainers()
wait(1800, 2400)
Self.OpenMainBackpack(true):OpenChildren({Item.Get ID(LootBP), true}, {Item.GetID(GoldBP), true})
wait(1800, 2400)
Walker.Start()
elseif (labelName == "buy_potions") then
Walker.Stop()
print("~Buying Potions~")
wait(1200, 1600)
Self.SayToNpc("hi")
wait(800, 1200)
Self.SayToNpc("vials")
wait(800, 1200)
Self.SayToNpc("yes")
wait(800,1200)
Self.SayToNpc("trade")
wait(1800,2400)
Self.ShopBuyItemsUpTo(ManaID, MaxMana)
wait(1800, 2400)
Self.ShopBuyItemsUpTo(HealthID, MaxHealth)
wait(1200, 1600)
Walker.Start()
elseif (labelName == "check_hunt") then
Walker.Stop()
print("~Checking Items~")
if (Self.ItemCount(ManaID) < MaxMana) or (Self.ItemCount(HealthID) < MaxHealth) or (Self.Cap() < MinCap) then
Walker.Start()
gotoLabel("start")
print ("~Insufficient Items/Capacity - Restarting~")
else
Walker.Start()
gotoLabel("hunt")
print("~Sufficient Items/Capacity - Continue to Hunt~")
end
elseif (labelName == "pass_cemetery") then
Walker.Stop()
wait(800, 1200)
Self.SayToNpc("hi")
wait(1200, 1600)
Self.SayToNpc("pass")
wait(1200, 1600)
Self.SayToNpc("cemetery")
wait(1200, 1600)
Walker.Start()
elseif (labelName == "pass_alchemist") then
Walker.Stop()
wait(800, 1200)
Self.SayToNpc("hi")
wait(1200, 1600)
Self.SayToNpc("pass")
wait(1200, 1600)
Self.SayToNpc("alchemist")
wait(1200, 1600)
Walker.Start()
elseif (labelName == "checkpos1") then
if (Self.Position().x == 32798) then
Walker.Start()
else
Walker.Start()
gotoLabel("pass_cemetery")
end
elseif (labelName == "checkpos2") then
if (Self.Position().x <= 32739) then
Walker.Start()
Looter.Start()
Targeting.Start()
else
Walker.Start()
gotoLabel("pass_alchemist")
end
elseif (labelName == "check1") then
Walker.Stop()
print("~Checking Items~")
if (Self.ItemCount(ManaID) <= MinMana) or (Self.ItemCount(HealthID) <= MinHealth) or (Self.Cap() <= MinCap) then
Walker.Start()
gotoLabel("leave")
print ("~Insufficient Items/Capacity - Leaving~")
else
Walker.Start()
print("~Sufficient Items/Capacity - Continuing Hunt~")
end
elseif (labelName == "check2") then
Walker.Stop()
print("~Checking Items~")
if (Self.ItemCount(ManaID) <= MinMana) or (Self.ItemCount(HealthID) <= MinHealth) or (Self.Cap() <= MinCap) then
Walker.Start()
gotoLabel("leave")
print ("~Insufficient Items/Capacity - Leaving~")
else
Walker.Start()
print("~Sufficient Items/Capacity - Continuing Hunt~")
end
elseif (labelName == "check3") then
Walker.Stop()
print("~Checking Items~")
if (Self.ItemCount(ManaID) <= MinMana) or (Self.ItemCount(HealthID) <= MinHealth) or (Self.Cap() <= MinCap) then
Walker.Start()
gotoLabel("leave")
print ("~Insufficient Items/Capacity - Leaving~")
else
Walker.Start()
gotoLabel("start_hunt")
print("~Sufficient Items/Capacity - Continuing Hunt~")
end
elseif (labelName == "pass_cemetery2") then
Walker.Stop()
Looter.Stop()
Targeting.Stop()
wait(800, 1200)
Self.SayToNpc("hi")
wait(1200, 1600)
Self.SayToNpc("pass")
wait(1200, 1600)
Self.SayToNpc("cemetery")
wait(1200, 1600)
Walker.Start()
elseif (labelName == "pass_magician") then
Walker.Stop()
wait(800, 1200)
Self.SayToNpc("hi")
wait(1200, 1600)
Self.SayToNpc("pass")
wait(1200, 1600)
Self.SayToNpc("magician")
wait(1200, 1600)
Walker.Start()
elseif (labelName == "checkpos3") then
if (Self.Position().x == 32745) then
Walker.Start()
else
Walker.Start()
gotoLabel("pass_cemetery2")
end
elseif (labelName == "checkpos4") then
if (Self.Position().x == 32806) then
Walker.Start()
else
Walker.Start()
gotoLabel("pass_magician")
end
elseif (labelName == "restart") then
gotoLabel("start")
elseif (labelName == "start") then
Targeting.Stop()
Looter.Stop()
end
end
---------------------------------------------------
Self.ReachDepot = function (tries)
local tries = tries or 3
Walker.Stop()
local DepotIDs = {3497, 3498, 3499, 3500}
local DepotPos = {}
for i = 1, #DepotIDs do
local dps = Map.GetUseItems(DepotIDs[i])
for j = 1, #dps do
table.insert(DepotPos, dps[j])
end
end
local function gotoDepot()
local pos = Self.Position()
print("Depots found: " .. tostring(#DepotPos))
for i = 1, #DepotPos do
location = DepotPos[i]
Self.UseItemFromGround(location.x, location.y, location.z)
wait(1000, 2000)
if Self.DistanceFromPosition(pos.x, pos.y, pos.z) >= 1 then
wait(5000, 6000)
if Self.DistanceFromPosition(location.x, location.y, location.z) == 1 then
Walker.Start()
return true
end
else
print("Something is blocking the path. Trying next depot.")
end
end
return false
end
repeat
reachedDP = gotoDepot()
if reachedDP then
return true
end
tries = tries - 1
sleep(100)
print("Attempt to reach depot was unsuccessfull. " .. tries .. " tries left.")
until tries <= 0
return false
Dałem Ci praktycznie gotowe rozwiązanie, wystarczy użyć mózgu -.-Cytuj:
nikonowsky napisał
Jeżeli widzisz że tutaj jest to getuseitem użyte, to pierwsza część mojego poprzedniego posta jest nieistotna, zostaje druga, a nikt nie będzie za ciebie przeszukiwał forum xenobota bo tobie się nie chce, więc przeczytaj tę część jeszcze raz
i powodzenia na forum xenoCytuj:
albo źle zakodowany( źle zapisany, na forum bota jest informacja jak to naprawić :-P)
Wymienie sie skryptami , mam duzo skryptow wlasnej roboty wysokiej jakosci , pisac priv napewno sie dogadamy :)))
Wymienię [ew. sprzedam] się skryptami z mojej kolekcji od Solid-Script dla MS/ED:
Dam te same skrypty za free
up@
jesli pan rozdaje to poprosze na pw xD
dam reputa, potrzebuje jakichs porzadnych skryptow
Ja mam dużo od solid Scripts, na każdą profę i lvl. Jak ktoś interested to prosze pisać pw.
Wszystko co jest działające pod ms chętnie przyjmę
@nikonowsky ;
Prawdopodobnie nie masz pobranej biblioteki forgee.lua
@biaggi12 ;
jeżeli masz jakieś skrypty na MS/ED również chętnie przyjmę :)
ulala i po boceniu na jakiś czas, ładne zabezpieczenia zrobili :D
co masz na mysli ?Cytuj:
Okno zapomniał passów napisał
Jest ich tam bardzo dużo :) Ja znalazłem tam np. 100% AFK Banutę dla MS/ED. Do tego jeśli masz premium PandoriumX dostajesz dostęp do PandoriumX Tunnel, czyli nic innego jak ping tunel, który Ci trochę poprawia stabilność pingu :>Cytuj:
Okno zapomniał passów napisał
Wprowadzili do Xeno jakieś cuda na kiju, blokuje wszystkie dotychczasowe cracki.Cytuj:
qSC napisał
Z jednej strony szkoda, ale z drugiej - poświęcają czas tworząc tego bota, mają wiedzę i umiejętności, żeby pracować w niejednej firmie programistycznej to czemu nie mają na tym zarabiać i komuś to za free oddać.
Bierzcie i jedźcie z tego wszyscy.
http://www.speedyshare.com/S3H3U/SolidScripts.zip
Niby spoko ale brakuje podstawowych funkcji w tym bocie, już od któregoś update nie działa reconect... bida jak za ~6$/msc w dodatku wind 3.0 za rogiem.Cytuj:
Apticer napisał
Xeno jest po prostu za słabym botem żeby za niego płacić.
witam
dawno nie zagladalem na forum czy moze ktos napisac czy jest jakis bot do tibi z dzialajacym crackiem na dzien dzisiejszy ?
pozdrawiam
Tak jest, właśnie teraz powstała metoda na obejście tych zabezpieczeń. Tak więc:
1.Skasować całego XenoBota(włącznie ze ścieżką w Program Files --> C:\Program Files (x86)\XenoBot lub C:\Program Files\XenoBot)
2.http://www12.zippyshare.com/v/7mXwvPXL/file.html to wrzucić do C:\Windows\System32\drivers\etc (Jeśli posiadamy plik hosts należy go skasować)
3.http://pandoriumx.com/forum/index.ph...ked-1076-0x22/ ściągnać tę wersję Xeno
W sumie to tyle.
Po tym zabiegu, będziemy korzystać z poprzedniej, scrackowanej wersji Xenobota(tej bez zabezpieczeń).
//To jest metoda @chomiczenko z PandoriumX(ja to tylko przetłumaczyłem i skleiłem do kupy), za co serdecznie mu dziękuję.
Skąd żeś to wszystko wytrzasnął :D ?Cytuj:
Qeemiz napisał
moze ktos wyslac plik MSVCR100.dll bo pisze ze mi go brakuje ?
ok juz jest ok brakowalo c++
Dzieki wielkie za skrypty działają all !Cytuj:
Qeemiz napisał
Sprawdzał ktoś zaufany?Cytuj:
Qeemiz napisał
przydalby sie ktos kto by to w 100% sprawdzil, moze @Vadim ; ? nikt inny nie przychodzi mi do glowy
To sa skrypty, wiec z tego co wiem, sa to pliki niewykonywalne. Wczytujesz je swoim botem i tyle. Jedyne zagrozenie to, ze skrypt np. wysle kase z banq na noobchara autora, wywali eq do wody lub cos w ten desen. Keyloggera nie bedzie w tym.
Nie sprawdze co jest w skrypcie, nie uzywam botow, nie znam sie na nich.
Ale i tak trzeba sprawdzić, czy w .lua nie ma żadnych gówien do transferowania golda/itemów ;).
ma ktoś skrypt na auto sio na gwałt? i wytłumaczyć mi jak to ustawić
Bede wdzieczny w chuuuj
Cytuj:
gary tyler fox napisał
Chyba wszystko zrozumiałe...Kod:--[[
Auto Healer
Version 1.02
Created by Syntax
]]
local config = { --This Controls healing friendly players, it you want to add a friend just add in
WhiteList = {"Gary-Knight", "Fiery Jeremiasz"},
healWhiteList = true, -- heal players specified in the whitelist
healParty = true, -- heal party members
healAlly = true, -- heal war allies
range = 8, -- max distance to heal players
mana = 140, -- minimum mana needed to cast
health = 74, -- % of friend's health to heal at
method = "exura sio" -- this is the only method currently, rune healing will be added later
}
local function sio(name)
if(Self.Mana() >= config.mana)then
Self.Say("exura sio \""..name)
sleep(math.random(100,300))
end
end
Module.New('CheckFriend', function(Mod) --This function checks your teammates health, if your friends health is below
for i = CREATURES_LOW, CREATURES_HIGH do --60% and your health is above 80% you will heal them.
local creature = Creature.GetFromIndex(i)
if (creature:isValid()) then
if (creature:isOnScreen() and creature:isVisible() and creature:isAlive()) then
local name = creature:Name()
if(creature:isWarAlly() and config.healAlly) or (creature:isPartyMember() and config.healParty) or (table.find(config.WhiteList, name, false) and config.healWhiteList)then
if(creature:DistanceFromSelf() <= config.range) and (creature:HealthPercent() <= config.health)then
if(config.method == "exura sio") then
sio(name)
end
end
end
end
end
end
sleep(math.random(100,300))
end)
pokaz mi gdzie mam co wpisac bo kuzwa mialem identyczny skrypt i nie dzialal, moze cos zle robilem @Okno zapomniał passów ;
#####3
NIEWAZNE, ogarnalem sam XD
No tak wszystko co do tych plikow w paczce by sie zgadzalo :P ale sam plik zip moze juz miec keyloggera :P wiec mimo tego ze te wszystkie pliki sa ok to trzeba sama paczke najpierw sprawdzić :pCytuj:
Vadim napisał
Edit:
Virus Total wydaje sie byc czyste. Teraz trzeba zajrzec to lua :P
Ta paczka skryptow od Solida jest czysta i wszystko dobrze smiga . potwierdzone info
Ja też użyłem pare skryptów, wszystko ok wielkie dzięki :)
jesli chodzi o same skrypty, solid oglasza sie na oficjalnym forum xeno wiec powinny byc czyste
Ma ktoś skrypt na 40 pallka facc ? Cyclopy/ obojętnie co .
panowie szukam skrypta na alarm gdy x manasow ma ktos ?
Cytuj:
czecho24 napisał
Kod:local PotionID = 268 --Change to ID of mana potion.
local PotionCount = 10 --Change to amount you want to start alarm at
while true do
if Self.ItemCount(PotionID) <= PotionCount then
alert()
end
sleep(500)
end
dzieki wielkie
masz moze scrypt ze jesli sa 3 potwory to zmienia na inna bron naprzyklad z knife na jakis sword i gdy znowu sa 2 potwory to znowu na knife ?
Cytuj:
czecho24 napisał
Nie wiem, czy nadal działa, ustaw sobie nazwe mobków na jakich skillujesz i ich liczbe.Kod:-- Weapon Settings
local WandID = 7432 - gorsza broń
local WeaponID = 3069 - lepsza broń
-- Creature Settings
local CreatureList = {"Dwarf Soldier", "Dwarf Guard", "Rotworm", "Carrion Rotworm", "Dwarf"}
local CreatureCount = 1 -- How many monsters until you equip your weapon
local CreatureRange = 3 -- Range of the monsters until you equip your weapon
-- Do not edit anything below
Module.New('equip rod or weapon', function(module)
local mob = Self.GetTargets(CreatureRange)
local count = 0
for i =1, #mob do
if table.contains(CreatureList, mob[i]:Name()) then
count = count + 1
end
end
if count >= CreatureCount then
if (Self.Weapon().id ~= WeaponID) then
if (Self.ItemCount(WeaponID) > 0) then
Self.Equip(WeaponID, "weapon")
else Self.Equip(WandID, "weapon")
end
module:Delay(1000)
end
elseif (Self.Weapon().id ~= WandID) then
if (Self.ItemCount(WandID) > 0) then
Self.Equip(WandID, "weapon")
else Self.Equip(WeaponID, "weapon")
end
module:Delay(1000)
end
end)