El sitio prohibido de ventas sunglasses

12/10/2010

Script Para Entrenar Con Slimes - TibiaBot NG

489

Nota: Antes de ejecutar el Script, tienes que ponerle "Follow" al Slime (Madre).

function Attacking: boolean;
begin
UpdateWorld;
for x := 0 to Creatures.Count - 1 do
begin
UpdateWorld;
if Creatures.Creature[x].Attacking then
begin
Result := True;
Exit;
end;
end;
Result := False;
Exit;
end;

function GetFollowedCreatureID: integer;
begin
UpdateWorld;
for x := 0 to Creatures.Count - 1 do
begin
UpdateWorld;

if Creatures.Creature[x].Following then
begin
Result := Creatures.Creature[x].ID;
Exit;
end;
end;
end;

var
MotherSlime, X1, Y1: integer;
begin
MotherSlime := GetFollowedCreatureID;
while not Terminated do
begin
UpdateWorld;
if not Attacking then
begin
UpdateWorld;
for x := 0 to Creatures.Count - 1 do
begin
UpdateWorld;
if Creatures.Creature[x].ID <> MotherSlime then
begin
if (Creatures.Creature[x].Name <> Self.Name) and Creatures.Creature[x].NPC then
begin
UpdateWorld;
X1 := Creatures.Creature[x].X;
Y1 := Creatures.Creature[x].Y;
if (X1 - Self.X = 1) or (X1 - Self.X = 0) or (X1 - Self.X = -1) then
begin
UpdateWorld;
if (Y1 - Self.Y = 1) or (Y1 - Self.Y = 0) or (Y1 - Self.Y = -1) then
begin
Creatures.Creature[x].Attacking := true;
Break;
end;
end;
end;
end;
end;
end;
Sleep(1000);
end;
end;
Recomiendo el Siguiente Tutorial >> ( Tutorial Ejecutar Script en TibiaBot NG )

0 Responses to “Script Para Entrenar Con Slimes - TibiaBot NG”

Publicar un comentario

¿Te pareció interesante el Articulo?, Registrate para que estes al dia con los últimos Articulos que publicamos en Tibia Laner.

Los Comentarios seran moderados y publicados a la brevedad.

Todos los derechos reservados Tibia Laner - Bots de Tibia