hedgewars/HHHandlers.inc
changeset 525 ae21b8e86dd9
parent 522 ca089787f59d
child 528 54fd6924de4e
equal deleted inserted replaced
524:c3b3d9ff7bb2 525:ae21b8e86dd9
   268    Gear^.State:= Gear^.State and not gstHHDriven;
   268    Gear^.State:= Gear^.State and not gstHHDriven;
   269    if Gear^.Damage > 0 then
   269    if Gear^.Damage > 0 then
   270       Gear^.State:= Gear^.State and not (gstHHJumping or gstHHHJump);
   270       Gear^.State:= Gear^.State and not (gstHHJumping or gstHHHJump);
   271    exit
   271    exit
   272    end;
   272    end;
       
   273    
   273 if ((Gear^.State and gstFalling) <> 0) or (StepTicks = cHHStepTicks)
   274 if ((Gear^.State and gstFalling) <> 0) or (StepTicks = cHHStepTicks)
   274    or (CurAmmoGear <> nil) then // we're moving
   275    or (CurAmmoGear <> nil) then // we're moving
   275    begin
   276    begin
   276    // check for case with ammo
   277    // check for case with ammo
   277    t:= CheckGearNear(Gear, gtCase, 36, 36);
   278    t:= CheckGearNear(Gear, gtCase, 36, 36);