hedgewars/uGearsHedgehog.pas
changeset 9041 aefe46d64dd9
parent 8992 5b0be812dcdb
child 9064 041d9f5e7b2c
equal deleted inserted replaced
9040:282c7ef1822d 9041:aefe46d64dd9
  1077         and (HHGear^.dY > _0_39)
  1077         and (HHGear^.dY > _0_39)
  1078         and (CurAmmoType = amParachute) then
  1078         and (CurAmmoType = amParachute) then
  1079             HHGear^.Message:= HHGear^.Message or gmAttack;
  1079             HHGear^.Message:= HHGear^.Message or gmAttack;
  1080     // check for case with ammo
  1080     // check for case with ammo
  1081     t:= CheckGearNear(HHGear, gtCase, 36, 36);
  1081     t:= CheckGearNear(HHGear, gtCase, 36, 36);
  1082     if t <> nil then
  1082     if (t <> nil) and (t^.State and gstFrozen = 0) then
  1083         PickUp(HHGear, t)
  1083         PickUp(HHGear, t)
  1084     end;
  1084     end;
  1085 
  1085 
  1086 if (CurAmmoGear = nil) then
  1086 if (CurAmmoGear = nil) then
  1087     if (((HHGear^.Message and gmAttack) <> 0)
  1087     if (((HHGear^.Message and gmAttack) <> 0)