ScriptCore3.Now

From Soldat Community Wiki
Revision as of 19:25, 22 August 2013 by Mighty (talk | contribs) (Example)
Jump to: navigation, search
 function Now: TDateTime
 Result: Current Date + Time (encoded)

Description

This function will return TDateTime representing current date and time

Example

Below example allows players to see the server's local time by saying !time

var
  i: ShortInt;
  
procedure OnSpeak(P: TActivePlayer; Text: string);
begin
  if lowercase(Text) = '!time' then
    Players.WriteConsole('Current local time: '+FormatDateTime('ddddd t',Now()),$FFFFFF);
end;

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