Szukasz skryptu? Zajrzyj tutaj!

Cytuj:

---

$Yaki Paladinek$ napisał

up#
id draga zaraz podam, mam gdzieś mapeditorze ;d
to jest 2844 ;}

---

Edytowałem ale nie trybi, chyba tak sie nie da. Ponawiam prośbę - działający skrypt do ng na skórowanie smoków.

Witam potrzebuję skryptu do elfbota który po upływie 12 min otworzy drzwi za sobą i wróci do miejsca w którym uprzednio stał

Zrób to w cave bocie jako normalne waypointy.
A tu masz 4 'action' które będą Ci potrzebne:

Cytuj:

---

usegroundxyz x y z

---

Cytuj:

---

wait 720000

---

Cytuj:

---

settargeting on

---

Cytuj:

---

settargeting off

---

To jest nic trudnego :> Ja ci więcej nie dam bo niewidze miejsca w którym to robisz.

Witam
czy da sie napisac taki scrypt do NG pod ots

atakuje cel i jak najszybciej zaznacza i odznacza atakowany cel.

poniewaz gram na takim ots gdzie jest fast atak ale tylko z odznaczaniem i zaznaczaniem

dernight#
z tego co wiem, nic takiego nie napiszesz (i nikt inny)
Ale za to u mnie w Elfbocie jest darmowa opcja (kurwa, szkoda gadać) że zmienia się z 'stand while fighting' do 'Chase oponent'
i to około 10 razy na sekundę, tylko mryga. O co chodzi?
Ale to tak przy okazji sie spytałem, bo chciałbym skrypt na wyprowadzenie druida do 27 poziomu, świat pvp (PANDORIA)
mam aktualnie 13 i moonlight roda. Waste nie wchodzi w grę, bo dopiero tam zacząłem grać i mam 3k ;\

Bocik tibiaauto, ew. ten elbot do którego nie jestem przekonany, z powodu tego przełączania ciągłego (cały komputer mi muli przez to, w dodatku tibia się tak zacina jakbyś szedł strzałkami w prawo ciągle, i klikał myszką po lewej stronie chara)

down@
KU##A J###NA MAĆ, NIE ROZUMIESZ?!
Co to znaczy? Ano, ma to wyglądać w ten sposób:
Osoba nr. 1 umieszcza requesta.
Osoba nr. 2 odpowiada na pytanie osoby numer 1
Osoba nr. 3 umieszcza requesta.
Osoba nr. 4 odpowiada na pytanie osoby numer 3
Osoba nr. 4 umieszcza requesta.
itd.
TAK TRUDNO TO ZROZUMIEĆ? PLUTON TO JEST KU##A ANIOŁ NORMALNIE ŻE WYTRZYMUJE TO! POWTARZA MILIONY RAZY, REQUEST, ODPOWIEDŹ, REQUEST ITD. JAK MOŻNA TEGO NIE ROZUMIEC?+ jak widzę twój nick to mi się na kur##ce zbiera

albo sciagnij ta wlacz cave bota odznacz tam wszytsko i wlacz enable a w ng target all ;p bedzie caly czas zaznaczal i odznaczal lub tez auto attack jezeli masz skrypt a jak nie to juz daje
var
LockID:integer;
function GetCreatureByID(ID: integer): TCreature;
var
x: integer;
begin
Result := nil;
for x := 0 to Creatures.Count - 1 do
begin
if x >= Creatures.Count then Break;
if Creatures.Creature[x].ID = ID then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;
begin
updateworld;
while self.attacking=0 do
begin
sleep(200);
updateworld;
end;
LockID:=self.attacking;
while not terminated do
begin
updateworld;
ProcessEvents;
if ((self.attacking)<>(LockID)) and ((self.attacking)<>(0)) then
LockID:=Self.Attacking;
If Self.Attacking=0 then
begin
Creature:=GetCreatureByID(LockID);
If Creature<>nil then Creature.Attacking:=true;
end;
sleep(100);
end;
end;
witam potrzebuje skryptu ktory bedzie wyciagal z chesta(id 2418) bp (id 2854) zakladal na siebie, a nastepnie robil rlg z tym bp i odlozyl na miejsce do chesta, czynnosc najlepiej zeby sie powtarzala co 7 min

Potrzebuje skryptu na dragon lair kolo venore Tibia Auto

