AddToJournal

Add text line to Journal (not SysJournal!)

Params:

Text : String for adding

DWS\Pascal Script:

procedure AddToJournal(Text : String);

DWS\Pascal Script Example:

begin
...
  if(GetDistance(unload_container) > 1) then 
    AddToJournal('Сумка далеко...')
  else 
  begin
 //   work here
      if((FindType($0DF9, Backpack) = 0) and (FindType($0F95, Backpack) = 0) and (FindType($0FA0, Backpack) = 0)) then begin
       AddToJournal('Переработка закончена...');
  end;
end;

Python:

def AddToJournal(Msg)