SRL Archive - SRL Archives

ok i know this has been done but this is a much easier version IMO than
EvilChicken!'s one.

{*******************************************************************************
function ChooseChat(S: TStringArray): Boolean;
By: Quickmarch
Description: Choose's a Chat inside the Quick Chat.
*******************************************************************************}
function ChooseChat(S: TStringArray): Boolean;
var
  i: Integer;

begin
  Wait(1000+random(100));
  SendKeys(chr(13));
  Wait(100+random(100));
  for i := 0 to High(S) do
  begin
    Result := ClickText(S[i], SmallChars, 7, 361, 513, 473, True);
    if Result then
    Wait(1000+random(200));
  end;
end;

example here:

ChooseChat(['Inter', 'Rune', 'Mini', 'Fist']);

Make sure you spell what you are looking for properly!:) :)

You have a memory leak.

Make sure you free the BMP at the end REGARDLESS.

You should make the Result := ClickText if it returns a boolean.

Shouldn't SetChat('on', 1) be outside the if statement? Meaning it is set regardless if it finds the bmp or not?

Thats all I have right now :)

ahhh yess i see what your saying ok ill fix:)


Edit: Fixed:)

Use TypeSend?

From: Nava2
Use TypeSend?

Or TypeByte ;)

why use them?