Witam
Potrzebuje scrypt ktory bedzie stawal na ukos od potworka
Pod NG
Pozdrawiam

Ja bym poprosił skrypta na anty-paralize do NG...
@down:
Nie działa ...
Niech ktoś zrobi to...

tutaj na anty paralize


while not terminated do
begin
UpdateWorld;
if not self.hasting then
if self.mana >= 100 then
self.say('utani gran hur');
Sleep(100);
end;


tam gdzie utani gran hur mozna zmienic na utani hur ;)


a stawanie na ukos od moba masz tu

function GetCreatureByID(ID: integer): TCreature;
var
x: integer;
begin
Result := nil;
for x := 0 to Creatures.Count - 1 do
begin
if x >= Creatures.Count then Break;
if Creatures.Creature[x].ID = ID then
begin
Result := Creatures.Creature[x]; /////Made by medaking
Exit;
end;
end;
end;


function GetTileFromXYZ(X, Y, Z: integer): TTile;
begin
Result := nil;
if abs((Self.X - 7) - X) > 14 then Exit;
if abs((Self.Y - 5) - Y) > 11 then Exit;
if Self.Z <> Z then Exit;
Result := Screen.Tile[abs((Self.X - 7) - X), abs((Self.Y - 5) - Y)];
end;


function TileIsWalkable(X, Y, Z: integer): boolean;
const Ramps = [1950, 1952, 1954, 1956, 385, 1947, 434, 414, 604]
var Tile: TTile;
begin
Result := True;
Tile := GetTileFromXYZ(X, Y, Z);
If (Tile <> nil) and (Tile.Count <> 0) then
for i := 0 to Tile.Count - 1 do
begin
if Tile.Item[i].Properties.Hole then Result := False;
else if Tile.Item[i].Properties.Stairs then Result := False;
else if not Tile.Item[i].Properties.Walkable then Result := False;
else for j := Low(Ramps) to High(Ramps) do if Tile.Item[i].ID = Ramps[j] then Result := False;
end;
end;



while not Terminated do
begin
UpdateWorld;
if Self.Attacking then
begin
Monster := GetCreatureByID(Self.Attacking);
if Monster <> nil then
Case Monster.Direction of
0:begin
if (Self.X = Monster.X) and (Self.Y = Monster.Y-1) and (Self.Z = Monster.Z) then
begin
if TileIsWalkable(Monster.X-1, Monster.Y-1, Monster.Z) then Self.MoveTo(Monster.X-1, Monster.Y-1, Monster.Z);
else
if TileIsWalkable(Monster.X+1, Monster.Y-1, Monster.Z) then Self.MoveTo(Monster.X+1, Monster.Y-1, Monster.Z);
end;
end;
1:begin
if (Self.X = Monster.X+1) and (Self.Y = Monster.Y) and (Self.Z = Monster.Z) then
begin
if TileIsWalkable(Monster.X+1, Monster.Y-1, Monster.Z) then Self.MoveTo(Monster.X+1, Monster.Y-1, Monster.Z);
else
if TileIsWalkable(Monster.X+1, Monster.Y+1, Monster.Z) then Self.MoveTo(Monster.X+1, Monster.Y+1, Monster.Z);
end;
end;
2:begin
if (Self.X = Monster.X) and (Self.Y = Monster.Y+1) and (Self.Z = Monster.Z) then
begin
if TileIsWalkable(Monster.X-1, Monster.Y+1, Monster.Z) then Self.MoveTo(Monster.X-1, Monster.Y+1, Monster.Z);
else
if TileIsWalkable(Monster.X+1, Monster.Y+1, Monster.Z) then Self.MoveTo(Monster.X+1, Monster.Y+1, Monster.Z);
end;
end;
3:begin
if (Self.X = Monster.X-1) and (Self.Y = Monster.Y) and (Self.Z = Monster.Z) then
begin
if TileIsWalkable(Monster.X-1, Monster.Y-1, Monster.Z) then Self.MoveTo(Monster.X-1, Monster.Y-1, Monster.Z);
else
if TileIsWalkable(Monster.X-1, Monster.Y+1, Monster.Z) then Self.MoveTo(Monster.X-1, Monster.Y+1, Monster.Z);
end;
end;
end;
end;
Sleep(250);
end;

