SRL Archive - OSR Help

My script cuts the trees fine but I cant get it to drop logs. ive tried

Procedure Droplogs;
Begin
if (InvFull) then
DropAllExcept([1]);
end;


any ideas?

is that the whole program? you might not be calling the procedure

found it. Had to add loop in the might apply for membership in a few weeks. want to get some more scripts under my belt :) Got a working willow powerchopper in 07.

part of my script:

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

begin
SetUpSRL;
ActivateClient;
DeclarePlayer;
LoginPlayer;
repeat
ChopTree;
if InvFull Then
DropLogs;
until(false);

Antiban;