changeset 4367 | f4a0ec067601 |
parent 4365 | 4f2b1a152979 |
child 4368 | b89235e401e5 |
4365:4f2b1a152979 | 4367:f4a0ec067601 |
---|---|
58 procedure FindPlace(var Gear: PGear; withFall: boolean; Left, Right: LongInt); |
58 procedure FindPlace(var Gear: PGear; withFall: boolean; Left, Right: LongInt); |
59 function GetLaunchX(at: TAmmoType; dir: LongInt; angle: LongInt): LongInt; |
59 function GetLaunchX(at: TAmmoType; dir: LongInt; angle: LongInt): LongInt; |
60 function GetLaunchY(at: TAmmoType; angle: LongInt): LongInt; |
60 function GetLaunchY(at: TAmmoType; angle: LongInt): LongInt; |
61 |
61 |
62 implementation |
62 implementation |
63 uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, uLand, uIO, uLandGraphics, |
63 uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, uIO, uLandGraphics, |
64 uAIMisc, uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, GLunit, uMobile, uVariables; |
64 uAIMisc, uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, GLunit, uMobile, uVariables; |
65 |
65 |
66 const MAXROPEPOINTS = 384; |
66 const MAXROPEPOINTS = 384; |
67 var RopePoints: record |
67 var RopePoints: record |
68 Count: Longword; |
68 Count: Longword; |