changeset 3165 | 3ec07a7d8456 |
parent 3161 | cb5f04cc9d76 |
child 3172 | ae5c7f97df44 |
3164:569fd65261d0 | 3165:3ec07a7d8456 |
---|---|
94 function ModifyDamage(dmg: Longword; Gear: PGear): Longword; |
94 function ModifyDamage(dmg: Longword; Gear: PGear): Longword; |
95 procedure FindPlace(var Gear: PGear; withFall: boolean; Left, Right: LongInt); |
95 procedure FindPlace(var Gear: PGear; withFall: boolean; Left, Right: LongInt); |
96 |
96 |
97 implementation |
97 implementation |
98 uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, uLand, uIO, uLandGraphics, |
98 uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, uLand, uIO, uLandGraphics, |
99 uAIMisc, uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, |
99 uAIMisc, uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, GLunit; |
100 {$IFDEF GLES11} |
|
101 gles11; |
|
102 {$ELSE} |
|
103 GL; |
|
104 {$ENDIF} |
|
105 |
100 |
106 const MAXROPEPOINTS = 384; |
101 const MAXROPEPOINTS = 384; |
107 var RopePoints: record |
102 var RopePoints: record |
108 Count: Longword; |
103 Count: Longword; |
109 HookAngle: GLfloat; |
104 HookAngle: GLfloat; |