SRL Archive - Help

Editing DropAll help [Quick Question]


KeepBotting

2012-01-18 16:45:38

Hey guys really quick here, can you help me edit this so that the bot DOESN'T drop my first inventory slot. I don't want to use DropAllExcept.

procedure DropLogs;
var i: integer;
begin
for i:= 1 to 2 do
begin
DropPattern(Random(2) + 1);
if InvCount = 0 then
break;
end;
end;

Thanks,
kbScripts and KeepBotting

John

2012-01-18 18:22:02

why can't you just use drop all except?

KeepBotting

2012-01-18 18:25:44

From: Evlin
why can't you just use drop all except?
It produces a "duplicate identifier" and/or "identifier expected" error when I try to use it.

John

2012-01-18 18:33:25

can't you just fix that error? it would be much easier than trying to change this procedure..

KeepBotting

2012-01-18 18:35:39

From: Evlin
can't you just fix that error? it would be much easier than trying to change this procedure..
I've tried numerous times, can't seem to get it right.

Press Play

2012-01-18 20:58:14

If DropAllExcept(); is not working for you, try using DropArray();
var
whichInv: Array[0..27] of Integer;
i: Integer;

//First, declare the array:
for i := 0 to 27 do
whichInv[i] := i + 2; //This will make whichInv = [2, 3, 4, 5, 6, 7, 8, 9..28]

//Then use the function:
DropArray(whichInv);