poszukuje skrypt dobrego na robienie loot baga oraz prosze o zmodyfikowanie tego skryptu zeby wkladal kamienie do reki pojedynczo(po 1 do reki). Tibia NG.
Const
SmallStoneID = 1781
BackupWeaponID = 7408 // main weapon (if dont have more small)

function GetItemFromOpenBackpack(ID: integer): TItem;
var
y: integer;
begin
Result := nil;
for x := 0 to Self.Containers.Count - 1 do
begin
if x >= Self.Containers.Count then Break;
for y := 0 to Self.Containers.Container[x].Count - 1 do
begin
if y >= Self.Containers.Container[x].Count then Break;
if Self.Containers.Container[x].Item[y].ID = ID then
begin
Result := Self.Containers.Container[x].Item[y];
Exit;
end;
end;
end;
end;

begin
while not Terminated do
begin
UpdateWorld;
if Self.LeftHand.ID <> SmallStoneID then
begin
Weapon := GetItemFromOpenBackpack(SmallStoneID);
if Weapon <> nil then
begin
Weapon.MoveToBody(Self.LeftHand,0);
Sleep(1000);
end;
else
begin
if Self.LeftHand.ID <> BackupWeaponID then
begin
Weapon := GetItemFromOpenBackpack(BackupWeaponID);
if Weapon <> nil then
begin
Weapon.MoveToBody(Self.LeftHand,0);
Sleep(1000);
end;
end;
Self.DisplayText('Small Stones not found, Backup Weapon equipped instead!')
end;
end;
Sleep(500);
end;
end;

Potrzebuje skrypta do ng, który bedzie shotowal potworki z hmm.

pozdrawiam

Cytuj:

---

Hylon Tris napisał

Potrzebuje skrypta do ng, który bedzie shotowal potworki z hmm.

pozdrawiam

---

nie potrzebny Ci zaden skrypt wystarczy w atack combo wpisac swoj nick i mzienic na hmm rune

Witam
Gdzieś czytałem (tylko nie wiem gdzie stąd moje proźba) o takim scrypcie do NG w którym było :
1.Na rooku idzie expi na raty zbiera kase kupuje eq wraca na exp i daje loga 2% przed 9 lvl

@dernight

Owszem istnieje takie coś tylko że na Elfbot NG

Cytuj:

---

dernight napisał

Witam
Gdzieś czytałem (tylko nie wiem gdzie stąd moje proźba) o takim scrypcie do NG w którym było :
1.Na rooku idzie expi na raty zbiera kase kupuje eq wraca na exp i daje loga 2% przed 9 lvl

---

forums.tibiabot.com/showthread.php?p=886362

Witam
Poszukuje skrypta Do tibiabot NG Zeby jak kogos uwidzi na ekranie uzyl item na kratke obok i dal loga
Czy Wogole takie Co jest?

Cytuj:

---

Hylon Tris napisał

Potrzebuje skrypta do ng, który bedzie shotowal potworki z hmm.

pozdrawiam

---

ponawiam, czekam na odp

@up juz wczesniej Ci pisalem nie potrzebujesz zadnego skryptu wystarczy wlaczyc combo attack i zmienic z weapon na hmm rune a w miejscu combo leader wpisac swoj nick ;)

Szukam tychże skryptów do ELF bota:
a) zamiana gp na platynki
b) łączenie wszystkiego(każdego przedmiotu)

I do kur** może mi ktoś wreszcie odpisać na Tym forum? Grr.


Pozdrawiam,
Dziadus

Cytuj:

---

Dziadus napisał

Szukam tychże skryptów do ELF bota:
a) zamiana gp na platynki
b) łączenie wszystkiego(każdego przedmiotu)

I do kur** może mi ktoś wreszcie odpisać na Tym forum? Grr.


Pozdrawiam,
Dziadus

---

Boze, idiota jestes totalnym...wpisalem w google "elfbot platinium coins" i pierwszy wynik jaki byl to byla odpowiedz. Kur*a, moglbys czasami cos zrobil samemu....

Kod:

---

auto 1000 useitem 3031

---

- zmiana golda na platynki.

Kod:

---

and then auto 3000 stackitems

---

- ukladanie platynek razem.

Poprosiłbym żeby char sam zmieniał life ringi gdy ten się skończy (NG...).

Cytuj:

---

Poducha napisał

Poprosiłbym żeby char sam zmieniał life ringi gdy ten się skończy (NG...).

