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.