Editing DropAll help [Quick Question]

[KeepBotting]

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]

why can't you just use drop all except?

[KeepBotting]

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]

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

[KeepBotting]

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]

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);