SRL Archive - RS3 Script Requests

Hey Everyone!

I have a Script, but i cant seem to make it work. Ive showed it to a few people and they said its scripted wrong etc. So now im in need of a really good person that can script my script the correct way. Ive watched the tutorials etc, but i still cant fix it =/

Please Help. Thanks

Here Is The Script

{$DEFINE SMART}
{$i SRL/SRL.Simba}

procedure DeclarePlayers;
begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;

  with Players[0] do
  begin
    Name         := 'Name';          // Username
    Pass         := 'pass';         // Password
    Pin          := '1234';        // PIN - Leave Blank If None
    Active       := True;     // Is Player To Be Used?
  end;
end;

function PRandoms: Boolean;
begin
  Result := FindNormalRandoms or FindNonInventoryRandoms;
end;

procedure SetupLogin;
begin
  ClearDebug;
  Status('SetupLogin');
  {$IFDEF SMART}
    SRL_SixHourFix := True;
    Smart_FixSpeed := True;
  {$ENDIF}

  SetupSRL;
  DeclarePlayers;

  ActivateClient;
  if not LoggedIn then
  begin
    LoginPlayerToLob;
    if OpenWorldScreen then
    begin
      SelectWorld(2);
      LoginPlayer;
    end;
  end;

  SetAngle(SRL_ANGLE_HIGH);
  PRandoms;
end;

begin
  SetupLogin;
  repeat
    PRandoms;
    if not LoggedIn then
      TerminateScript;

    InvMouse(1, mouse_Left);
    North click ,25
    while walking if stop 48, 403
    click 24, 509
    click until (false)
    Rebeat
  until(False);
end.

Just post the script here?

From: riwu
Just post the script here?

kk i did

Give me a minute, there quite a bit thats incorrect, I'll try to comment it all out for you. :p

E: Heres the updated script. I commented out most of your errors, but at times, I couldnt tell what you were attempting to do. Also, I'd suggest practicing proper standards, it makes it easier for us to fix your scripts. :)

Program ScriptName; //Dont forget to name your script

{$DEFINE SMART}
{$i SRL/SRL.Simba}

procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;

with Players[0] do
begin
Name := 'Name'; // Username
Pass := 'pass'; // Password
Pin := '1234'; // PIN - Leave Blank If None
Active := True; // Is Player To Be Used?
end;
end;                              //This is fine

function PRandoms: Boolean;
begin
Result := FindNormalRandoms or FindNonInventoryRandoms;
end;                     //You are returning a boolean, but never using the result in your script.
                         //You can just call FindNormalRandoms throughout your script
procedure SetupLogin;
begin
ClearDebug;
Status('SetupLogin');
{$IFDEF SMART}
SRL_SixHourFix := True;
Smart_FixSpeed := True;
{$ENDIF}

SetupSRL;
DeclarePlayers;

ActivateClient;
if not LoggedIn then
begin
LoginPlayerToLob;
if OpenWorldScreen then
begin
SelectWorld(2);
LoginPlayer;
end;
end;

SetAngle(SRL_ANGLE_HIGH);
PRandoms;
end;

begin
SetupLogin;
repeat
PRandoms;
if not LoggedIn then
TerminateScript;

InvMouse(1, mouse_Left);
//North click ,25      //What are you trying to do here?
//while walking if stop 48, 403       //And here
//click 24, 509         //To click, use Mouse(x coord, y coord, x randomness(3-10) y randomness(3-10));
//click //until (false)   //what are you trying to click here?
until(false); //put your until(false) on a new line
//Rebeat     //You misspelled repeat...
//until(False);   //Only stuff between a repeat and until are repeated, which makes this bit useless
end.

Nice it works lol. and here is what i wanted it to do:

I need the bot to plant mithril seeds Rapidly without picking up the flowers.
A way to tell the bot how big or small of an area i need it to plant.
A way for the bot to go around a solid object that blocks the bot from planting or another flower [Example: Trees dont allow a seed to be planted over them, Nor does A already planted flower], so the bot would only plant in a available square.
the bot to log out when all mithril seeds are planted.
the bot to repeat after the targeted area is completed.

TBH, that sounds a little too complicated for your scripting level. How about you make an alcher first? :D

Or try to script down your first tree using griffs tutorial