hedgewars/uGame.pas
changeset 8472 da6b569ac930
parent 8471 7681d14b9f01
child 8833 c13ebed437cb
child 9080 9b42757d7e71
equal deleted inserted replaced
8471:7681d14b9f01 8472:da6b569ac930
    34 var i,j : LongInt;
    34 var i,j : LongInt;
    35     s: shortstring;
    35     s: shortstring;
    36 begin
    36 begin
    37 if isPaused then
    37 if isPaused then
    38     exit;
    38     exit;
       
    39 
    39 if (not CurrentTeam^.ExtDriven) then
    40 if (not CurrentTeam^.ExtDriven) then
    40     begin
    41     begin
    41     NetGetNextCmd; // its for the case of receiving "/say" message
    42     NetGetNextCmd; // its for the case of receiving "/say" message
    42     isInLag:= false;
    43     isInLag:= false;
    43     SendKeepAliveMessage(Lag)
    44     FlushMessages(Lag)
    44     end;
    45     end;
       
    46 
    45 if GameType <> gmtRecord then
    47 if GameType <> gmtRecord then
    46     begin
    48     begin
    47     if Lag > 100 then
    49     if Lag > 100 then
    48         Lag:= 100
    50         Lag:= 100
    49     else if (GameType = gmtSave) or (fastUntilLag and (GameType = gmtNet)) then
    51     else if (GameType = gmtSave) or (fastUntilLag and (GameType = gmtNet)) then