SRL Archive - SRL Suggestions

Same thing as this thread:
http://villavu.com/forum/showthread.php?t=57632

original:

{*******************************************************************************
procedure Retaliate(RetTrue: Boolean);
By: WT-Fakawi & n3ss3s, slight mod by EvilChicken!
Description: Set's Auto Retaliate ON of OFF.
*******************************************************************************}
procedure Retaliate(RetTrue: Boolean);
Var
  X, Y: Integer;
Begin
  if (GetCurrentTab <> tab_Combat) then
  begin
    GameTab(tab_Combat);
    Wait(500 + Random(500));
  end;
  if (RetTrue) xor FindColorTolerance(X, Y, 1777019, 624, 385, 719, 396, 2) then
    MouseBox(624, 385, 719, 396, 1);
End;

Shorter:

{*******************************************************************************
procedure Retaliate(RetTrue: Boolean);
By: WT-Fakawi & n3ss3s, slight mod by EvilChicken!
Description: Set's Auto Retaliate ON of OFF.
*******************************************************************************}
procedure Retaliate(RetTrue: Boolean);
Var
  X, Y: Integer;
Begin
  GameTab(tab_Combat);
  Wait(200 + Random(200));
  if (RetTrue) xor FindColorTolerance(X, Y, 1777019, 624, 385, 719, 396, 2) then
    MouseBox(624, 385, 719, 396, 1);
End;

The one in SRL only waits if the gameteb needs to be switched, in case of lag.
So, no, I won't commit this.

And I appreciate what you're doing, really – but next time, just post all fixes in one thread, kay? <3

From: EvilChicken!
The one in SRL only waits if the gameteb needs to be switched, in case of lag.
So, no, I won't commit this.

And I appreciate what you're doing, really – but next time, just post all fixes in one thread, kay? <3

I would have, had I fixed them all at once ;)