hedgewars/uGears.pas
changeset 4380 b78638b36b89
parent 4378 91655618a510
child 4385 f679ffa2dc8c
equal deleted inserted replaced
4379:6cd6b77df8b8 4380:b78638b36b89
    45 function  GetLaunchY(at: TAmmoType; angle: LongInt): LongInt;
    45 function  GetLaunchY(at: TAmmoType; angle: LongInt): LongInt;
    46 
    46 
    47 implementation
    47 implementation
    48 uses uWorld, uStore, uSound, uTeams, uRandom, uCollisions, uIO, uLandGraphics,
    48 uses uWorld, uStore, uSound, uTeams, uRandom, uCollisions, uIO, uLandGraphics,
    49      uAIMisc, uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, GLunit, uMobile, uVariables,
    49      uAIMisc, uLocale, uAI, uAmmos, uStats, uVisualGears, uScript, GLunit, uMobile, uVariables,
    50      uCommands, uUtils, uTextures, uRender;
    50      uCommands, uUtils, uTextures, uRender, uRenderUtils;
    51 
    51 
    52 const MAXROPEPOINTS = 384;
    52 const MAXROPEPOINTS = 384;
    53 var RopePoints: record
    53 var RopePoints: record
    54                 Count: Longword;
    54                 Count: Longword;
    55                 HookAngle: GLfloat;
    55                 HookAngle: GLfloat;