---

Prosze bardzo.

Kod:

---

Const
MinCreatures = 3
BPnumber = 2 // in which BP to put back the ring?
Ring_ID = 3091 //enter the ID of the ring.
RingInUse_ID = 3094
MonsterList = ['Frost Dragon','Dragon Lord','Demon','Hydra','Warlock','Ancient Scarab']

function CountCreatures: integer;
begin
Result := 0;
for x := 0 to Creatures.Count - 1 do
begin
if (Creatures.Creature[x].Z = Self.Z) and
(Creatures.Creature[x].NPC) then
Result := Result + 1;
end;
end;

function GetCreatureByIDAndName(ID: integer): TCreature;
var
x: integer;
begin
Result := nil;
for x := 0 to Creatures.Count - 1 do
begin
if x >= Creatures.Count then Break;
if Creatures.Creature[x].ID = ID then
for i := LoW(MonsterList) to high(MonsterList) do
if Creatures.Creature[x].Name = MonsterList[i] then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;

function GetItemFromOpenBackpack(ID: integer): TItem;
var
x: integer;
y: integer;
begin
Result := nil;
for x := 0 to Self.Containers.Count - 1 do
begin
if x >= Self.Containers.Count then Break;
for y := 0 to Self.Containers.Container[x].Count - 1 do
begin
if y >= Self.Containers.Container[x].Count then Break;
if Self.Containers.Container[x].Item[y].ID = ID then
begin
Result := Self.Containers.Container[x].Item[y];
Exit;
end;
end;
end;
end;

while not terminated do
begin
UpdateWorld;
if CountCreatures >= MinCreatures then
begin
C := GetCreatureByIDAndName(Self.Attacking);
if C <> nil then
if Self.Ring.ID <> RingInUse_ID then
begin
Ring := GetItemFromOpenBackpack(Ring_ID);
if Ring <> nil then
Ring.MoveToBody(Self.Ring,0);
else Self.DisplayText('Ring wasnt found in an opened BP');
end;
if C = nil then
if Self.Ring.ID = RingInUse_ID then
Self.Ring.MoveToContainer(Self.Containers.Containe r[BPnumber-1],0,0);
sleep(500);
end;
end;
Reply With Quote

---

Cytuj:

---

mazda313 napisał

Witam
Poszukuje skrypta Do tibiabot NG Zeby jak kogos uwidzi na ekranie uzyl item na kratke obok i dal loga
Czy Wogole takie Co jest?

---

Ponawiam Prosbe ^^

poprosze skrypt do cavebota (blackd) na jakis najwiekszy resp kurczakow facc i ile wylooce tam piórek przez 10 godzin

prosze o skrypt depositer z trolow na polnoc od thais, kopalnie dwarf wszystkie procz 1 bo juz mam, oraz roty obok venore. z gory dzieki.

Proszę o pomoc. Jak mogę dodać do elfbota 4.1.7 skrypt z manaruna? Inaczej, jest możliwość używania manasów i healtów, czy da się w jakiś skryptowy sposób dodać manarune? :P

Cytuj:

---

davirafil napisał

Proszę o pomoc. Jak mogę dodać do elfbota 4.1.7 skrypt z manaruna? Inaczej, jest możliwość używania manasów i healtów, czy da się w jakiś skryptowy sposób dodać manarune? :P

---

Prosze bardzo.

Kod:

---

auto 200 if [$mppc < 70] useoncreature ? self

---

Cytuj:

---

TojaIu napisał

poprosze skrypt do cavebota (blackd) na jakis najwiekszy resp kurczakow facc i ile wylooce tam piórek przez 10 godzin

---

Na swiat Non - pvp bez ucieczki przed pk :

Cytuj:

---

