hedgewars/uGearsHedgehog.pas
changeset 7272 71df899c4163
parent 7187 aff30d80bd7b
child 7278 000e4543f204
child 7337 c224cd2d32f3
equal deleted inserted replaced
7270:93e92e82d5c8 7272:71df899c4163
   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