SRL Archive - RS3 Outdated / Broken Scripts

Yup, I'm requesting an AutoDropper. But not just any old AutoDropper, a fast one. The faster it is, the more you get paid. I've seen some that drop your inventory within 8 seconds, that's my sweet spot. I had it before, but lost it. I would hope you don't add SRL but if you must, do so. Good luck.

From: Albo23
Yup, I'm requesting an AutoDropper. But not just any old AutoDropper, a fast one. The faster it is, the more you get paid. I've seen some that drop your inventory within 8 seconds, that's my sweet spot. I had it before, but lost it. I would hope you don't add SRL but if you must, do so. Good luck.

… we do not sell scripts here! go to SYTHER !

never the less if you want an autodropper why don't you make one your slef its extremely easy i can assure you

I've tried but I can never get it as fast as I want to.

Make MouseSpeed=1 :)

Clickmouse is awful fast :p

Thanks HY but I also tried that.

Remember, making it too fast makes you get banned. Here's something for you, sorry, it requires srl:

program Dropper;
{.include SRL/SRL.scar}
//Drag the crosshairs to rs before you start the script.
//Push F2 to drop everything in the inventory, and F5 to stop script.
begin
SetupSRL;
WriteLn('Thank you for using Dropper by alach11')
Wait(1000)
ActivateClient;
Mousespeed:=6 //Lower is faster, higher is less detectable
repeat
If(IsFKeyDown(2))then
  begin
  Dropall;
  end;
until(IsFKeyDown(5))
end.

Yeah like that alch :) but I make muse speed 1

From: Smartzkid
Clickmouse is awful fast :p

Yup, thats definately your best bet :P

SRL will not be held responsible if you, or any of your nooby mates get banned.

Go to the utilities section. Copy and paste that whole script into your scar, and just change the DropToFast line at the bottom to DropToFast(1,28);

That's the fastest possible way to drop, because mine is much faster then SRL's DropTo :D

From: JAD
Go to the utilities section. Copy and paste that whole script into your scar, and just change the DropToFast line at the bottom to DropToFast(1,28);

That's the fastest possible way to drop, because mine is much faster then SRL's DropTo :D

I don't understand, I see no "DropToFast" in alach's script.

here, this is what JAD is talking about:
press F3 to drop

program New;
{.include SRL/SRL.scar}

function ChooseOptionFast(x, y, Over: Integer; txt: string): Boolean;
var
  x1, y1, x2, y2, LeftCorner, RightCorner: Integer;
begin
  LeftCorner := BitmapFromString(4, 4, 'z78DA33753135313137C5' +
    '411A600064715CEA914500CACE13F0');
  RightCorner := BitmapFromString(4, 4, 'z78DA33753135313137' +
    'C5200D30002E35F8C501C9C013F0');
  if (FindBitmap(LeftCorner, x1, y1)) and (FindBitmap(RightCorner, x2, y2)) then
  begin
    if (FindText(x, y, txt, upchars, x1, y1, x2, 502)) then
    begin
      Result := True;
      Mouse(x + Length(txt) * 3 + (Over), y + 3, 2, 2, True);
    end
    else if (FindText(x, y, 'Cancel', upchars, x1, y1, x2, 502)) then
      Mouse(x + 9, y + 3, 2, 2, True);
  end;
  FreeBitmap(LeftCorner);
  FreeBitmap(RightCorner);
end;

{*********************************************************************
procedure DropToFast(StartSlot, EndSlot: Integer);
By: JAD
Description: A re-make of SRL's function DropTo. This drops items just
like DropTo does, but it does it much faster! It drops downward, and
when the mouse clicks drop, the mouse is ready to click on the next
item. The inventory numbers are numbered top left and down. So
Inventory slot 1 is 1, Inventory slot 5 is 2, Inventory slot 9 is 3...
etc.
*********************************************************************}

procedure DropToFast(StartSlot, EndSlot: Integer);
var FastSlot: array[1..28] of Integer;
  DropSlot: array[1..28] of TPoint;
  I, Q, T: Integer;
begin
  T := 1;
  for I := 1 to 28 do
  begin
    FastSlot[i] := T + Q;
    Q := Q + 4;
    if(Q > 24)then
    begin
      T := T + 1;
      Q := 0;
    end;
  end;
  GameTab(4);
  Q := 0;
  for I := StartSlot to EndSlot do
  begin
    if(ExistsItem(FastSlot[i]))then
    begin
      DropSlot[i] := ItemCoords(FastSlot[i]);
      Mouse(DropSlot[i].x,DropSlot[i].y,3,3,false);
      if(I > 7)then
        ChooseOptionFast(x,y,30,'Drop') else
          ChooseOptionFast(x,y,4,'Drop');
    end;
  end;
end;

begin
  SetupSRL;
  ActivateClient;
  wait(2500+random(1000));
  repeat
    if IsFkeyDown(3) then
      DropToFast(1, 28);
    Wait(150);
  until false
end.

Monkey, when I run that, it just compiles and then crashes. :( I remember I had the script before but I posted it in my SRL Member application then lost it. Is there a way I can find it again?

P.S. I'm bumping it up to 300K.