Jogar determinada runa em determinado bicho

Const
IgnoreList = ['Sam','Hardek','Rat','Cave Rat','Skeleton'] // Add qnts quizer
MaxMonsters = 1 // qntidade de bixo para ele jogar a runa
RuneID =
3165
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;

while not terminated do
begin
A := 0;
UpdateWorld
For i := 0 to Creatures.Count -1 do
begin
if (i >= Creatures.Count) or (terminated) then break;
if (Creatures.Creature.NPC) and (Creatures.Creature.Z = Self.Z) then
begin
B := 0;
for g := Low(IgnoreList) To High(IgnoreList) do
begin
if AnsiLowerCase(Creatures.Creature.Name) = AnsiLowerCase(IgnoreList[g]) then
begin
B := 1;
break;
end;
sleep(10);
end;
if B = 0 then A := A + 1;
end;
Sleep(10);
end;
if A > MaxMonsters then
begin
UpdateWorld;
if Self.Attacking <> 0 then
Target := GetCreatureByID(Self.Attacking);
if Target <> nil then
Self.Containers.UseItemWithCreature(RuneID,Target);
Sleep(1000);
end;
Sleep(100);
end;

1 comentários | COMENTE AQUI!!! :

Anônimo disse...

deu esse erro [Error] Untitled(27): Invalid array indexing for property 'Creature'. Expected 1 dimensions

no script atacar runas em tal bixo pod me ajudar xd ?

Postar um comentário

Digite aqui seu comentário...

© Copyright 2009-2013 - Tibia Dash - Direitos Reservados.
Proibida a cópia total ou parcial deste site.
Tibia é propriedade da CipSoft GmbH . Mais em Termos e Condições .