| changeset 2599 | c7153d2348f3 |
| parent 1966 | 31e449e1d9dd |
| child 2630 | 079ef82eac75 |
| 2598:e118329666ff | 2599:c7153d2348f3 |
|---|---|
17 *) |
17 *) |
18 |
18 |
19 unit uCollisions; |
19 unit uCollisions; |
20 interface |
20 interface |
21 uses uGears, uFloat; |
21 uses uGears, uFloat; |
22 {$INCLUDE options.inc} |
22 {$INCLUDE "options.inc"} |
23 const cMaxGearArrayInd = 255; |
23 const cMaxGearArrayInd = 255; |
24 |
24 |
25 type PGearArray = ^TGearArray; |
25 type PGearArray = ^TGearArray; |
26 TGearArray = record |
26 TGearArray = record |
27 ar: array[0..cMaxGearArrayInd] of PGear; |
27 ar: array[0..cMaxGearArrayInd] of PGear; |