GetPID
From the Scripting Manual
function GetPID: integer; Parameter Info: None Description: This function will return the current Process ID of the Soldat Server.
Examples
var
MyPID: integer;
begin
MyPID := GetPID;
WriteLn('Current PID: '+inttostr(MyPID));
end;