[8.54][TibiaBot NG] Problem z Target All :/

Siema.
Jako, ze na 7-ce 64bit nie dało rady zcrackować NG, byłem zmuszony zakupić swoja licencje... liczyłem na bezproblemowe działanie, ale najwyrazniej sie przeliczyłem :/ Włączam bota, chodzi, leczy sie, sraty pierdaty, wszystko śmiga, ale.... Atakuje potwory, tylko gdy są na kratce obok >.< nie działa opcja "target all". Mam zaznaczone zarówno w Tibii, jak i w NG "uruchom jako administrator" i to nie bardzo coś daje :/
Jest na to jakiś sposób ?? =/

skryptem, najlatwiej go znalesc jako skrypt do zaznaczania chickenow i przerobic.

A to nie jest czasem anty-bananowy zabieg autorów?

Musisz ustawic w zakladce targeting opcje follow/attack i masz taki sowak ktorym regulujesz odleglosc potworkow. Jak to nie zadziala sciagnij obojetnie jaki targeting z neta i go odpal tylko podmien nazwy potworkow.

pozdro

Cytuj:

---

marcin3650 napisał

Musisz ustawic w zakladce targeting opcje follow/attack i masz taki sowak ktorym regulujesz odleglosc potworkow. Jak to nie zadziala sciagnij obojetnie jaki targeting z neta i go odpal tylko podmien nazwy potworkow.

pozdro

---

to jest w elf bocie

Tutaj masz skrypta na atakowanie potworów o danej nazwie jak np CHICKEN

Cytuj:

---

var
MotherSlime: integer;

function Attacking: boolean;
var
x: integer;
begin
Result := False;
for x := 0 to Creatures.Count - 1 do
begin
if x >= Creatures.Count then Break;

if Creatures.Creature[x].Attacking then
begin
Result := True;
Exit;
end;
end;
end;

function GetFollowedCreatureID: integer;
var
x: integer;
begin
Result := False;
for x := 0 to Creatures.Count - 1 do
begin
if x >= Creatures.Count then Break;
if Creatures.Creature[x].Following then
begin
Result := Creatures.Creature[x].ID;
Exit;
end;
end;
end;

function GetCreatureByNameExcludeID(Name: string; 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].Name = Name) and (Creatures.Creature[x].ID <> ID)) then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;

begin
UpdateWorld;
MotherSlime := GetFollowedCreatureID;
while not Terminated do
begin
UpdateWorld;
if not Attacking then
begin
Creature := GetCreatureByNameExcludeID('Chicken', MotherSlime);
if Creature <> nil then
begin
Creature.Attacking := True;
end;
end;
Sleep(1000);
end;
end;

---