hedgewars/uGame.pas
changeset 358 236bbd12d4d9
parent 351 29bc9c36ad5f
child 371 731ad6d27bd1
equal deleted inserted replaced
357:165a040e4cfa 358:236bbd12d4d9
    33 var i: integer;
    33 var i: integer;
    34 begin
    34 begin
    35 if isPaused then exit;
    35 if isPaused then exit;
    36 if not CurrentTeam^.ExtDriven then
    36 if not CurrentTeam^.ExtDriven then
    37    begin
    37    begin
    38    NetGetNextCmd; // its for the case when receiving "/say" message
    38    NetGetNextCmd; // its for the case of receiving "/say" message
    39    isInLag:= false;
    39    isInLag:= false;
    40    inc(SendEmptyPacketTicks, Lag);
    40    inc(SendEmptyPacketTicks, Lag);
    41    if SendEmptyPacketTicks >= cSendEmptyPacketTime then
    41    if SendEmptyPacketTicks >= cSendEmptyPacketTime then
    42       begin
    42       begin
    43       SendIPC('+');
    43       SendIPC('+');