I think my srl broke :o

[asdfasdfasdf]

I keep getting random errors like
[Error] (17699:4): Identifier expected
[Error] (17803:4): Identifier expected
I think it's broke :O I dont know why it would be broke though, should I just reinstall SRL?

[Mjordan]

are those errors from scripts that your making, or from someone elses script your trying to run?

[asdfasdfasdf]

Scripts I'm making, I'll try to run someone else's script just to make sure :/
Well..I guess it's just me, but I have no idea to the exact problem (I began remaking my script and still got errors) Here's what I have..

program New;
{.include SRL/SRL.scar}
var done,todo,usedrock,ur1,slot:integer;
var doing:boolean;
var gcol1,gcol2,gcol3,gcol4,gcol5:integer;
var c1,c2,c3,c4:integer;
var rx,ry:integer;
var slotXcord:array[2..28] of integer;
procedure setupINV;
begin
if (findcolor(x,y,7910895,118,194,596,525)) then
begin //5999009 = clay
mmouse(x-30,y+46,0,0);
//x+42
end;
end;
procedure gotore;
begin

end;
procedure findgas;
begin
if(findcolorspiral(x,y,gcol1,118,194,596,525)) then
begin
writeln('GAS!');
end;
if(findcolorspiral(x,y,gcol2,118,194,596,525)) then
begin
writeln('GAS!');
end;
if(findcolorspiral(x,y,gcol3,118,194,596,525)) then
begin
writeln('GAS!');
end;
if(findcolorspiral(x,y,gcol4,118,194,596,525)) then
begin
writeln('GAS!');
end;
if(findcolorspiral(x,y,gcol5,118,194,596,525)) then
begin
writeln('GAS!');
end;
end;
begin
setupsrl;
done:=0;
todo:=5;
doing:=false;
usedrock:=6053220;
ur1:=6184550;
slot:=2;
//gas
gcol1:=6849160;
gcol2:=7576478;
gcol3:=6129287;
gcol4:=8036004;
gcol5:=7505551;
//clay
c1:=6071240;
c2:=5939396;
c3:=6071496;
c4:=6005446;
writeln('click in the rs window now!');
wait(1000);
setupinv;
//makecompass('N');
while (done < todo) do
begin
wait(10);
if (doing = true) then
begin
wait(10);
//gotore;
//if (findcolorspiral(x,y,usedrock,x,y,x+5,y+5)) then
//begin
//doing:=false;
//end;
//if (getcolor(rx,ry) = ur1) then
//begin
//doing:=false;
//end;
end;
if (doing = false) then
begin
if(FindColorspiral(x,y,6071240,118,194,596,525)) then
begin
writeln('found c1: 6071240');
mmouse(x+random(10),y+random(5),0,0);
wait(50);
getmousepos(x,y);
getmousepos(rx,ry);
if isuptextmulti('ine','ocks','Mine') then
begin
mouse(x,y,0,0,false);
wait(100+random(500));
ChooseOption(x, y, 'ocks');
doing:=true;
done:=done+1;
end;

end;
if (doing = false) then
begin
if(FindColorspiral(x,y,c2,118,194,596,525)) then
begin
writeln('found c2 col: '+inttostr(c2));
mmouse(x,y,0,0);
wait(10);
getmousepos(x,y);
getmousepos(rx,ry);
if isuptextmulti('ine','ocks','Mine') then
begin
mouse(x,y,0,0,false);
wait(100+random(500));
ChooseOption(x, y, 'ocks');
doing:=true;
done:=done+1;
end;

if (doing = false) then
begin
if(FindColorspiral(x,y,c3,118,194,596,525)) then
begin
writeln('found c3 col: '+inttostr(c3));
mmouse(x,y,0,0);
wait(10);
getmousepos(x,y);
getmousepos(rx,ry);
if isuptextmulti('ine','ocks','Mine') then
begin
mouse(x,y,0,0,false);
wait(100+random(500));
ChooseOption(x, y, 'ocks');
doing:=true;
done:=done+1;
end;

end;
end;
end;
end;
end.

And please don't bother commenting on this script unless you've solved/think you know the problem.

[Boreas]

Use standards and you will see the problem.

[asdfasdfasdf]

What are standards? :duh:

[Mjordan]

What are standards? :duh:

look in the tuts section ;)

[asdfasdfasdf]

I've looked, didn't find anythign there that solved my problem, I know it's got to be in my code cause I just tried a fresh installation of srl and it didn't work. I even searched for the error number in the tuts section and got nothing. I went to the super tut thread clicked all the links, 4 of em didn't work. time to go look more i guess _-_

[Boreas]

begin
stuff; //after the begin go out 2 spaces
end; //go left for the end




Do that and you will see the problem.

[Mjordan]

I've looked, didn't find anythign there that solved my problem, I know it's got to be in my code cause I just tried a fresh installation of srl and it didn't work. I even searched for the error number in the tuts section and got nothing. I went to the super tut thread clicked all the links, 4 of em didn't work. time to go look more i guess _-_

lol i didnt mean look at tuts like that. you asked what are standards, and i replied look in the tuts section. meaning look at some tuts in there that talk about standards.