SRL Archive - RS3 Script Requests

i just want a color clicker where i get the color and i can set it for a private server and also if it cant find the color it will just stop the process and repeat it…. i said if its possible cus idk if scar works off rs

what do you want to do with it?

private server lol :p u can say its sad but its same thing as rs so..

ohh i want to thiev then i want it to solve a random event thats what the color is for i want it to click the guy then click the stall easy

believe me, simba is able to do a lot more than that :p

~shut

well can someone make i spent a hour trying and i got this from a tut:

program chopatree;
{.include srl/srl.scar}

const
treecolor1=15123344;
timetochop=15000;

procedure chop;
Var x,y :integer;
begin
if(FindColorSpiralTolerance(x,y,treecolor1,msx1,msy1,msx2,msy2,25))then
MMouse(x,y,3,3);
if(IsUpText('hop'))then
begin
GetMousePos(x,y);
Mouse(x,y,3,3,true)
end;
end;

procedure treewait;
begin
Wait(timetochop)
end;


begin
ClearDebug;
SetUpSrl;
ActivateClient;
repeat
treewait;
chop;
until(false)
end.

and i get this error in a math tab:

Line 51: [Error] (330:11): Unknown identifier 'CreateTPAFromBMP' in script C:\Program Files\SCAR 3.22\includes\SRL\SRL\Core\Math.scar
Failed when compiling

may i suggest you use simba?
use this tutorial on setting it up, then let me know if you have problems

~shut

omg got it to work but now it just goes to the top left of my screen everytime o.0

From: rs cheata
omg got it to work but now it just goes to the top left of my screen everytime o.0

sorry nut i have to ask, did you drag the cross heir to the client?

~shut

umm yea i tried it and all it does is not move the mouse or anything but just click in the same spot

bump

Twenty minutes isn't long enough for a bump. Bumps are generally frowned upon, as well as multi-posting, as well. Someone will help when they can.

sorry?

ok now bump? over 12 hours

A week is appropriate for a bump.

I lol'd

Regardless, slapped this up in a few minuets:

program SimpleMacro;
{.include srl/srl.scar}
{________________________________________________
//          SIMPLE SETUP INSTRUCTIONS           \\
//===============================================\\
||*TheColor is the color of the object you want  ||
|| to click. Use the color picker to get the     ||
|| color.                                        ||
||-----------------------------------------------||
||*TheTolerance is the +/- value of colors you  ||
|| want to pick. I suggest ~ 15                  ||
||-----------------------------------------------||
||*TheOption is the right-click option you want  ||
|| to do. EG: 'Chop Tree'. Note that this is case||
|| sensitive.                                    ||
||-----------------------------------------------||
||*WaitTime is the ammount in Miliseconds that   ||
|| you want to wait between Actions. This can    ||
|| range alot between tasks.                     ||
||-----------------------------------------------||
||*Be sure to be logged in when you use this.    ||
||-----------------------------------------------||
||*Press F4 to stop the script. This will not be ||
|| Immeadiate. You have to wait until it is done ||
|| waiting.                                      ||
||===============================================||
||         WARNINGS, DISCLAIMERS & TIPS          ||
||===============================================||
||This script has no anti-ban, and does NOT check||
||uptext. I did not test this script at all, just||
||made it. If it doesn't work right, read some   ||
||tutorials and fix it, or make your own.        ||
||This script also has minimal randomness.       ||
||NEVER USE THIS SCRIPT IN THE OFFICAL GAME. YOU ||
||WILL BE BANNED.                                ||
\\===============================================//


}
//Fill this out, use the above instructions if you need to.
Const
TheColor = 1234567;
TheTolerance = 15;
TheOption = 'Chop Down';
WaitTime = 3000;

//No touchy below here, unless you know what you're doing :P































var
Sucess : integer;
Function FindObject: boolean;
var x, y: integer;
begin
if FindColorSpiralTolerance(x,y,TheColor,MSX1,MSY1,MSX2,MSY2,TheTolerance) then
 begin
  Mouse(x,y,10,10,false)
  if ChooseOption(TheOption) then
  begin
   Inc(Sucess)
   result := true;
  end else
   begin
    Writeln('['+TheTime+']  Option not found.')
    result := false;
   end;
 end else
 begin
  Writeln('['+TheTime+']  Color Not Found. If you keep getting this message, increase TheTolerance, or pick a better color.');
  result := false;
 end;
end;

begin
SetupSRL;
clearDebug;
 Repeat
  FindObject;
  wait(waittime)
 until(false or isfkeydown(4))
end.