SRL Archive - RS3 Outdated / Broken Scripts

Ok, im not sure if this is where this goes, but i am requesting people to test my script. (its a script, and im requesting something, so it should go here? :p) I need hints on making it better and basically, just how far it made it.

{---------------------------------------------------------------------|
|---------------------------Auto--------------------------------------|
|--------------------------Walker-------------------------------------|
|-----------------------By: 3Garrett3!--------------------------------|
|---------------------------------------------------------------------|
Instructions: Stand in Lumbridge castle where you would respwan if you
died, making sure the guide symbol is visible. The script walks to the
Draynor Bank}
{Credits, WT-Fakawi (if not loggedin then break;), Pennti(vars and Randoms)
Mage Of Begu (edited a bit)}

program Walker;
{.include SRL/SRL.scar}
procedure DeclarePlayers;
begin
SetArrayLength(Players,1)
CurrentPlayer:=0
Players[0].Nick:= 'Nick'; //A few letter from your username.
NickNameBmp:=Createbitmapmaskfromtext(Players[0].Nick,UpChars)
end;

Procedure Start;
begin
 If (FindSymbol(x,y, 'guide')) then
 begin
 Writeln('Found Guide Symbol, Clicking On it')
 Status('Clicking Guide Symbol')
 Mouse(x,y, 0,0,True)
 Flag;
  end;
  repeat
  if not loggedin then break;
  RadialWalk(14400409, 300, 360, 71, 1, 1)
  until (FindSymbol(x,y, 'shop')) or
  findcolor(x,y,3895484,1, 1, 800,800) or
  findcolor(x,y,2585341,1,1,800,800)
end;

Procedure GenStr;
begin
 Writeln('Made it to Gen Store')
 repeat
 if not loggedin then break;
 RadialRoadWalk(FindRoadColor,360,300,55,1,1)
 until (FindSymbol(x,y, 'furnace'))
 or findcolor(x,y,1310717, 1,1,800,800)
 or (findcolor(x,y,2585341,1,1,800,800))
 Mouse(x,y,0,0,True)
 Flag;
end;

Procedure Furnace;
begin
 Writeln('Have made it to the Furnace')
 repeat
 if not loggedin then break;
 RadialRoadWalk(FindRoadColor,260,380,40,1,-1);
 until (findcolor(x,y, 6314328, 1, 1, 800, 800))
end;

Procedure Crossroads;
begin
 Writeln('Have made it to the Flour Maker')
 RadialRoadWalk(FindRoadColor, 250, 300, 60, 1, -1)
 repeat
 if not loggedin then break;
 RadialRoadWalk(FindRoadColor, 250, 300, 60, 1, -1)
 until (findcolor(x,y,6314328,1,1,800,800))
end;

Procedure Tobank;
begin
 Writeln('At crossroad part, heading to bank')
 repeat
 RadialRoadWalk(RoadColor,180,200,55,1,-1)
 until (findsymbol(x,y, 'bank'))
 or (findcolor(x,y,5624553,1,1,800,800))
 Mouse(x,y,0,0,True)
 Flag;
 Writeln('At Bank, Hurray!')
end;

begin
SetupSRL;
declarePlayers;
 ClearDebug;
  ActivateClient;
   MakeCompass('N');
    Start;
    FindNormalRandoms;
     GenStr;
     FindNormalRandoms;
      Furnace;
      FindNormalRandoms;
       Crossroads;
       FindNormalRandoms;
        Tobank;
        FindNormalRandoms;
end.

please tell me if this works because I am trying to make it a part of a bigger script.

Testing it out right now, I'll let ya know how it does.

Went alright most of the way, but it was very laggy, and you should add some FFlags.

BTW:

You took the long way around to get to draynor bank :)

Ya, I didnt know how to get it through the forest, how could i get rid of some lag? I noticed that too, but i dont know how to do anything about it.

Tried it, and all it did was, clicked on the guide symbol, then it just froze up…

-Dunceiam

Really? For me it gets almost all the way there, or all the way there… I will take a look tomorrow cause i dont have the time today…

From: 3garrett3
Really? For me it gets almost all the way there, or all the way there… I will take a look tomorrow cause i dont have the time today…

Well, that's what happened. :) I'll test it out again.

-Dunceiam

Edit—

Yep, same thing happened, just clicked on the guide and stopped there. Made a video of it if you want..:p

Try adding some waits in there. Give RS some time to catch up.

Worth a try.

I didnt even test it, but I looked through it and already seen a problem. You put the number: 14400409 for the roadcolor, that will NOT work. For every color you insterted into procedures like that, it will NOT work. Every single color is different in every single world, especially on the mini map. Try autocoloring the road by using FindRoadColor;, or use RoadColor in the RadialRoadWalk procedure to auto detect the color of the road by picking the color around the flag. Both work the same, but I would put more time into this and test in many different worlds. Good job though, it doesnt look bad, keep up the good work :)

Actually, 14400409 is supposed to be one of the guide symbols, i had it like this,

Procedure Start;
begin
repeat
 If (FindSymbol(x,y, 'guide')) then
 begin
 Writeln('Found Guide Symbol, Clicking On it')
 Status('Clicking Guide Symbol')
 Mouse(x,y, 0,0,True)
 Flag;
until (FindSymbol(x,y, 'shop')) or
  findcolor(x,y,3895484,1, 1, 800,800) or
  findcolor(x,y,2585341,1,1,800,800)
  end;

but it clicked the symbol the first time and then just clicked the exact same coords as before, so i put one that walked after it got the first one, if that makes any sense, i didnt know how else. Im sorta a noob if you didnt realize.

From: 3garrett3
Ya, I didnt know how to get it through the forest, how could i get rid of some lag? I noticed that too, but i dont know how to do anything about it.

For finding roadcolor in forest replace FindRoadColor in RadialroadWalk with FindDirtRoadColor;

IT was very lag, but it went the right wait.

yea it lagged so much i couldnt move

ya im working on a new version that goes through the woods, but it gets lost easier,,,

tested it and it got me into the middle of nowhere… lol :cartman:

Lol, pretty laggy, but I'm sure it will be nice when fixed.