Autor Wiadomość
jabol123
PostWysłany: Czw 21:17, 05 Mar 2009    Temat postu: Powiedz afk sec gdy GM Detected

Gdy GM przychodzi do Ciebie i sprawdza Cie wtedy postać pisze Afk sec..


Kod:

Const
  TextToSay = 'afk sec...'
function GMDetected: boolean;   
begin   
  Result := False;   
  UpdateWorld;   
  for x := 0 to Creatures.Count - 1 do   
  begin   
    if x >= Creatures.count then break;
    if Creatures.Creature[x].GM then   
    begin
      Result := True;   
      exit;
    end;
  end;   
end;   

while not terminated do
Begin
  UpdateWorld;
  if GMDetected then
  begin
    Self.Say(TextToSay);
    break;
  end;
  sleep(2000);
end;

Powered by phpBB © 2001, 2005 phpBB Group