equal
deleted
inserted
replaced
214 var tmpflag: boolean; |
214 var tmpflag: boolean; |
215 s: shortstring; |
215 s: shortstring; |
216 begin |
216 begin |
217 while (headcmd <> nil) and (headcmd^.cmd = 's') do |
217 while (headcmd <> nil) and (headcmd^.cmd = 's') do |
218 begin |
218 begin |
219 s:= '> ' + copy(headcmd^.str, 2, Pred(headcmd^.len)); |
219 s:= copy(headcmd^.str, 2, Pred(headcmd^.len)); |
220 AddChatString(s); |
220 AddChatString(s); |
221 WriteLnToConsole(s); |
221 WriteLnToConsole(s); |
222 //AddCaption('> ' + copy(headcmd^.str, 2, Pred(headcmd^.len)), $FFFFFF, capgrpNetSay); |
|
223 RemoveCmd |
222 RemoveCmd |
224 end; |
223 end; |
225 |
224 |
226 if (headcmd <> nil) then |
225 if (headcmd <> nil) then |
227 TryDo(GameTicks <= headcmd^.Time, |
226 TryDo(GameTicks <= headcmd^.Time, |