Can someone tell me whats wrong with this?

[Hey321]

Wierd, something is going wrong :(


Procedure Accept1;
Begin
If (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)) Then
Begin
MMouse(x, y, 3, 3);
Mouse(x, y, 3, 3, True);
If (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)) Then
Begin
Repeat
MMouse(x, y, 3, 3);
Mouse(x, y, 3, 3, True);
If InChat('Well Done!') or
InChat('Oh dear, you are dead!') Then Break;
End;<---- Line 52
End;
Until(False)
End;

My error:

Line 52: [Error] (15550:1): Identifier expected in script

[Boreas]

indent and you will see the problem. repeat matches up with until and begin with end.

[Hey321]

What? No idea what you mean man.

[Boreas]

Procedure Accept1;
Begin
If (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)) Then
Begin
MMouse(x, y, 3, 3);
Mouse(x, y, 3, 3, True);
If (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)) Then
Begin
Repeat
MMouse(x, y, 3, 3);
Mouse(x, y, 3, 3, True);
If InChat('Well Done!') or
InChat('Oh dear, you are dead!') Then Break;
End;<---- Line 52
End;
Until(False)
End;

thats first step
go out at begin and in at end


Procedure Accept1;
Begin
If (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)) Then
Begin
MMouse(x, y, 3, 3);
Mouse(x, y, 3, 3, True);
If (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)) Then
Begin
Repeat
MMouse(x, y, 3, 3);
Mouse(x, y, 3, 3, True);
If InChat('Well Done!') or
InChat('Oh dear, you are dead!') Then Break;
End;<---- Line 52
End;
Until(False)
End;

Then theres this repeat, with the ends inside, but the begins outside. You can't do that. The have to be inside or outside each other.



begin
begin
begin
begin
setupsrl;
end;
end;
end;
end;

like that

[Pentti]

Yeah, he says that you must replace your 2 ends in your script to other place:

Procedure Accept1;
Begin
If (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)) Then
Begin
MMouse(x, y, 3, 3);
Mouse(x, y, 3, 3, True);
If (findcolorTolerance(x, y, 32768 , MSX1, MSY1, MSX2, MSY2, 25)) Then
Begin
Repeat
MMouse(x, y, 3, 3);
Mouse(x, y, 3, 3, True);
If InChat('Well Done!') or
InChat('Oh dear, you are dead!') Then Break;
Until(False)
End;
End;
End;

[Hey321]

Ohhhhh, ok thanks guys i get it now :). I'll test it and if it works then im gonna post it :).