5/23/2010
Script Para Entrenar Con Ghoul ( TibiaBot NG )
489
Este Script es para poder entrenar con ghoul mientras usar el TibiaBot NG, esta probado y funciona correctamente, deben fijarse en que este bien copiado porque con alguna letra faltante el script no funcionara.
SCRIPT:
Const
SwitchAt=50;
AttackAt=90;
var
creature:tcreature;
function GetCreatureByNameHPHIGH(Name: string): TCreature;
var
x: integer;
begin
Result := nil;
for x := 0 to Creatures.Count - 1 do
if x >= Creatures.Count then Break;
if Creatures.Creature[x].Name = Name then
if Creatures.Creature[x].Health>AttackAt then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;
function Attacking: boolean;
var
x: integer;
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 GetAttackedCreature: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].Attacking=true then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;
begin
while not Terminated do
begin
UpdateWorld;
if not attacking then
begin
Creature:=GetCreatureByNameHPHIGH('Ghoul'); //Nome do monstro
if Creature <> nil then
creature.attacking:=true;
end;
if attacking then
begin
Creature:=GetAttackedCreature;
if Creature <> nil then
if creature.Health < SwitchAt then creature.attacking:=false;
end;
sleep(1000);
end;
end;
Suscribirse a:
Enviar comentarios (Atom)
0 Responses to “Script Para Entrenar Con Ghoul ( 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.