equal
deleted
inserted
replaced
52 if (GameType = gmtDemo) then |
52 if (GameType = gmtDemo) then |
53 ProcessKbdDemo; |
53 ProcessKbdDemo; |
54 end |
54 end |
55 else begin |
55 else begin |
56 ProcessKbd; |
56 ProcessKbd; |
57 NetGetNextCmd; // its for the case when receiving /say message |
57 NetGetNextCmd; // its for the case when receiving "/say" message |
|
58 isInLag:= false; |
|
59 inc(SendEmptyPacketTicks, Lag); |
58 if SendEmptyPacketTicks >= cSendEmptyPacketTime then |
60 if SendEmptyPacketTicks >= cSendEmptyPacketTime then |
59 begin |
61 begin |
60 SendIPC('+'); |
62 SendIPC('N'); |
61 SendEmptyPacketTicks:= 0 |
63 SendEmptyPacketTicks:= 0 |
62 end; |
64 end |
63 inc(SendEmptyPacketTicks, Lag) |
|
64 end; |
65 end; |
65 |
66 |
66 if Lag > 100 then Lag:= 100 |
67 if Lag > 100 then Lag:= 100 |
67 else if GameType = gmtSave then Lag:= 2500; |
68 else if GameType = gmtSave then Lag:= 2500; |
68 |
69 |
77 end else |
78 end else |
78 begin |
79 begin |
79 NetGetNextCmd; |
80 NetGetNextCmd; |
80 if isInLag then |
81 if isInLag then |
81 case GameType of |
82 case GameType of |
82 gmtNet: break; |
83 gmtNet: break; |
83 gmtDemo: begin |
84 gmtDemo: begin |
84 GameState:= gsExit; |
85 GameState:= gsExit; |
85 exit |
86 exit |
86 end; |
87 end; |
87 gmtSave: begin |
88 gmtSave: begin |
92 end |
93 end |
93 else ProcessGears |
94 else ProcessGears |
94 end; |
95 end; |
95 inc(i) |
96 inc(i) |
96 end; |
97 end; |
97 if not CurrentTeam.ExtDriven then isInLag:= false; |
|
98 |
98 |
99 MoveCamera |
99 MoveCamera |
100 end; |
100 end; |
101 |
101 |
102 end. |
102 end. |