SRL Archive - RS3 Outdated / Broken Scripts

Dropper


yanix

2007-08-25 16:51:08

Im looking for a dropper that drops everything in inv but not the first item and it dosent need anything just dont get me banned

ShowerThoughts

2007-08-25 16:57:08

dropto(2,28);

somthing like this ;)

please dont ask stupid things for this use search button

yanix

2007-08-25 16:59:36

From: hermpie
dropto(2,28);

somthing like this ;)

please dont ask stupid things for this use search button


full script PLZ

umh WHAT SHALL I SEARCH?! DROPPER?!?!?! and i didnt see


please dont ask stupid things for this use search button in ur text until i pressed quote… i cant see some other ppls posts aswell…

alach11

2007-08-25 17:20:59

Dude a dropper is super easy to make, do you want it to drop whenever you push ctrl or f2 or something? Ctrl is best since it wont change to your stat page. To drop whenever your inventory is full all you have to do is something like this:
(written for SCAR 2.03 and SRL 3.6)
program New;
{.include srl/srl.scar}
const
InvSpaceDrop = 1-28;
begin
SetupSRL;
repeat
if InvFull then
DropItem(InvSpaceDrop);
until(false)
end.

Wizzup?

2007-08-25 18:01:52

{*******************************************************************************
procedure DropAll;
By: Lorax
Description: Drops all items
*******************************************************************************}

procedure DropAll;
var
i: Integer;
begin
for i := 1 to 28 do
DropItem(i);
end;

Derek-

2007-08-25 18:40:11

He doesn't want to drop the first item =]
use this

{*******************************************************************************
procedure DropExcept(I: Array of Integer);
By: Spky
Description: Drops all except item(s) specified by inventory number(s).
*******************************************************************************}

procedure DropExcept(I: array of Integer);
var
InvSpot, En: Integer;
begin
for InvSpot := 1 to 28 do
begin
if (not (InvSpot = I[En])) then
DropItem(InvSpot) else
En := En + 1;
end;
end;

Ilikepie1995

2007-08-25 22:31:20

Program AutoDropper
{.include SRL/SRL.scar}

begin
Drop(2,28);
end.


yanix

2007-08-26 03:05:44

From: Derek-
He doesn't want to drop the first item =]
use this

{*******************************************************************************
procedure DropExcept(I: Array of Integer);
By: Spky
Description: Drops all except item(s) specified by inventory number(s).
*******************************************************************************}

procedure DropExcept(I: array of Integer);
var
InvSpot, En: Integer;
begin
for InvSpot := 1 to 28 do
begin
if (not (InvSpot = I[En])) then
DropItem(InvSpot) else
En := En + 1;
end;
end;


thank u ill use this;)

yanix

2007-08-26 03:17:29

none works…