changeset 5290 | eea7570d345f |
parent 4976 | 088d40d8aba2 |
child 5568 | badaac85f9d4 |
5287:ffc1475a4afd | 5290:eea7570d345f |
---|---|
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 |