
Originally Posted by
dushii
nope i looked at the script and found nothing about running with Ctrl
And I remembered me..
SCAR Code:
Function PickupStuff: Boolean;
var Gx, Gy, Dumx, Dumy:Integer;
begin
if Pickup then
begin
Gx := MSCx;
Gy := MSCy;
if FindColorSpiralTolerance(Gx, Gy, 1347504, MSX1, MSY1, MSX2, MSY2, 4) or
FindColorSpiralTolerance(Gx, Gy, 11842750, MSX1, MSY1, MSX2, MSY2, 2)
then
begin
MMouse(Gx, Gy, 2, 2);
Wait(100);
GetMousePos(Gx, Gy);
FindNonInventoryRandoms;
if FindColorTolerance(Dumx, Dumy, 4293337, 42, 8, 120, 21, 50) then // Brown
begin
Mouse(Gx, Gy, 0, 0, False); // pick it up!
[B]RunControl(True);[/B]
ChooseOptionText;
[B]RunControl(False);[/B]
Result:=True;
end;
end;
end;
end;
It could also be that he was the first one using that procedure of srl
-Tsn.