Freeman: Created page with "==Default Script Template== procedure ActivateServer(); begin end; procedure AppOnIdle(Ticks: integer); begin end; procedure OnMapChange(N..."

2012-08-15T10:07:23Z

Created page with "==Default Script Template== <source lang="pascal"> procedure ActivateServer(); begin end; procedure AppOnIdle(Ticks: integer); begin end; procedure OnMapChange(N..."

New page

==Default Script Template==

<source lang="pascal">

procedure ActivateServer();
begin
end;

procedure AppOnIdle(Ticks: integer);
begin
end;

procedure OnMapChange(NewMap: string);
begin
end;

procedure OnException(ErrorMessage: string);
begin
end;

procedure OnAdminConnect(IP: string);
begin
end;

procedure OnAdminDisconnect(IP: string);
begin
end;

procedure OnAdminMessage(IP, Msg: string);
begin
end;

function OnRequestGame(IP: string; State: integer): integer;
begin
Result := State;
end;

procedure OnJoinGame(ID, Team: byte);
begin
end;

procedure OnJoinTeam(ID, Team: byte);
begin
end;

procedure OnLeaveGame(ID, Team: byte; Kicked: boolean);
begin
end;

function OnCommand(ID: Byte; Text: string): boolean;
begin
Result := false;
end;

function OnPlayerCommand(ID: Byte; Text: string): boolean;
begin
Result := false;
end;

procedure OnPlayerSpeak(ID: byte; Text: string);
begin
end;

procedure OnWeaponChange(ID, PrimaryNum, SecondaryNum: byte);
begin
end;

function OnPlayerDamage(Victim, Shooter: byte; Damage: integer): integer;
begin
Result := Damage;
end;

procedure OnPlayerKill(Killer, Victim: byte; Weapon: string);
begin
end;

procedure OnPlayerRespawn(ID: byte);
begin
end;

procedure OnFlagGrab(ID, TeamFlag: byte; GrabbedInBase: boolean);
begin
end;

procedure OnFlagReturn(ID, TeamFlag: byte);
begin
end;

procedure OnFlagScore(ID, TeamFlag: byte);
begin
end;
</source>

[[Category:Script Templates]]

Default Scripts Template - Revision history

Freeman: Created page with "==Default Script Template== procedure ActivateServer(); begin end; procedure AppOnIdle(Ticks: integer); begin end; procedure OnMapChange(N..."