changeset 5294 | 67278f1cba2c |
parent 5290 | eea7570d345f |
child 5568 | badaac85f9d4 |
5247:bf6d4bc531d2 | 5294:67278f1cba2c |
---|---|
20 |
20 |
21 unit uCollisions; |
21 unit uCollisions; |
22 interface |
22 interface |
23 uses uFloat, uTypes; |
23 uses uFloat, uTypes; |
24 |
24 |
25 const cMaxGearArrayInd = 255; |
25 const cMaxGearArrayInd = 1023; |
26 |
26 |
27 type PGearArray = ^TGearArray; |
27 type PGearArray = ^TGearArray; |
28 TGearArray = record |
28 TGearArray = record |
29 ar: array[0..cMaxGearArrayInd] of PGear; |
29 ar: array[0..cMaxGearArrayInd] of PGear; |
30 Count: Longword |
30 Count: Longword |