SRL Archive - RS3 Outdated / Broken Scripts

This is my second script ever… You will probably have to modify but it is a start.

You have to be i the crafting guide for this to work…. A bucket or jug has to be in your second inventory slot… and dry clay in most of the rest.

To start, will have to face the sink in the crafting guide. I knwo this isn't profesional or whatever, but the blue water should be towards the top of your screen. Having the highest view angle would probably be best. The script must be stopped manually. Here it is:

program wetclay;
var
x, y, x1, y1: Integer;
begin
repeat
//click on water jug 636, 305
MoveMouseCC(636, 305, 2, 9, 3, 2);
Wait(RandomRange(150, 200));
ClickMouseBox(629, 299, 642, 309, True);
Wait(RandomRange(150, 200));

if(FindColorTolerance(x, y, 8677464, 40, 131, 524, 409, 1
))then//found water in sink
begin
MoveMouseCC(x, y+8, 2, 9, 3, 2); //MoveMouseCC(x, y, range, segments, pcount, delay);
Wait(RandomRange(150, 200));
ClickMouseBox(x-2, y+6, x+2, y+10, True);
end
else
begin
Wait(RandomRange(500, 1000));
Writeln('not found');
end
//full jug
MoveMouseCC(636, 305, 2, 9, 3, 2);
Wait(RandomRange(150, 200));
ClickMouseBox(629, 299, 642, 309, True);
Wait(RandomRange(150, 200));


//click clay
FindColorTolerance(x, y, 5276319, 573, 292, 743, 532, 3)
MoveMouseCC(x, y, 2, 9, 3, 2); //MoveMouseCC(x, y, range, segments, pcount, delay);
Wait(RandomRange(500, 800));
ClickMouseBox(x-2, y-2, x+2, y+2, True);
Wait(RandomRange(150, 200));

until(False)
end.


I know I'm a runescape script noob, but If anyone sees my potential… Just contact me and give me a starting on how I can learn more.

Syphon.

Not bad…instead of MoveMouseCC use MMouse…it's less detectable.

MMouse(x, y, 5, 5); 5, 5 is random offset…

I hate the documentation of SRL. How do I cange the speed of the mouse with the mmouse function? Also, I want the mouse to move to a random spot within 5 pixles or whatever, then click in that exact same spot… How can I do that?

add +random(5) inside the brackets…

Added Standards and some Srl mouse functions

program wetclay;
{.Include SRL/SRL.scar}

begin
MouseSpeed:= 10; //lower the number faster the mouse
repeat
  //click on water jug 636, 305
  MMouse(636, 305,5, 5); //Moves it to cords 636 305, mising by 5 pixles x and y
  Wait(RandomRange(150, 200));           
  if (IsUpText('Jug'))then //looks for text upper left connor
  begin
    Mouse(636, 305, 5, 5, True); //moves and clicks mising by 5 pixles x and y
    Wait(RandomRange(150, 200));
  end;
if(FindColorTolerance(x, y, 8677464, 40, 131, 524, 409, 1))then//found water in sink
begin
  MMouse(x, y+8, 2, 2); //MMouse(xCoord,yCoord,xOff,yOff);
  Wait(RandomRange(150, 200));
  Mouse(x-2, y+6, 2, 10, True);
end;
else
begin
  Wait(RandomRange(500, 1000));
  Writeln('Sink not found');//be specific to what wasn't found
end;
//full jug
begin
  MMouse(636, 305, 2, 9);
  Wait(RandomRange(150, 200));
  Mouse(636, 305, 5, 5, True);
  Wait(RandomRange(150, 200));
end;

//click clay
begin
  FindColorTolerance(x, y, 5276319, 573, 292, 743, 532, 3)
  MMouse(x, y, 2, 2);
  Wait(RandomRange(500, 800));
  Mouse(x, y, 2, 2, True);
  Wait(RandomRange(150, 200));
end;
until(False)
end.

Look into Bitmaps or DTMs for easy item finding :D
Hope this helps,
~Stupedspam

Offtopic - StupedSpam I like your Siggy!

Ontopic - This script is a little simple but seeing its your second script it will suffice.