hedgewars/uGearsHedgehog.pas
changeset 7278 000e4543f204
parent 7194 d8e68cbca7ee
parent 7272 71df899c4163
child 7347 88685fbb2679
equal deleted inserted replaced
7238:313b2ecc4441 7278:000e4543f204
   393         if Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0 then
   393         if Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NeedTarget <> 0 then
   394             begin
   394             begin
   395             newGear^.Target.X:= TargetPoint.X;
   395             newGear^.Target.X:= TargetPoint.X;
   396             newGear^.Target.Y:= TargetPoint.Y
   396             newGear^.Target.Y:= TargetPoint.Y
   397             end;
   397             end;
       
   398         if newGear <> nil then newGear^.CollisionMask:= $FF7F;
   398 
   399 
   399         // Clear FollowGear if using on a rope/parachute/saucer etc so focus stays with the hog's movement
   400         // Clear FollowGear if using on a rope/parachute/saucer etc so focus stays with the hog's movement
   400         if altUse then
   401         if altUse then
   401             FollowGear:= nil;
   402             FollowGear:= nil;
   402 
   403