changeset 789 | 3d976d2579eb |
parent 785 | ac538f1a629e |
child 802 | ed5450a89b96 |
788:00720357601f | 789:3d976d2579eb |
---|---|
69 KilledHHs: Longword = 0; |
69 KilledHHs: Longword = 0; |
70 |
70 |
71 implementation |
71 implementation |
72 uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, |
72 uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, |
73 uLand, uIO, uLandGraphics, uAIMisc, uLocale, uAI, uAmmos, uTriggers, GL; |
73 uLand, uIO, uLandGraphics, uAIMisc, uLocale, uAI, uAmmos, uTriggers, GL; |
74 |
|
75 const MAXROPEPOINTS = 300; |
|
74 var RopePoints: record |
76 var RopePoints: record |
75 Count: Longword; |
77 Count: Longword; |
76 HookAngle: GLfloat; |
78 HookAngle: GLfloat; |
77 ar: array[0..300] of record |
79 ar: array[0..MAXROPEPOINTS] of record |
78 X, Y: hwFloat; |
80 X, Y: hwFloat; |
79 dLen: hwFloat; |
81 dLen: hwFloat; |
80 b: boolean; |
82 b: boolean; |
81 end; |
83 end; |
82 end; |
84 end; |