SRL Archive - RS3 Outdated / Broken Scripts

By request, here it is. Setup your char. On space infront of SW bank, Plenty of thread in first inv spot, fill inv with green leather, and have green leather in your second bank spot. I've just editied this script, but I cant test it, since I have insufficient levels. Let me know how it runs, if it doesent go properly, Ill downgrade it to the old version. Enjoy!

program Gbodymaker;
{$DEFINE SMART}
{$i srl/srl.simba}                          //Start on space infront of SW
                                            //And fill inv sith
var
  Crafted:integer;

const
  ToCraft = 1000; //How many bodies to craft?
  Username = ''; //Username here
  Password = ''; //Password here
  Yoff = 50;

procedure DeclarePlayers;
begin
  HowManyPlayers := 1;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer := 0;
  with Players[0] do
  begin
    Name:= '';    //Username
    Pass:= '';    //Password
    Active:= True;
  end;
end;

Procedure Proggy;
var
  XP:integer;
begin
  XP := 186 * Crafted;
  Writeln('*****************************************');
  Writeln('Thank You for using Footys Gbodies Crafter');
  Writeln('We have been running for ' + (Timerunning));
  Writeln('We have Crafted ' + IntToStr(Crafted) + ' Gbodies');
  Writeln('We have Earned ' + IntToStr(XP) + ' XP So Far');
  writeln('Please leave feedback in forums and post your best Proggys');
  Writeln('*****************************************');

end;

Procedure Bank;
begin
  Writeln('Time To Bank');
  wait(randomrange(200, 300));
  Mouse(326, 213 - Yoff, 4, 4, 1);
  wait(randomrange(1500, 2000));
  Mouse(621, 278 - Yoff, 2, 2, Mouse_right);
  Chooseoption('All')
  wait(randomrange(400, 500));
  Mouse(102, 159- Yoff, 2, 2, Mouse_right);
  wait(randomrange(300, 400));
  Chooseoption('All');
  wait(randomrange(200, 400));
  Mouse(490, 84 - Yoff, 2, 2, 1);
  wait(randomrange(400, 600));
  Crafted := Crafted + 9

end;

Procedure Waiting;
var
  x, y, LeatherDTM:integer;
begin
  LeatherDTM := DTMFromString('mlwAAAHicY2dgYHBhYmBwAuIAIDYBYhsg9gBidyAWY2RgUAFiSShWAmIuIFYFYg4bLqBuJgxsoKDAIAJk4cKMeDAUAACtKAQK');
  writeln('Waiting for Bodies to be crafted');
  while findDTM(LeatherDTM, x, y, 552, 259 - Yoff, 737, 512 - Yoff) do
  begin
    case random(10) of
      0..5:wait(randomrange(100, 1000));
      6..8:Sleepandmovemouse(Randomrange(200, 600));
      9..10: begin wait(randomrange(100, 300)); Sleepandmovemouse(randomrange(50, 250)); end;
    end;
  end;
end;

Procedure Antiban;
begin
  case random(1000) of
    1: begin writeln('Antiban: Wait'); wait(randomrange(10000, 30000)); end;
    2..5: begin writeln('Antiban: Checking skills'); Gametab(22); wait(randomrange(10000, 20000)); Gametab(25); wait(randomrange(100, 200)); end;
    6..8: begin writeln('Antiban: Checking crafting XP'); Gametab(22); wait(randomrange(200, 600)); mmouse(637, 384 - Yoff, 4, 4); wait(randomrange(2000, 10000)); Gametab(25); wait(randomrange(200, 450)); end;
    9..12: begin writeln('Antiban: Sleepandmovemouse'); sleepandmovemouse(randomrange(1000, 10000)); end;
    14..15: begin writeln('Antiban: Checking whos online'); Gametab(30); wait(randomrange(2000, 3000)); Gametab(25); wait(randomrange(100, 200)); end;
  end;
