diff -r d24257910f8d -r aaefa587e277 hedgewars/uIO.pas --- a/hedgewars/uIO.pas Sun Dec 02 00:03:16 2012 +0100 +++ b/hedgewars/uIO.pas Tue Dec 25 04:45:22 2012 +0100 @@ -41,6 +41,9 @@ implementation uses uConsole, uConsts, uVariables, uCommands, uUtils, uDebug; +const + cSendEmptyPacketTime = 1000; + type PCmd = ^TCmd; TCmd = packed record Next: PCmd; @@ -122,6 +125,7 @@ 'E': OutError(copy(s, 2, Length(s) - 1), true); 'W': OutError(copy(s, 2, Length(s) - 1), false); 'M': ParseCommand('landcheck ' + s, true); + 'o': if fastUntilLag then ParseCommand('forcequit', true); 'T': case s[2] of 'L': GameType:= gmtLocal; 'D': GameType:= gmtDemo; @@ -194,7 +198,7 @@ while (Length(ss) > 1)and(Length(ss) > byte(ss[1])) do begin ParseIPCCommand(copy(ss, 2, byte(ss[1]))); - Delete(ss, 1, Succ(byte(ss[1]))); + Delete(ss, 1, Succ(byte(ss[1]))); end end until i = 0; @@ -219,7 +223,7 @@ SendEmptyPacketTicks:= 0; if s[0]>#251 then s[0]:= #251; - + SDLNet_Write16(GameTicks, @s[Succ(byte(s[0]))]); AddFileLog('[IPC out] '+ s[1]); inc(s[0], 2); @@ -428,7 +432,7 @@ lastcmd:= nil; isPonged:= false; SocketString:= ''; - + hiTicks:= 0; SendEmptyPacketTicks:= 0;