SRL Archive - RS3 Outdated / Broken Scripts

Well, Here it is… My fletcher/stringer.
Version 1.1

I'm not sure if it works because I am not going to test it on my main… But I am very confident that it will work. Post any bugs, and post proggies.
Also tell me what you like/dislike about it.

//----------------------------------------------------//
//                                                    //
//         --Rs2pros VEB Fletcher/ Stringer--         //
// --Cuts and/or strings anything except magic logs-- //
//         -*A fairly populated world helps*-         //
//                                                    //
//----------------------Setup-------------------------//
//1.Start in Varrock East Bank (most east bank booth).//
//1a. If only fletching or both, start with a knife   //
//in your first inventory slot (with more knifes in   //
//the bank being visable at the top) and the rest with//
//logs.                                               //
//1b. If only stringing, then have 14 bows (u) in the //
//first 14 slots and the rest bs.                     //
//2.Fill in your player info (lines 26+27 and 36-42)  //
//and hit run =P                                      //
//----------------------------------------------------//
//*If you choose fletch and string, it will fletch 14 //
//times then string 28 times making it even as many   //
//times as it can til you run out or you get a random*//
//---------For SCAR DIVI 3.12 and SRL 4 REV 6---------//

One final note: This is an early release and the script is not totally done…. The only thing I have left to do is write the main loop for the "both" option.

Looks pretty good!

However:

procedure FindRandoms;
begin
  FindTalk;
  FindFastRandoms;
  FindNormalRandoms;
  FindLamp('Fletching');
  SolvePinball;
  if (FindFight) then
  begin
    MakeCompass('N');
    RunTo('E', True);
    Wait(7000 +Random(3000));
    RunBack;
  end;
end;

FindNonInventoryRandoms works better…and faster.

procedure BankTheItems;
begin
  if (not(LoggedIn)) then Exit;
  OpenBankQuiet('veb');
  if (PinScreen) then
  begin
    repeat
      InPin(IntToStr(Players[CurrentPlayer].Integers[0]));
      wait(500);
    until (BankScreen);
  end;
  if (BankScreen) then
  begin
    Deposit(2, 28, 2);
    wait(500);
  end;
end;

Fix your banking. Use a DTM to find the items….it's safer. Also, you don't need:

if BankScreen then
  begin

Let me tell you why. You've already got a repeat, which stops repeating until it finds the bankscreen. Therefore, you've just checked for the bankscreen and don't need to check again.

reserved for good proggies

Version 1.1 is out! Please try it and tell me if it works or not!

nice worked pefectly :] +rep

it will just click on the knife then said knife not found… lmao…
totally doesnt work

it worked flawless then after turned off computer and got back on when i tried to run the script and it would click longbow to type in the number it would freeze up then log me out :/ please tell me how to fix this

nvm :/ i tried starting the script with a full load of bow instead of logs and it banked them and it started working :D weird eh?

Mmm go buzongers, takes limproot seeds out of the bank rofl?