Hi guys getting the error stated in the title in my script, Tryed a few different things am new to this language and havent got any books on it or anything
Problem is on line 27 pointed out below.
Simba Code:
program Mahatnasproject;
{$DEFINE SMART}
{$i srl/srl.simba}
Procedure DeclarePlayers;
begin
HowManyPlayers := 1;
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].Name := 'eko';
Players[0].Pass := 'nigger';
Players[0].Nick := 'ger'; // E.G griff721 would be riff.
Players[0].Active:=True; // If you want current user to use this script
end;
procedure ChopTree;
var x, y: integer;
begin
if FindObj(x, y, 'hop', 5481339, 35)then // X, Y = where the mouse should be
begin
Mouse(x, y, 2,2, false); // the 2,2 are random movements the mouse makes
ChooseOption('hop');
repeat
wait(1200+random(250)); //Wait 1000milsecons.
Until not IsUpText('ew') or (InvFull); // do untill 'txt' comes on screen
until(InvFull); <---- Line 27
end;
end;
begin
SetUpSRL;
ActivateClient;
DeclarePlayers;
LoginPlayer;
ChopTree;
end.