Results 1 to 4 of 4

Thread: Barbarian Outpost agility course

  1. #1
    Join Date
    Apr 2012
    Location
    Portugal
    Posts
    144
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Barbarian Outpost agility course

    Hey guys !

    Yesterday i made an almost full barb outpost agility course script... but it's very very simple and i want you to tell me what i need to change

    Thanks All !

    Simba Code:
    program new;

    {$i srl/srl.simba}
    {$i sps/sps.simba}


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

      with Players[0] do
      begin
        Name :=' '; // Username
        Pass :=' '; // Password
        Active := True;
      end;
    end;


    procedure Antiban;
    begin
      case Random(999) of
        1: HoverSkill('Agility', false);
        2: ExamineInv;
        3: Wait(RandomRange(3000,5000));
        4: PickUpMouse;
      end;
    end;


    procedure SwingRope;
    var
      x,y: Integer;
    begin
      if FindObj(x, y, 'swing', 928046, 10) then
      Mouse(x, y, 0, 0, False);
      ChooseOption('-on Rope');
    end;

    procedure Acrossit;
    var
      x,y: Integer;
    begin
      if FindObj(x, y, 'Log balance', 2370620, 5) then
      Mouse(x, y, 0, 0 , False);
      ChooseOption('across');
    end;

    procedure ClimbOver;
    var
      x, y: Integer;
    begin
      SetAngle(SRL_ANGLE_HIGH);
      if FindObj(x, y, 'Obstacle net', 5337209, 10) then
      Mouse(x, y, 2, 2, True);
    end;

    procedure WalkLedge;
    var
      x, y: Integer;
    begin
      MakeCompass('N');
      SetAngle(SRL_ANGLE_HIGH);
      Wait(1000);
      if FindObj(x, y, 'Balancing', 1454400, 10) then
      Mouse(x, y, 2, 2, False);
      ChooseOption('across');
    end;

    procedure ClimbDown;
    var
      x, y: Integer;
    begin
      MakeCompass('S');
      wait(500);
      if FindObj(x, y, 'Ladder', 1651522, 5) then
      Mouse(x, y, 2, 2, False);
      ChooseOption('down Ladder');
    end;



    begin
      SetupSRL;
      DeclarePlayers;
      LoginPlayer;
      SwingRope;
      WriteLn('Skilfully swing');
      Wait(5000);
      Acrossit;
      Wait(6000);
      writeln('going to the net');
      Wait(500);
      ClimbOver;
      Wait(1000);
      WalkLedge;
      Wait(5000);
      ClimbDown;
    end.

  2. #2
    Join Date
    Dec 2011
    Location
    The Netherlands
    Posts
    1,631
    Mentioned
    47 Post(s)
    Quoted
    254 Post(s)

    Default

    Simba Code:
    if FindObj(x, y, 'Balancing', 1454400, 10) then
      Mouse(x, y, 2, 2, False);
      ChooseOption('across');
    Use WaitOptionMulti(['option1', 'option2'], time)
    Otherwise the script won't work for people when the option doesn't pop up immediately.

    Can also remove this
    Simba Code:
    {$i sps/sps.simba}
    as you aren't using it.

    Also the constant changing of the compass isn't necessary, try to find the objects using different methods. It's very botlike if you constantly change your angles at some objects.

    I've also been working on a Barbarian Outpost script, you can find my development blog in my signature. Should be finished pretty soon :P

    Oh yeah, you don't have any failsafes when you fail to pass the object. You can fail at the swing, the log and when walking the ledge. Took me a long time to get it on video but they are in here

    Script source code available here: Github

  3. #3
    Join Date
    Apr 2012
    Location
    Portugal
    Posts
    144
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by J J View Post
    Simba Code:
    if FindObj(x, y, 'Balancing', 1454400, 10) then
      Mouse(x, y, 2, 2, False);
      ChooseOption('across');
    Use WaitOptionMulti(['option1', 'option2'], time)
    Otherwise the script won't work for people when the option doesn't pop up immediately.

    Can also remove this
    Simba Code:
    {$i sps/sps.simba}
    as you aren't using it.

    Also the constant changing of the compass isn't necessary, try to find the objects using different methods. It's very botlike if you constantly change your angles at some objects.

    I've also been working on a Barbarian Outpost script, you can find my development blog in my signature. Should be finished pretty soon :P
    ty the sps is to continue the script... it ends after climb down the ladder. ahaha

    yeah, i know changing compass is very botlike, but i'm only start scripting and don't know how to rotate to find the items

  4. #4
    Join Date
    Dec 2011
    Location
    The Netherlands
    Posts
    1,631
    Mentioned
    47 Post(s)
    Quoted
    254 Post(s)

    Default

    Quote Originally Posted by catanado15 View Post
    ty the sps is to continue the script... it ends after climb down the ladder. ahaha

    yeah, i know changing compass is very botlike, but i'm only start scripting and don't know how to rotate to find the items
    You don't need to rotate the stuff to find them I think, it worked for me though but that is by using more advanced methods :P It looks good, at 50 agility or so you will never fail the course I think so it will work well. You never used SPS in the script you posted, I just checked it :O Also slightly edited my first post just before you responded.

    Anyways, you should definately add an extra random wait everywhere. Otherwise it will always be the same wait after clicking which is easily detectable.. well, Jagex doesn't really ban anymore nowadays but still.

    Simba Code:
    Wait(5000);
    -->
    Simba Code:
    Wait(5000 + Random(1000));
    Will wait 5000 ms AND another random 0-1000 ms

    Script source code available here: Github

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •