ScriptCore3.Now

 function Now: TDateTime
 Result: Current Date + Time (encoded)

Description

This function will return TDateTime representing current date and time

Example

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.