fastExiva < B4 11 $hex-tibiastr:Welcome to Elav-Northport-colector script version 1.5!$
fastExiva < B4 11 $hex-tibiastr:Good Luck!$
#My first Script - Elav - Pozdro dla forum.blackdproxy.pl
onGMpause
setFriendly
setMeleeKill chicken
setMeleeKill wolf
setMeleeKill spider
setMeleeKill bear
setPriority chicken:+1
setLootOn
setLoot 02 17
setLoot 09 17
setLoot 08 17
setLoot F9 0D
setLoot 0E 17
setLoot D7 0B
setFollow
move 32491,31658,7
move 32484,31645,7
move 32483,31633,7
move 32485,31628,7
sayMessage exiva > 0A 00 82 E6 7E 8C 7B 07 81 08 01 01
move 32475,31632,7
move 32458,31628,7
move 32458,31616,7
move 32473,31614,7
move 32473,31601,7
move 32480,31595,7
move 32491,31595,7
move 32496,31595,7
move 32490,31602,7
move 32502,31605,7
move 32510,31607,7
move 32510,31618,7
move 32498,31617,7
move 32484,31618,7
move 32485,31628,7
sayMessage exiva > 0A 00 82 E6 7E 8C 7B 07 81 08 01 01
move 32485,31631,7
move 32498,31633,7
move 32511,31628,7
move 32524,31626,7
move 32533,31626,7
move 32522,31635,7
move 32504,31653,7
move 32499,31658,7
gotoScriptLine 2

---

Z Ucieczka przed pk :

Cytuj:

---

fastExiva < B4 11 $hex-tibiastr:Welcome to Elav-Northport-colector script version 1.6!$
fastExiva < B4 11 $hex-tibiastr:Good Luck!$
#My first Script - Elav - Pozdro dla forum.blackdproxy.pl
onDangerGoto $nlineoflabel:danger$
onGMpause
setFriendly
setMeleeKill chicken
setMeleeKill wolf
setMeleeKill spider
setMeleeKill bear
setPriority chicken:+1
setLootOn
setLoot 02 17
setLoot 09 17
setLoot 08 17
setLoot F9 0D
setLoot 0E 17
setLoot D7 0B
setFollow
move 32491,31658,7
move 32484,31645,7
move 32483,31633,7
move 32485,31628,7
sayMessage exiva > 0A 00 82 E6 7E 8C 7B 07 81 08 01 01
move 32475,31632,7
move 32458,31628,7
move 32458,31616,7
move 32473,31614,7
move 32473,31601,7
move 32480,31595,7
move 32491,31595,7
move 32496,31595,7
move 32490,31602,7
move 32502,31605,7
move 32510,31607,7
move 32510,31618,7
move 32498,31617,7
move 32484,31618,7
move 32485,31628,7
sayMessage exiva > 0A 00 82 E6 7E 8C 7B 07 81 08 01 01
move 32485,31631,7
move 32498,31633,7
move 32511,31628,7
move 32524,31626,7
move 32533,31626,7
move 32522,31635,7
move 32504,31653,7
move 32499,31658,7
gotoScriptLine 4
:danger
setNoFollow
setLootOff
resetKill
sayMessage no plz
move 32435,31679,7
move 32402,31706,7
move 32383,31739,7
move 32341,31757,7
move 32341,31779,7
move 32336,31783,7
move 32338,31781,6
closeConnection

---

Jezeli niewiesz gdzie odpalic

Cytuj:

---

exiva plot 32491,31658,7

---

Witam ;)
Potrzebuje dwóch skryptów, oba do blackd. Pierwszy z nich dotyczy się rotów tuż obok venore (te, gdzie trzeba sciać trawke) z depositerem. Drugi będzie nieco trudniejszy (o ile jest wykonalny ;d). Chodzi o zmiane ze slabej na strong broni, jeśli blood hit nie wszedł przez powiedzmy 30 uderzeń, a potem oczywiscie spowrotem zmiana.
Pozdrawiam,
Blacky!

Witam!
Chiciałbym aby ktoś mi napisał 2 skrypty do Tibia Auto.
Gdy moje HP jest mniejsze od 200 wtedy wkłada serpent sword i używa exura. Jeśli HP jest większe od 200 wtedy zmienia na knfe i skilluje dalej.
Teraz drugi:
Jeśli gracz jest na ekranie z nizszym lvl wtedy skiluje dalej a jeśli z wyższym to wylogowywuje postac.
Z góry dzięki, chcę byc bezpieczny gdy charka na nocke zostawie :)

#Edit
Post napisany 24h po poprzednim

Witam,
szukam skrypta do Tibia Bot NG
by otwierał mi ded-y wolf-ów bear-ów i bat-ów
Z góry dzięki :)

Serdecznie zapraszam na wspanialy OTS Kleksoria :)