end;

Procedure Minibreaker;
begin
  case random(200) of
    1: begin writeln('Taking a break'); Wait(randomrange(10000, 100000)); end;
  end;
end;

Procedure FirstCraft;
begin
  wait(randomrange(200, 300));
  Mouse(620, 278 -  Yoff, 4, 4, 1);
  wait(randomrange(1200, 1600));
  Mousebox(240, 457 -  Yoff, 275, 499 - Yoff, 1);   //FIRST ONLY
  wait(randomrange(1200, 1600));     //FIRST ONLY
  Mousebox(111, 457 - Yoff, 192, 500 - Yoff, 1);
  Waiting;
end;

Procedure Craft;
begin
  writeln('Lets start Crafting');
  wait(randomrange(200, 300));
  Mouse(620, 278 - Yoff, 4, 4, 1);
  wait(randomrange(1200, 1600));
  Mousebox(111, 457 - Yoff, 192, 500 - Yoff, 1);
  Waiting;
end;
begin
  SetupSRL;
  Declareplayers;
  Loginplayer;
  Mouse(545, 76, 6, 6, 1);
  Wait(randomrange(200, 300));
  keydown(VK_right);
  wait(randomrange(1150, 1180));
  keyup(VK_right);
  Firstcraft;
  Bank;
  repeat
    Craft;
    Proggy;
    bank;
    Minibreaker;
    Antiban;
  until(Crafted >= ToCraft);
end.

Thanks again Footy!!! Really nice :P i recomend this one ! :P been using it from 82-98 soon 99 :P

Good to hear! Good luck with your 99! Small fix was just made to the script, just makes the proggy a little easier to read.

*****************************************
Thank You for using Footys Gbodies Crafter
We have been running for 1 Hours, 14 Seconds
We have Crafted 1260Gbodies
We have Earned 234360So Far
Please leave feedback in forums and post your best Proggys
*****************************************

here can u see what u get in the houer :P now ill use ur updated script :P i use the old hehe :P

wiiihuuuu 99 crafting , thanks alot footy!!! :P

Nice job! Added to OP

footy can u make me a private script? a gold smithing script=) with a nice anti ban

footy can u make me a private smithing script i would pay u rsgp for it
a gold smithing script with a nice antiban=)

sorry for spam ha>.<

PM me about that, dont post it here. Im away from home till next week anyways, so maybe then.
Script updated, should work now. Let me know how it runs.

Yh this bot does not work. Clicks on the dleather selects needle and then just sits there…

From: rougarou
Yh this bot does on work. Clicks on the dleather selects needle and then just sits there…

Pretty sure he meant to say "this bot does not work". But yeah, I am having that same issue.

Ill have a look at it. Im afraid I cant test it, as I dont have a sufficent crafting level, but Ill see what I can do.
E: Script fixed, had a couple of small mistakes. let me know how it runs now. OP has the newest version of the script.

Trying the one pasted above. Not sure what OP means… Will let you know how it goes :-)

E: Ok your past the making a green body from an inv full of leathers however when it goes to bank it clicks on the top right crate when the screen is facing west.

E2: also you're default start seems to be just after the character logs in so it always goes for the needle option after clicking on the leather.

E2.1: So to start the script after a crash I will need to move the menu after clicking the dhide back to the needle menu. Just inconvenience.

E3: Your start default seems to be that the screen is always facing north after starting the script, so it spins the screen a quarter even if its not facing north.

E4: Interrupted the script to click on bank to get it to the second load. After manually opening the bank the scripts deposits the bodies, withdraws the leathers, and makes the next load flawlessly

Sorry guys, but I dont have a sufficient crafting level to test this script, I developed it with the help of thomas. If any of you guys wanna fix it, go ahead, and post your working versions here. Ill be sure to credit you!

all it seems to do for me is run around randomly

Script is outdated, and I cant fix it at the moment. Sorry!