equal
deleted
inserted
replaced
64 end; |
64 end; |
65 |
65 |
66 if Lag > 100 then Lag:= 100 |
66 if Lag > 100 then Lag:= 100 |
67 else if GameType = gmtSave then Lag:= 2500; |
67 else if GameType = gmtSave then Lag:= 2500; |
68 |
68 |
69 for i:= 1 to Lag do |
69 i:= 1; |
|
70 while (GameState <> gsExit) and (i <= Lag) do |
|
71 begin |
70 if not CurrentTeam.ExtDriven then |
72 if not CurrentTeam.ExtDriven then |
71 begin |
73 begin |
72 with CurrentTeam^ do |
74 with CurrentTeam^ do |
73 if Hedgehogs[CurrHedgehog].BotLevel <> 0 then ProcessBot; |
75 if Hedgehogs[CurrHedgehog].BotLevel <> 0 then ProcessBot; |
74 ProcessGears |
76 ProcessGears |
88 GameType:= gmtLocal |
90 GameType:= gmtLocal |
89 end; |
91 end; |
90 end |
92 end |
91 else ProcessGears |
93 else ProcessGears |
92 end; |
94 end; |
|
95 inc(i) |
|
96 end; |
93 if not CurrentTeam.ExtDriven then isInLag:= false; |
97 if not CurrentTeam.ExtDriven then isInLag:= false; |
94 |
98 |
95 MoveCamera |
99 MoveCamera |
96 end; |
100 end; |
97 |
101 |