| changeset 2599 | c7153d2348f3 |
| parent 2590 | e7e87e3c67db |
| child 2609 | b67624c7d61e |
| 2598:e118329666ff | 2599:c7153d2348f3 |
|---|---|
17 *) |
17 *) |
18 |
18 |
19 unit uWorld; |
19 unit uWorld; |
20 interface |
20 interface |
21 uses SDLh, uGears, uConsts, uFloat; |
21 uses SDLh, uGears, uConsts, uFloat; |
22 {$INCLUDE options.inc} |
22 {$INCLUDE "options.inc"} |
23 const WorldDx: LongInt = -512; |
23 const WorldDx: LongInt = -512; |
24 WorldDy: LongInt = -256; |
24 WorldDy: LongInt = -256; |
25 |
25 |
26 procedure InitWorld; |
26 procedure InitWorld; |
27 procedure DrawWorld(Lag: LongInt); |
27 procedure DrawWorld(Lag: LongInt); |