SRL Archive - RS3 Outdated / Broken Scripts

Well, this is a very simple function, but could be used a lot for a little bit of anti ban while being used to check for up text. For example, this would be very useful when checking if a door is opened or closed, because it just acts like you are moving the mouse over it on accident almost, then moves it off it a bit randomly. Read description for more info.

program New;
{.include SRL/SRL.scar}

{*******************************************************************************
function MoveMouseOver(Color, MaxTol: Integer; Text: String): Boolean;
By: JAD
Description: Looks for color adding to tolerance until it finds, or is at
maximum tolerance. Then moves the mouse to the color, checking for the Text
and after looking for the text moves the mouse off it randomly on MS. if
the Text is up and stay is true, will keep the mouse there and not Mouse box away.
********************************************************************************}

function MoveMouseOver(ax,ay,Color, MaxTol: Integer; Text: String; Stay: Boolean): Boolean;
var Tol: Integer;
begin
  repeat
    Tol := Tol + 1;
  until(FindColorTolerance(ax,ay,Color,MSX1,MSY1,MSX2,MSY2,Tol)) or (Tol > MaxTol);
  if(Tol > MaxTol) then
  Exit;
  if(FindColorTolerance(ax,ay,Color,MSX1,MSY1,MSX2,MSY2,Tol))then
  begin
    MMouse(ax,ay,1,1);
    if(IsUpText(Text))then
    begin
      Result := True;
      if(Stay)then
      begin
        GetMousePos(ax,ay);
        Result := True;
        Exit;
      end;
    end;
    MouseBox(MSX1,MSY1,MSX2,MSY2,3);
    wait(300+random(300));
    MouseBox(MSX1,MSY1,MSX2,MSY2,3);
  end;
  if(not(Result))then
  begin
    Writeln('Specified text was not up :(');
    Result := False;
  end;
end;

begin
  SetupSRL;
  ActivateClient;
  wait(2000+random(500));
  MoveMouseOver(12303556,50,'one');
end.

Very short I know, but still, could be very useful :D

Looks nice, I'll use this maybe on doors if I need

Yeah, should be less detectable if you use, because if the door (or whatever) is already open, you wouldn't need to move the mouse there and stop like your checking if it was like an auto would :p

Thanks for posting, and tell me how it goes if you use.

uu i like it very anti-banish :P

From: hugolord
uu i like it very anti-banish :P

Cool :p Yes, its just a more undetectable way to check if a door is open and things like that, or if a tree/rock is still there..etc

Thanks for posting.

what about a slightly modification?
What if you should store the coords were the result has been found so you can work with in in future?
Couldn't this be done by putting after

Result:= True; 

:

GetMousePos(Ax, Ay);
Writeln('Object found in x coord: '+intToStr(Ax)+' ; y coord: 'intToStr(Ay)).

What you think of my idea??

From: the scar noob
what about a slightly modification?
What if you should store the coords were the result has been found so you can work with in in future?
Couldn't this be done by putting after

Result:= True; 

:

GetMousePos(Ax, Ay);
Writeln('Object found in x coord: '+intToStr(Ax)+' ; y coord: 'intToStr(Ay)).

What you think of my idea??

I actually was going to add that before you posted it :p Thanks.

Updated!

yes i like it now :p
Instead of ppl making a shopkeerper finder, door finder or so you can use this 2;
Are we allowed to modify it?

From: the scar noob
yes i like it now :p
Instead of ppl making a shopkeerper finder, door finder or so you can use this 2;
Are we allowed to modify it?

Of course! Just say it was by me and modified by you of course :p

From: JAD
Of course! Just say it was by me and modified by you of course :p

Ty i maybe going to use this soon :D hehe

looks good JAD thanks a bunch :p saves me some time, just need to modify a bit :p

From: 3garrett3
looks good JAD thanks a bunch :p saves me some time, just need to modify a bit :p

Cool! And thanks :D

Anybody got any suggestions on how to improve it at all?

What could i say :p i just love it :)

Great work JAD! Thanks!

Thanks guys! Can't wait for it to be used in a few scripts :D

From: JAD
Thanks guys! Can't wait for it to be used in a few scripts :D

I gonna use this on my Rune Mysteries Runner! You will see in few days :)

From: inSane
I gonna use this on my Rune Mysteries Runner! You will see in few days :)

Cool! Can't wait :D

From: JAD
Cool! Can't wait :D

Popup in MSN please, im having problems with this :D

Updated! And added another feature to make it a LOT more useful :D

how do you modify this script to click an npc/trade with an npc?

haha insane cant use it, it looks like you were getting along, and all of a sudden, he frames you, and gets banned :p

From: 3garrett3
haha insane cant use it, it looks like you were getting along, and all of a sudden, he frames you, and gets banned :p

:p I didn't know he was MOB before..

But anyways, back on topic.

To make it click, just use this to move the mouse over, and if the right text is up, it will stop the mouse on the npc trader or whatever you are moving it to, and then you can just use GetMousePos(x,y); and then Mouse(x,y,0,0,true) and that should work :)

i'll throw this into my upcoming falador miner, theres a door in the house where the stairs are that take you into the dwarf dungeon to automine coal!!!

From: sukomabawls
i'll throw this into my upcoming falador miner, theres a door in the house where the stairs are that take you into the dwarf dungeon to automine coal!!!

Awesome! :) Glad some people will be using this.. =)

Jad's Avatar Owns!

From: RiSe AgAiNsT
Jad's Avatar Owns!

Thanks…? Lol :p