What's new

- Waypoints [Darashia] Zachodnie rotwormy

Status
Not open for further replies.

Afrati

Active User
Joined
Aug 7, 2010
Messages
137
Reaction score
26
Darashia Zachodnie Rotworm'y


Potwory : Rotworms
LvL : 10+
Skille : 20/20 (Bro?/Tarcza)


Uwagi dodatkowe:

Skrypt (Kolejno?? ataku)

Code:
Const
  MonsterList = ['Carrion Worm','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;


Download:
Skan:
 
Status
Not open for further replies.
Top