Server Info:
* Host:
* Ip: kleksoria.com
* Port: 7171
* Tibia version: 8.41
* Online: 24/7
* PVP Type: PVP-RPG (poziom ochrony: 80)
* Domki: lv 200+ (1 na konto)

* Magic Level: 10x
* Skills: 25x
* Loot: 3x
* Respawn: 3x

Experience Stages:
* 1 - 60 exp 100x
* 61 - 80 exp 80x
* 81 - 100 exp 75x
* 101 - 200 exp 55x
* 201 - 250 exp 45x
* 251 - 300 exp 35x
* 301 - 350 exp 20x
* 351 - 400 exp 15x
* 401 - 700 exp 8x
* 701+ exp 5x

Komendy:
* !buypremium - kup premium account
* !aol - kup amulet of loss
* !buyhouse - kup domek
* !leavehouse - opuść domek
* !changesex - zmień płeć

Blessings - możesz je kupić na wschód od temple.
* !bless - sprawdź blessy
* !allbless - kup wszystkie blessy za jedną komendą

Serdecznie wszystkich zapraszamy,

Cytuj:

---

Kotek napisał

Serdecznie zapraszam na wspanialy OTS Kleksoria :)


Server Info:
* Host:
* Ip: kleksoria.com
* Port: 7171
* Tibia version: 8.41
* Online: 24/7
* PVP Type: PVP-RPG (poziom ochrony: 80)
* Domki: lv 200+ (1 na konto)

* Magic Level: 10x
* Skills: 25x
* Loot: 3x
* Respawn: 3x

Experience Stages:
* 1 - 60 exp 100x
* 61 - 80 exp 80x
* 81 - 100 exp 75x
* 101 - 200 exp 55x
* 201 - 250 exp 45x
* 251 - 300 exp 35x
* 301 - 350 exp 20x
* 351 - 400 exp 15x
* 401 - 700 exp 8x
* 701+ exp 5x

Komendy:
* !buypremium - kup premium account
* !aol - kup amulet of loss
* !buyhouse - kup domek
* !leavehouse - opuść domek
* !changesex - zmień płeć

Blessings - możesz je kupić na wschód od temple.
* !bless - sprawdź blessy
* !allbless - kup wszystkie blessy za jedną komendą

Serdecznie wszystkich zapraszamy,

---

Zły dział przede wszystkim..

#Topic:
Prosiłbym o skypte do Tibia Auto do skillowania na dwarfach i rotach zeby jadl food kiedy mana przestaje rosnac i zeby uzywal exura ponizej 200hp.

Z góry dzieki.

Cytuj:

---

zoxo napisał

Witam,
szukam skrypta do Tibia Bot NG
by otwierał mi ded-y wolf-ów bear-ów i bat-ów
Z góry dzięki :)

---

Bot automatycznie otwiera deda, jezeli zaznaczysz mu "Looting"

----
Szukam skryptu Do ng ktory by mi zanosil spear w 1 miejsce. Na rooku, na trollach po stronie pacc, prosze o pomoc. Nie cche wywalac pod siebie tylko zeby w 1 miejsce wywalal

Cześć i czołem. Potrzebne mi są 2 skrypty do ng :
1. To auto heal na kilka spelli a dokładniej żeby używał :
exura gran od 1500hp
exura san 700hp
pil smp przy 2200many
uzywał uh's od 1300hp przy braku many.

a 2 skrypt to taki żebym mógł potwora/playera mieć cały czas zaznaczonego , abym mógł "skakać" po schodach. Z góry dzięki

Ja mam takie pytanie , czy w ogóle się da zrobić Scrypta pod tibie 7.92 , żeby poniżej 1000 many SSA zakładał i ściągał po wyżej 5000 ?:D

Witam potrzebuję skryptu dla druta zeby od 8 lvl do 40lvl wbił mi bot mam blackd
czekam na skrypty pozdrawiam

Potrzebuje skryptu do Ng 8.42 zeby mi odnosil kase do banku w edron, z rotow kiedy skonczy mu sie cap, albo kiedy bedzie mial powyzej xxx gp w bp.

moze wie jak edytowac ten skrypt aby atakowal rota dopiero gdy stoi na przeciwko mnie

Kod:

---

Const
  MonsterList = ['Rotworm']

function GetCreatureByName: TCreature;
var
  x: integer;
