ok, so what i tried to do with my script is combine both the color and reflection randoms to try and optimally solve them.
it does not have the FindDead as my script deathwalks
this is what i have so farSimba Code:function FindRandoms: Boolean; //copied findnormalrandoms from antirandoms include and edited out FindDead so i can do deathwalking.
var
I: Byte;
Cont : boolean;
begin
if (SRL_OnFindRandomCall <> nil) then
begin;
Result := SRL_OnFindRandomCall(cont);
if not Cont then
exit;
end;
for I := 1 to 8 do
begin
case I of
1: Result := SolveTeleportRandoms;
2: Respond;
3: Result := FindLamp(LampSkill);
4: Result := RC;
5: Result := FindMod;
6: if (SRL_Procs[srl_OnRandomCall] <> nil) then
SRL_Procs[srl_OnRandomCall]();
7: Result := UseRewardBox;
8: Result := R_FindRandoms;
end;
if (Result) then
begin
if (SRL_Procs[srl_OnFindRandom] <> nil) then
SRL_Procs[srl_OnFindRandom]();
Break;
end;
end;
end;
i dont think this will work as if it fails one would it not stop instead of continuing down the loop?
thought please








Reply With Quote



