equal
deleted
inserted
replaced
70 end; |
70 end; |
71 |
71 |
72 function AddCmd(Time: Word; str: shortstring): PCmd; |
72 function AddCmd(Time: Word; str: shortstring): PCmd; |
73 var command: PCmd; |
73 var command: PCmd; |
74 begin |
74 begin |
75 if (lastcmd <> nil) and (lastcmd^.cmd = '+') and (str[1] <> 'F') and (str[1] <> 'G') then |
75 if (lastcmd <> nil) |
|
76 and (lastcmd^.cmd = '+') // don't overwrite timestamped msg with non-timestamped one |
|
77 and (str[1] <> 'F') |
|
78 and (str[1] <> 'G') |
|
79 and (str[1] <> 's') |
|
80 and (str[1] <> 'h') |
|
81 and (str[1] <> 'b') |
|
82 then |
76 begin |
83 begin |
77 command:= lastcmd; |
84 command:= lastcmd; |
78 end else |
85 end else |
79 begin |
86 begin |
80 new(command); |
87 new(command); |