Results 1 to 3 of 3

Thread: rsps bot, need help

  1. #1
    Join Date
    Mar 2018
    Posts
    1
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default rsps bot, need help

    i am trying to run a rsps bot out of client (i dont have to use my mouse), i have written a script but i cant seem to get it to work or do anything in that matter, all its for is to steal from a certain contained (sarcophagus) and bank after a full inventory, the bank is less then 10 squares away. can someone help? the error i get is that it cant find sps/sps.simba


    updated.simba

    Code:
    Program basic_theiving;
    {$i srl-6/srl.simba}
    {$i SPS/SPS.simba}
    procedure ClickCoffer;
    var x, y: integer;
    begin
      if FindObj(x, y, 'in' 6010054, 10) then //this makes the script find object
      begin
       Mouse(x, y, 0, 0, true);
        ChooseOption('Open');
        wait(1500+random(1000); //this makes it wait for a certain amount of time
        until (invFull)
      end;
    procedure bank;
    begin
    if (invFull) then
    begin
    SetupSRL;
     SPS_Setup(Runescape_Surface, ['11_7'];
      ToBank := [Point(2345, 3805), Point(2342, 3813)];
     SPS_WalkPath(ToBank);
    end;
    procedure bankall;
    begin
    var x, y: integer;
      begin
        if FindObj (x, y, 'in' 13156552, 10) then
          begin
           Mouse(x, y, 0, 0, true);
           ChooseOption('Bank');
           wait(1500+random(1000);
         if FindObj (x, y, 'in' 729666, 10) then
          Mouse(x, y, 0, 0, true);
           ChooseOption('Deposite_Inventory');
           wait(1500+random(1000);
         if FindObj (x, y, 'in' 65536, 10)
          Mouse(x, y, 0, 0, true);
           ChooseOption('Close');
           wait(1500+random(1000);
          end;
    end;
    procedure walkcoffer;
    begin
    if (invFull) then
    begin
    SetupSRL;
     SPS_Setup(Runescape_Surface, ['11_7'];
      ToBank := [Point(2342, 3813), Point(2345, 3805)];
     SPS_WalkPath(ToCoffer);
    end;
      begin
      repeat
       ClickCoffer;
       bank;
       bankall;
       walkcoffer;
      until AllPlayersInactive;
    end.
    Last edited by mitchbud; 03-03-2018 at 01:42 AM.

  2. #2
    Join Date
    Jan 2012
    Location
    in a galaxy far far away
    Posts
    371
    Mentioned
    3 Post(s)
    Quoted
    48 Post(s)

    Default

    Quote Originally Posted by mitchbud View Post
    i am trying to run a rsps bot out of client (i dont have to use my mouse), i have written a script but i cant seem to get it to work or do anything in that matter, all its for is to steal from a certain contained (sarcophagus) and bank after a full inventory, the bank is less then 10 squares away. can someone help? the error i get is that it cant find sps/sps.simba


    updated.simba

    Code:
    Program basic_theiving;
    {$i srl-6/srl.simba}
    //{$i SPS/SPS.simba}
    procedure ClickCoffer;
    var x, y: integer;
    begin
      if FindObj(x, y, 'in' 6010054, 10) then //this makes the script find object
      begin
       Mouse(x, y, 0, 0, true);
        ChooseOption('Open');
        wait(1500+random(1000); //this makes it wait for a certain amount of time
        until (invFull)
      end;
    procedure bank;
    begin
    if (invFull) then
    begin
    SetupSRL;
     SPS_Setup(Runescape_Surface, ['11_7'];
      ToBank := [Point(2345, 3805), Point(2342, 3813)];
     SPS_WalkPath(ToBank);
    end;
    procedure bankall;
    begin
    var x, y: integer;
      begin
        if FindObj (x, y, 'in' 13156552, 10) then
          begin
           Mouse(x, y, 0, 0, true);
           ChooseOption('Bank');
           wait(1500+random(1000);
         if FindObj (x, y, 'in' 729666, 10) then
          Mouse(x, y, 0, 0, true);
           ChooseOption('Deposite_Inventory');
           wait(1500+random(1000);
         if FindObj (x, y, 'in' 65536, 10)
          Mouse(x, y, 0, 0, true);
           ChooseOption('Close');
           wait(1500+random(1000);
          end;
    end;
    procedure walkcoffer;
    begin
    if (invFull) then
    begin
    SetupSRL;
     SPS_Setup(Runescape_Surface, ['11_7'];
      ToBank := [Point(2342, 3813), Point(2345, 3805)];
     SPS_WalkPath(ToCoffer);
    end;
      begin
      repeat
       ClickCoffer;
       bank;
       bankall;
       walkcoffer;
      until AllPlayersInactive;
    end.
    Pretty sure sps doesn't work with rsps.
    Rj has some guides on rsps scripting
    But color and Co ordinates are probably your best bet
    >:)

  3. #3
    Join Date
    May 2012
    Location
    Glorious Nippon
    Posts
    1,011
    Mentioned
    50 Post(s)
    Quoted
    505 Post(s)

    Default

    Quote Originally Posted by mitchbud View Post
    op
    You don't really need SRL-6 or SPS for a private server.
    Tell us what server it is and you'll get better info.

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
  •