75 new(command);

    75     if (lastcmd <> nil) and (lastcmd^.cmd = '+') then

    76 FillChar(command^, sizeof(TCmd), 0);

    76     begin

    77 command^.loTime:= Time;

    77         command:= lastcmd;

    78 command^.str:= str;

    78     end else

    79 if (command^.cmd <> 'F') and (command^.cmd <> 'G') then dec(command^.len, 2); // cut timestamp

    79     begin

    80 if headcmd = nil then

    80         new(command);

    81     begin

    81 

    82     headcmd:= command;

    82         if headcmd = nil then

    83     lastcmd:= command

    83             begin

    84     end

    84             headcmd:= command;

    85 else

    85             lastcmd:= command

    86     begin

    86             end

    87     lastcmd^.Next:= command;

    87         else

    88     lastcmd:= command

    88             begin

    89             lastcmd^.Next:= command;

    90             lastcmd:= command

    91             end;

    90 AddCmd:= command;

    93 

    94     FillChar(command^, sizeof(TCmd), 0);

    95     command^.loTime:= Time;

    96     command^.str:= str;

    97     if (command^.cmd <> 'F') and (command^.cmd <> 'G') then dec(command^.len, 2); // cut timestamp

    98 

    99     AddCmd:= command;