ScriptCore3.Random

function Random(Min, Max: Integer): Integer
 Min: minimum value that can be generated
 Max: maximum value that can be generated
 Result: generated number

Description

This function will generate a pseudo-random number between Min and Max

Example

Below script kills random player in game and grants user a kill (if killed an enemy).

var
  i: integer;
  id: byte;

function OnCommand(P: TActivePlayer; Command: string): Boolean;
begin
  Result := FALSE;
  if Command = '/killrandom' then
  begin
    repeat
      id := Random(1,32);
    until Players[id].Active;
    Players[id].Damage(P.ID,1000);
    Players[id].WriteConsole('Random kill by '+P.Name,$FF0000);
  end;
end;

begin
  for i:=1 to 32 do
    Players[i].OnCommand := @OnCommand;
end.