Identifier Expected

[stein3]

I made sure that there were all the begins and ends...
repeats and untils...

program BoneStuffer;
{.Include SRL/SRL.Scar}

var
xc,yc: Integer;


//Picks Up Bones
Procedure PickBones;
begin
repeat
findcolor(xc,yc,13290192,0,0,515,338);
wait(100)
clickmouse(xc,yc,false);
wait(100)
if (IsUpText('Take Bones')) then
begin
GetMousePos(x, y);
Mouse(x, y, 2, 2, False);
wait(10000)
until(inchat('enough inventory space to hold that item'))
end;
end;

begin
PickBones;
end.:confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused: :confused:

[JuKKa]

here :) i added a few srl commands if u dont mind, so the script works a bit better :D


program BoneStuffer;
{.Include SRL/SRL.Scar}

//Picks Up Bones
Procedure PickBones;
begin
if not loggedin then exit;
repeat
if not loggedin then break;
if FindMSColor(x,y,13290192)then
begin
MMouse(x,y,5,5)
wait(100+random(50))
if (IsUpText('Take Bones')) then
begin
Mouse(x, y, 2, 2, False);
Chooseoption(x,y,'ake Bon')
Flag;
Wait(2500+random(1500))
end;
end;
until(InvFull)
end;

begin
setupsrl;
PickBones;
end.

[stein3]

NVM i fixed this one.