SRL Archive - SRL Archives

procedure DropAll;
var i: integer;
begin
  for i:= 0 to 2 do
  begin
    DropPattern(Random(2) + 1);
    if InvCount = 0 then
      break;
  end;
end;

0 to 28,

From: Main_Ftw

procedure DropAll;
var i: integer;
begin
  for i:= 0 to 2 do
  begin
    DropPattern(Random(2) + 1);
    if InvCount = 0 then
      break;
  end;
end;

0 to 28,

^.^

From: bionicle1800
I lol'd :p
good catch

I believe it is like that because it is supposed to loop through the drop patterns. SRL is suppose to have 3 different drop patterns I believe. Which, in that case, it makes perfect sense…

From: NCDS
I believe it is like that because it is supposed to loop through the drop patterns. SRL is suppose to have 3 different drop patterns I believe. Which, in that case, it makes perfect sense…

That really doesn't make much sense…why wouldn't it stick to one drop pattern? Why would it need to loop back?
(i just kind of glanced at it first, but now i see what you mean)

drop pattern is below thou

DropPattern(Random(2) + 1);

DW NCDS, I still like ya, blame the person edited this line. *Cough*RM*Cough*

*Cough*Myself*Cough*

From: bionicle1800
That really doesn't make much sense…why wouldn't it stick to one drop pattern? Why would it need to loop back?
(i just kind of glanced at it first, but now i see what you mean)

Well it wouldn't loop back through..The only reason I can see that it is in a loop is to make sure all items are dropped. It randomly picks one of the drop patterns, goes through it, then if the Inv is empty, as it should be, it Breaks. Otherwise, it would go back through and make sure everything is dropped using another pattern.

The reason for more than 1 pattern is just for randomness/antiban reasons.

@MainFTW, I'm quite sure I'm right on this, though I apologize if I'm not.

No.

okey my bad