I am getting this error:
Line 256: [Error] (16462:21): Type mismatch in script
when I try to compile my script. I don't know what the mismatch could be...?
SCAR Code:
{from piece of main loop}
OpenGE;
BuyItem;
While not GetDaItem do //This is line 256
WaitForItem;
nothing is mistyped or anything like that... this next one is the GetDaItem procedure. maybe there's something wrong with that part?
SCAR Code:
procedure GetDaItem;
Var
x, y, gebarDTM : integer;
begin
if (DTMRotated(gebarDTM, x, y, MSX1, MSY1, MSX2, MSY2)) then
begin
wait(250+random(500));
Mouse(x, y, 2, 2, true); //successful buy indicator
wait (500+random(1000));
Mouse(415, 300, 2, 2, false); //leftover money locator
{Loop for retreiving item if money left over.}
if ChooseOption('coins') then
begin
Mouse(415, 300, 2, 2, true);
wait(500+random(250));
if ((strtobool(ItemNoted))) then
Mouse(470, 300, 2, 2, true) //item location
Else
if (Not (strtobool(ItemNoted))) then
begin
Mouse(470, 300, 2, 2, false); //item location
Wait(200+random(200));
ChooseOption('items');
wait(400+random(250));
End;
end;
end else
Begin
{Loop for retreiving item if no money is left over.}
if ChooseOption(ItemNeeded) then
begin
if ((strtobool(ItemNoted))) then
Mouse(415, 300, 2, 2, true) //item location
Else
if (Not (strtobool(ItemNoted))) then
begin
Mouse(415, 300, 2, 2, false); //item location
Wait(200+random(200));
ChooseOption('items');
wait(400+random(250));
End;
end;
end;
end;
im confused