SRL Archive - SRL Archives

{*******************************************************************************
procedure ClickNorth(AngleHigh : True);
By: R1ch
Description: Clicks the compass to make it perfect North. Will set angle at
             highest depending on AngleHigh
*******************************************************************************}
procedure ClickNorth(AngleHigh : True);
begin
  if Random(4) = 1 then
  begin
    Mouse(542, 24, 15, 15, False);
    WaitOptionMulti(['ace', 'orth'], 1200);
  end else
    Mouse(542, 24, 15, 15, True);
  if AngleHigh then
  begin
    Wait(RandomRange(500, 1250));
    SetAngle(True);
  end;
end;

A simple little procedure which will click on the compass next to the mini-map to make it perfect North. It will set the angle of the screen to the highest depending on AngleHigh.

Richard

Bada bada bum bum ba bump! Ow!

Sorry, I but I wants attentions!

Maybe decrease the waiting time? Isn't it a bit much with 2 seconds? :P

Yay i use this in script i will release once i get 92 fm

From: Zyt3x
Maybe decrease the waiting time? Isn't it a bit much with 2 seconds? :P

Changed.

From: Neehosoft
Yay i use this in script i will release once i get 92 fm

:)

Changed it a bit also, so that it will right click a quarter of the time.

Committed, thanks!