Error in AntiRandoms.scar in newest revision (#6)

[IronTeapot]

Line 1392 of AntiRandoms.scar is "<<<<<<< .mine". This beings up a syntax error, because that code makes no sence. Was this an unintentional error from the devs and it can be deleted, or does it serve some purpose other than stopping my script from compiling.

EDIT: ALso lines 1435 are "=======", and line 1442 are ">>>>>>> .r6".

Theyre all part of the FindNormalRandoms function.

EDIT2: There are also double case numbers (3-7) in the case loop. Rev 6 says better antirandoms... seems like its broken instead.

[Method]

My line 1392 in AntiRandoms.scar:

3: Result := FindTalk;

I'd suggest re-updating it and seeing if there's a change or not.

[IronTeapot]

I cant reupdate as it says im already at revision 6.

You are at Rev 6 as well? File> Update SRL SVN isnt black.

Could you pust the whole FindNormalRandoms function that you have so i can copy it over the one from the revision i got.

[Method]

function FindNormalRandoms: Boolean;
var
i: Integer;
begin
w_UpdateLastLine;
for i := 1 to 7 do
begin
case I of
1: SolveNonTalkingRandoms;
2: Respond;
3: Result := FindTalk;
4: Result := FindDead;
5: Result := FindLamp(LampSkill);
6: if FindBox then
Result := SolveBox;
7: Result := RC;
end;
if Result then
Break;
//Wait(1);
end;
end;

That's my FindNormalRandoms function.

[IronTeapot]

Thanks, I wonder why mine cane though all screwed up. This is what mine looked like'


{************************************************* ******************************
function FindNormalRandoms: Boolean;
by: The SRL Developers Team!... all time sexiness by Mutant
Description: Calls the 'normal' random checks.
************************************************** *****************************}

function FindNormalRandoms: Boolean;
var
i: Integer;
begin
w_UpdateLastLine;
for i := 1 to 7 do
begin
case I of
1: SolveNonTalkingRandoms;
2: Respond;
<<<<<<< .mine
3: if FindTalk then
Result := True;
4: if FindDead then
Result := True;
5: if FindMod then
Writeln('Thats me! :D');
//Result := True;
6: if FindMime then
Result := True;
7: if FindMaze then
Result := True;
8: if FindQuiz then
Result := True;
9: if FindTalk then // Call it twice
Result := True;
10: if FindLamp(LampSkill) then // Maybe we missed it?
Result := True;
11: if (FindBox) then
begin
Result := True;
if (UseBoxSolver) then
SolveBox
else
GambleBox;
end;
12:
begin
if NoGameTab then
begin
Wait(3000 + Random(300));
if SolveChatRandom then
begin
Result := True;
Exit;
end;
Result := True;
Logout;
Exit;
end;
end;
13: if RC then
Result := True;
=======
3: Result := FindTalk;
4: Result := FindDead;
5: Result := FindLamp(LampSkill);
6: if FindBox then
Result := SolveBox;
7: Result := RC;
>>>>>>> .r6
end;
if Result then
Break;
//Wait(1);
end;
end;

[WT-Fakawi]

Thanks, I wonder why mine cane though all screwed up. This is what mine looked like'


{************************************************* ******************************
function FindNormalRandoms: Boolean;
by: The SRL Developers Team!... all time sexiness by Mutant
Description: Calls the 'normal' random checks.
************************************************** *****************************}

function FindNormalRandoms: Boolean;
var
i: Integer;
begin
w_UpdateLastLine;
for i := 1 to 7 do
begin
case I of
1: SolveNonTalkingRandoms;
2: Respond;
<<<<<<< .mine
3: if FindTalk then
Result := True;
4: if FindDead then
Result := True;
5: if FindMod then
Writeln('Thats me! :D');
//Result := True;
6: if FindMime then
Result := True;
7: if FindMaze then
Result := True;
8: if FindQuiz then
Result := True;
9: if FindTalk then // Call it twice
Result := True;
10: if FindLamp(LampSkill) then // Maybe we missed it?
Result := True;
11: if (FindBox) then
begin
Result := True;
if (UseBoxSolver) then
SolveBox
else
GambleBox;
end;
12:
begin
if NoGameTab then
begin
Wait(3000 + Random(300));
if SolveChatRandom then
begin
Result := True;
Exit;
end;
Result := True;
Logout;
Exit;
end;
end;
13: if RC then
Result := True;
=======
3: Result := FindTalk;
4: Result := FindDead;
5: Result := FindLamp(LampSkill);
6: if FindBox then
Result := SolveBox;
7: Result := RC;
>>>>>>> .r6
end;
if Result then
Break;
//Wait(1);
end;
end;



Just throw the whole SRL folder away and redownload from SCAR. You have encountered an subversion peculiarity.

[julian0]

Why dosent scar make antirandoms for sargent,molly and all those other dudes...

[IronTeapot]

k, All redownloaded, looks fine now.