changeset 3580 | 85bd667955f2 |
parent 3508 | a7ca07614a2d |
child 3594 | aeca3d8f1b29 |
3578:00aac66147c8 | 3580:85bd667955f2 |
---|---|
93 function GearByUID(uid : Longword) : PGear; |
93 function GearByUID(uid : Longword) : PGear; |
94 procedure InsertGearToList(Gear: PGear); |
94 procedure InsertGearToList(Gear: PGear); |
95 procedure RemoveGearFromList(Gear: PGear); |
95 procedure RemoveGearFromList(Gear: PGear); |
96 function ModifyDamage(dmg: Longword; Gear: PGear): Longword; |
96 function ModifyDamage(dmg: Longword; Gear: PGear): Longword; |
97 procedure FindPlace(var Gear: PGear; withFall: boolean; Left, Right: LongInt); |
97 procedure FindPlace(var Gear: PGear; withFall: boolean; Left, Right: LongInt); |
98 function GetLaunchX(at: TAmmoType; dir: LongInt; angle: LongInt): LongInt; |
|
99 function GetLaunchY(at: TAmmoType; angle: LongInt): LongInt; |
|
98 |
100 |
99 implementation |
101 implementation |
100 uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, uLand, uIO, uLandGraphics, |
102 uses uWorld, uMisc, uStore, uConsole, uSound, uTeams, uRandom, uCollisions, uLand, uIO, uLandGraphics, |
101 uAIMisc, uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, GLunit; |
103 uAIMisc, uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, GLunit; |
102 |
104 |