u use things like:
If (BuyVariable:= 1);
Then
Begin
that cant because you allready close the ''if'' before you said ''then''. so:
If (BuyVariable:= 1) Then
Begin;
the rest of the script
-that erro was becasue you vergot to set a '':'' after the I
SCAR Code:
///////JACOBDM0\\\\\\\\\\\
////Setup on line 9\\\\\\\\
///Have Trade Window OPEN\\\
program FeatherBuyer;
Const
/////// SETUP \\\\\\
FeathersToBuy= 1000; //This is how many feathers you want to buy.
BuyVariable= 10; //This is how many to buy at a time. (1, 5, or 10)
//DO NOT TOUCH BELOW\\
var
i, sum: Integer;
MoveMouseSmooth: String;
begin;
I:= 0;
Repeat;
I:= I+1;
MoveMouseSmooth(380, 79);
ClickMouse(False);
Wait(Random(2500));
If (BuyVariable:= 10) Then
Begin;
MoveMouseSmooth(345,146);
ClickMouse(true);
Wait(10000+Random(1000))
end else
If (BuyVariable:= 5) Then
Begin
MoveMouseSmooth(351,132);
ClickMouse(true);
Wait(5000+Random(1000))
end else
If (BuyVariable:= 1) Then
Begin
MoveMouseSmooth(348,119);
ClickMouse(true);
Wait(1000+Random(1000))
Until ((FeathersToBuy/BuyVariable)=i)
WriteLn('You Have finished buying your feathers')
Wait(4000)
Writln('Now Deleting all in debug box')
Wait(5000)
ClearDebug
end.
just go tough your script with this guide: http://www.villavu.com/forum/showthread.php?t=6413 and try to fix the erros