equal
deleted
inserted
replaced
60 SendEmptyPacketTicks:= 0 |
60 SendEmptyPacketTicks:= 0 |
61 end; |
61 end; |
62 inc(SendEmptyPacketTicks, Lag) |
62 inc(SendEmptyPacketTicks, Lag) |
63 end; |
63 end; |
64 |
64 |
65 // если тачка слабая, то Lag с каждым кадром стремится в бесконечность |
|
66 if Lag > 100 then Lag:= 100; |
65 if Lag > 100 then Lag:= 100; |
67 |
66 |
68 for i:= 0 to Lag do |
67 for i:= 1 to Lag do |
69 if not CurrentTeam.ExtDriven then |
68 if not CurrentTeam.ExtDriven then |
70 begin |
69 begin |
71 with CurrentTeam^ do |
70 with CurrentTeam^ do |
72 if Hedgehogs[CurrHedgehog].BotLevel <> 0 then ProcessBot; |
71 if Hedgehogs[CurrHedgehog].BotLevel <> 0 then ProcessBot; |
73 ProcessGears |
72 ProcessGears |