What does this mean please and why does it occur in a line only containing a procedure name??
lol i know i'm a noob :P
Printable View
What does this mean please and why does it occur in a line only containing a procedure name??
lol i know i'm a noob :P
Well Identifier expected could mean quite a few different things. In your case, it means something / some word is missing from the script.
It will help if you post the script you are using here, so we can help you debug your problem.
If the error is occuring on a line where there is only a procedure name it could mean (and these are the most common)
- In the procedure above it, you are missing an 'end';
- You missed out a semicolor ';' on the procedure name line.
If not, post the script here and we can try to help you out.
i think its because i had named the procedure LoadInv which was probably confusing SCAR into thinking it was supposed to be loading something...will try a different name and if this doesn't work will post the script for general perusal/criticism :D
nope that wasn't it...k here is the script... bear in mind it is my very first attempt so please feel free to point out any improvements although i'll probably not know how to do anything you would suggest lol.
Thanks in advance for any help...
this is the procedure before the fault and the one with the fault.. it is the line with procedure Inventory; that has the issue.
Quote:
procedure Banking;
begin
Status('Banking');
if(Findcolorspiraltolerance(xb,yb,BankColour,266,1 29,343,433,20)) then
begin
MoveMouseSmoothEx(xb,yb,1,3,45,20,10);
FTwait(2);
ClickMouse(xb,yb,False);
FTwait(3);
ClickText('uickly',157,146,365,267);
FTwait(4);
end;
procedure Inventory;
var
x1,y1,x2,y2: Integer
begin
If (FindBitmapIn(longbowu,x1,y1,556,206,735,255)) then
begin
MoveMouseSmoothEx(x1,y1,1,3,45,20,10);
FTWait(2);
ClickMouse(x1,y1,False);
FTWait(2);
ClickText('tore All',565,217,741,436);
end
If (FitBitmapIn(willowlogs,x2,y2,72,57,257,97)) then
begin
MoveMouseSmoothEx(x2,y2,1,3,45,20,10);
FTWait(2);
ClickMouse(x2,y2,False);
FTWait(2);
ClickText('ithdraw All',67,59,457,280);
FTWait(2);
CloseBank;
end
end;
Have you declared your longbow and willowlogs bmps?
yep, sorry i should have mentioned that... this is only the section prior to the problem and the problem its self... it has the error in the thread title on line 134 which is the line reading 'procedure Inventory'
[edit] also could someone tell me how to slow the mouse down on MoveMouseSmoothEx.... do i just have to alter one of the variables as the set i am using at the moment seems quite fast and non-human... i do have MouseSpeed:=10-random(5) later in the script, will that do it?
TO:SCAR Code:x1,y1,x2,y2: Integer
SCAR Code:x1,y1,x2,y2: Integer;
no, thats not it,
You'll notice in the procedure Banking;, you have 2 begins, but only one end;
You must add another end; onto the procedure to close all tags :)
I would also suggest using MMouse, instead of MoveMouseSmoothEx and Mouse instead of ClickMouse. They are a lot less detectable.Code:procedure Banking;
begin //BEGIN HERE
Status('Banking');
if(Findcolorspiraltolerance(xb,yb,BankColour,266,1 29,343,433,20)) then
begin //BEGIN HERE
MoveMouseSmoothEx(xb,yb,1,3,45,20,10);
FTwait(2);
ClickMouse(xb,yb,False);
FTwait(3);
ClickText('uickly',157,146,365,267);
FTwait(4);
end; //END HERE
end; //END HERE
oops hadn't noticed that thanks Pentti... sadly i'm still getting the same error message although you have just probably saved me from another frustration when this is solved.
that sounds like it... thanks... will try MMouse and Mouse... looked at them before but it was before i got the hang of this... Starblaster the hero :D
Thanks everyone, keep your eye out for the best willow fletcher ever soon... ok ok not that impressive but its a start lol.
ok whole new problem... in my progress report i am getting the error message 'type mismatch' for 'Loads Done '+Loads+'.';
procedure Progess;
begin
ClearDebug;
Writeln('/=========================================\');
Writeln('¦====YORKSHIREKNIGHTS WILLOW FLETCHER=====¦');
Writeln('\======================================== =/');
Writeln(' Worked for '+TimeRunning+'.');
Writeln(' Loads Done '+Loads+'.');
Writeln('\======================================== =/');
SRLRandomsReport;
PlayerStats;
end;
p.s thanks for patience and help
Well it is most likely your variable Loads is an Integer, meaning it is a number, not a string.
The command for turning Integers into Strings is - IntToStr (Integer to String)
The command for turning Strings into Integers is - StrToInt (String to Integer)
Your final code will be:
Code:procedure Progess;
begin
ClearDebug;
Writeln('/=========================================\');
Writeln('¦====YORKSHIREKNIGHTS WILLOW FLETCHER=====¦');
Writeln('\======================================== =/');
Writeln(' Worked for '+TimeRunning+'.');
Writeln(' Loads Done '+IntToStr(Loads)+'.');
Writeln('\======================================== =/');
SRLRandomsReport;
PlayerStats;
end;
ofcourse, ofcourse... well they do say learn by doing... i go by learn by making mistakes lol
Thanks again :D
ok ok, one last question... i hope... although it is a nooby one.
What parameters do MMouse and Mouse use.
Thanks yet again in advance
Oops. Yea, Starblaster caught the problem
I thought I had checked for begins and ends, but I only did it for the inventory procedure. Forgot that the errors are sometimes the line before where SCAR says they are. :(