anchor.diff:    try
       if not FileExists(fLogPath) then
         InitLog;  // Recreate log file, if it was deleted
  -    AssignFile(fl, fLogPath);
  +
       Append(fl);
       //Write a line when the day changed since last time (useful for dedicated server logs that could be over months)
       if Abs(Trunc(fPreviousDate) - Trunc(Now)) >= 1 then
  
positive.code:                   GetTimeSince(fFirstTick) / 1000,
                    GetTimeSince(fPreviousTick),
                    aText]));
      CloseFile(fl);
      fPreviousTick := TimeGet;
      fPreviousDate := Now;
    finally
  
negative.code:     fPreviousTick: cardinal;
      fPreviousDate: TDateTime;
      fOnLogMessage: TUnicodeStringEvent;
  
      procedure Lock;
      procedure Unlock;
  
      procedure AddLineTime(const aText: UnicodeString; aLogType: TKMLogMessageType; aDoCloseFile: Boolean = True); overload;
      procedure AddLineTime(const aText: UnicodeString; aFlushImmidiately: Boolean = True); overload;
      procedure AddLineNoTime(const aText: UnicodeString; aDoCloseFile: Boolean = True);
    public
      MultithreadLogging: Boolean; // Enable thread safe mode (resource protection) while logging with multi threads
      MessageTypes: TKMLogMessageTypeSet;
  