hedgewars/uGearsHandlersRope.pas
changeset 12819 3fc7569c1203
parent 12700 16fcd59295e3
child 12821 f3e07e53460d
equal deleted inserted replaced
12818:d3113a4cba36 12819:3fc7569c1203
    64     if ((HHGear^.State and gstHHDriven) = 0)
    64     if ((HHGear^.State and gstHHDriven) = 0)
    65     or (CheckGearDrowning(HHGear))
    65     or (CheckGearDrowning(HHGear))
    66     or (TestCollisionYwithGear(HHGear, 1) <> 0) then
    66     or (TestCollisionYwithGear(HHGear, 1) <> 0) then
    67         begin
    67         begin
    68         DeleteGear(Gear);
    68         DeleteGear(Gear);
    69         if (TestCollisionYwithGear(HHGear, 1) <> 0) and (GetAmmoEntry(HHGear^.Hedgehog^, amRope)^.Count >= 1) and ((Ammoz[HHGear^.Hedgehog^.CurAmmoType].Ammo.Propz and ammoprop_AltUse) <> 0) then
       
    70             SetWeapon(amRope);
       
    71         isCursorVisible := false;
    69         isCursorVisible := false;
    72         ApplyAmmoChanges(HHGear^.Hedgehog^);
    70         ApplyAmmoChanges(HHGear^.Hedgehog^);
    73         exit
    71         exit
    74         end;
    72         end;
    75 
    73