hedgewars/uGearsHandlersRope.pas
changeset 13077 c213645ff848
parent 13069 ba7ac61c7668
child 13469 f1d349a52bc7
equal deleted inserted replaced
13076:65a3b4bea459 13077:c213645ff848
    24 
    24 
    25 procedure doStepRope(Gear: PGear);
    25 procedure doStepRope(Gear: PGear);
    26 
    26 
    27 implementation
    27 implementation
    28 uses uConsts, uFloat, uCollisions, uVariables, uGearsList, uSound, uGearsUtils,
    28 uses uConsts, uFloat, uCollisions, uVariables, uGearsList, uSound, uGearsUtils,
    29     uAmmos, uDebug, uUtils, uGearsHedgehog, uGearsRender, uGearsHandlersMess;
    29     uAmmos, uDebug, uUtils, uGearsHedgehog, uGearsRender;
    30 
    30 
    31 const
    31 const
    32     IsNilHHFatal = false;
    32     IsNilHHFatal = false;
    33 
    33 
    34 procedure doStepRopeAfterAttack(Gear: PGear);
    34 procedure doStepRopeAfterAttack(Gear: PGear);