SRL Archive - OSR Help

Help with auto drop procedure.


n3wblit

2013-03-04 13:08:47

Hello, i am just trying to create a single auto drop function that drops everything in slots 5-28, i am failing miserably. any ideas?

Ian

2013-03-04 13:12:04

 DropAllExcept([1, 2, 3, 4]);

Sjoe

2013-03-04 13:13:23

procedure DropAllExcept(DontDrop: TIntegerArray);

usage:

DropAllExcept([1,2,3,4])

Edit: :ninja: BMW!

n3wblit

2013-03-04 13:17:04

so basically it would look like this? i just wrote this in this box and it probably sucks =( did i even do it right?

program dropall;

procedure DropAllExcept;
begin;
DroAllExcept ([1,2,3,4,]);
end;

begin;
DropAllExcept;
end;