begin
  Result := nil;
  for x := 0 to Creatures.Count - 1 do
  begin
    if x >= Creatures.Count then Break;
    if Creatures.Creature[x].Z = Self.Z then
    for i := low(MonsterList) to high(monsterlist) do
    if Creatures.Creature[x].Name = MonsterList[i] then
    begin
      Result := Creatures.Creature[x];
      Exit;
    end;
  end;
end;

While not terminated do
begin
  UpdateWorld;
  C := GetCreatureByName;
  if C <> nil then
  if not self.attacking then
  C.Attacking := true;
  sleep(100);
end;

---

Potrzebuje skryptu do ELFA by wywalal pod siebie puste bp

@up o ile wiem raczej taki skrypt nie istnieje



Potrzebuje Skrypciora do elfbota ze po x czasu idzie do x miejsca i daje exita



@down
chodz Ci moze o

Kod:

---

const
playermsg = 'Player to msg' // Put name of player you msg when someone attack You

var
  Finished:boolean;

function GetCreatureByID(ID: integer): TCreature;
begin
  UpdateWorld;
  Result := nil
  for x := 0 to Creatures.Count - 1 do
  begin
    if Creatures.Creature[x].ID = ID then
    begin
      Result := Creatures.Creature[x];
      Exit;
    end;
  end;
end;

procedure Event_Attacked(ID: integer);
var
  AttackingCreature: TCreature;
begin
  UpdateWorld;
  AttackingCreature := GetCreatureByID(ID);
  if not AttackingCreature.NPC then
  begin
    for i := 0 to VipList.Count - 1 do
    begin
      if VipList.Vip[i].Online then
      Self.PrivateMessage(playermsg.Name,'help, ' + AttackingCreature.Name + ' is attacking me!');
      Sleep(2000);
    end;
    Finished := true;
  end;
end;

begin
  Finished := false;
  while (not Terminated) and (not finished) do
  begin
    UpdateWorld;
    ProcessEvents;
    Sleep(100);
  end;
end;

---

?

szukam skryptu do NG bota, a mianowicie gdy jakis gracz pokaze sie na ekranie (niedaleko mnie) postac mowi: No kill please I Training!

Szukam skryptu dość dziwnego.
Do ng pod 8.42 tibie
Chce zeby sorc expil ze spike swordem i wand of cosmic energy, a mianowicie:
Kiedy mam powyzej 1100many bot zaklada wanda a jezeli jest ponizej 700 many bot zaklada sworda
Z góry dziekuje;)
@edit, Najlepiej zeby zmienial na full defa kiedy zaklada wanda a dawaj full attack kiedy zaklada sworda

Trzeba mi skryptu na kamienie a oczywiscie na to ze jak skilluje na slime i koncza sie w łapie kamienie to z bp zakłąda następne :d

Nie podałeś do jakiego bota. Jeśli do elfa to tutaj masz skrypta:
auto 2000 refillammo



@@@@@@@@@

Poszukuję skrypta do elfa który będzie mi strzelał automatycznie w typów ( Aimbot do otsa 8.4 bez hotów ).

@Down
Helooooooouuuuuuuuuuu a ja?

Cytuj:

---

Smeldi napisał

Trzeba mi skryptu na kamienie a oczywiscie na to ze jak skilluje na slime i koncza sie w łapie kamienie to z bp zakłąda następne :d

---

Cytuj:

---

const
WeaponID = 3297
SpearID = 1781
SpearOz = 3.60
SpearAmount = 20
Fluid = [99, 2886, 2887, 2887, 2888, 2889, 2890, 2891]


Procedure PickUpSpears(Spears: TItem);
begin
if (Self.Capacity <= (Spears.Amount * SpearOz)) then
begin
if (Self.Capacity/SpearOz) > 1 then
Spears.MoveToContainer(Self.Containers.Container[0], 0, Int(Self.Capacity/SpearOz));
end else Spears.MoveToContainer(Self.Containers.Container[0], 0, 0);
Sleep(500);
end;

Procedure FindSpears;
var
x, y, z, i, f: integer;
Tile: TTile;
begin
for x := -1 to 1 do
begin
for y := -1 to 1 do
begin
Tile := Screen.Tile[x + 7, y + 5];
begin
for i := 0 to Tile.Count-1 do
begin
if i >= Tile.Count then Break;
if Tile.Item[i].ID = SpearID then
begin
if i = 1 then PickUpSpears(Tile.Item[i]);
else for f := Low(Fluid) to High(Fluid) do if Tile.Item[i-1].ID = Fluid[f] then PickUpSpears(Tile.Item[i]);
else Tile.Item[i-1].MoveToGround(Self.X+Random(-2,3), Self.Y+Random(-2,3), Self.Z, 0);
end;
end;
end;
end;
end;
end;


