| changeset 3407 | dcc129c4352e |
| parent 2948 | 3f21a9dc93d0 |
| child 3463 | 23c50be687a9 |
| 3406:f4bdebced042 | 3407:dcc129c4352e |
|---|---|
18 |
18 |
19 {$INCLUDE "options.inc"} |
19 {$INCLUDE "options.inc"} |
20 |
20 |
21 unit uGame; |
21 unit uGame; |
22 interface |
22 interface |
23 uses uFloat; |
|
24 |
23 |
25 procedure DoGameTick(Lag: LongInt); |
24 procedure DoGameTick(Lag: LongInt); |
26 |
25 |
27 //////////////////// |
26 //////////////////// |
28 implementation |
27 implementation |
29 //////////////////// |
28 //////////////////// |
30 uses uMisc, uConsts, uWorld, uKeys, uTeams, uIO, uAI, uGears, uConsole, uScript; |
29 uses uMisc, uConsts, uKeys, uTeams, uIO, uAI, uGears, uScript; |
31 |
30 |
32 procedure DoGameTick(Lag: LongInt); |
31 procedure DoGameTick(Lag: LongInt); |
33 var i: LongInt; |
32 var i: LongInt; |
34 begin |
33 begin |
35 if isPaused then exit; |
34 if isPaused then exit; |