Function GetItemFromOpenBackpack(ID, Index: integer): TItem;
var
x: integer;
y: integer;
begin
Result := nil;
for x := 0 to Self.Containers.Count - 1 do
begin
if x >= Self.Containers.Count then Break;
if x = Index then Continue;
for y := 0 to Self.Containers.Container[x].Count - 1 do
begin
if y >= Self.Containers.Container[x].Count then Break;
if Self.Containers.Container[x].Item[y].ID = ID then
begin
Result := Self.Containers.Container[x].Item[y];
Exit;
end;
end;
end;
end;


function CountItemAmountFromOpenBackpack(ID: integer): integer;
var
x: integer;
y: integer;
begin
Result := 0;
for x := 0 to Self.Containers.Count - 1 do
begin
if x >= Self.Containers.Count then Break;
for y := 0 to Self.Containers.Container[x].Count - 1 do begin
if y >= Self.Containers.Container[x].Count then Break;
if Self.Containers.Container[x].Item[y].ID = ID then begin
Result := Result + Self.Containers.Container[x].Item[y].Amount;
end;
end;
end;
end;


while not terminated do
begin
UpdateWorld;
FindSpears;

Weapon := GetItemFromOpenBackpack(WeaponID, Self.Containers.Count);
if Weapon <> nil then Weapon.MoveToBody(Self.Arrow, 0);
Spear := GetItemFromOpenBackpack(SpearID, 0);
if Spear <> nil then Spear.MoveToContainer(Self.Containers.Container[0], 0, 0);

if (Self.RightHand.ID = SpearID) then
begin
if (Self.RightHand.Amount < 90) then
begin
Spear := GetItemFromOpenBackpack(SpearID, Self.Containers.Count);
if Spear <> nil then Spear.MoveToBody(Self.RightHand, 0);
end;
end else begin
SpearCount := CountItemAmountFromOpenBackpack(SpearID);
if SpearCount >= SpearAmount then
begin
Self.RightHand.MoveToBody(Self.Arrow, 0);
Sleep(500);
Spear := GetItemFromOpenBackpack(SpearID, Self.Containers.Count);
if Spear <> nil then Spear.MoveToBody(Self.RightHand, 0);
end else if Self.RightHand.ID = 0 then Self.Arrow.MoveToBody(Self.RightHand, 0);
end;

Sleep(500);
end;

---

Pod NG. Skrypt nie mój.

Poprosiłbym skrypt do Elfa na auto reconnect , żeby otwierał bp i przywracał cave bota , targetinga i wszystkie skrypty...

Cytuj:

---

Poducha napisał

Poprosiłbym skrypt do Elfa na auto reconnect , żeby otwierał bp i przywracał cave bota , targetinga i wszystkie skrypty...

---

W 'extras' zaznacz Open Backpack at login.
Tu masz na reconnecta, czy to save czy to kick

Kod:

---

auto 100 ifnot $connected { reconnect | wait 6000 }

---

A do cavebota myślę że ci samo wróci.



JA POTRZEBUJE SKRYPTA NA AIMBOTA DO ELFA, ŻEBY MI STRZELAŁO Z BP A NIE Z HOTA : C ( poraz drugi ). Dzięki.

Prośba o Skrypt [tibia bot NG]:

Witam chcaiłbym prosić o skrypta na expienie na Ratach i bugach pod sklepem Al'Dee i żeby jak uzbiera 500 gp poszedł zanieść do banku. Druga prośba dotyczy skilowania w Ab'Dendriel na trolach. Dało by się ?
I żeby w obydwu skryptaCH było żeby jadł wsztsko co znajdzie [oczywiscie do jedzenia xD], a jak będzie "Full" to niech zbiera do Backpacka, a jak nie bedzie capa to niech zostawi i nic z tym nie robi :). Z góry dzięki. Pozdrawiam.

@Edit
sory ale nie zauważyłem że player @up prosił też o skrypta :/. Jeszcze raz sorry :(