hedgewars/uGearsHandlersMess.pas
changeset 10905 c0919d7e5ce9
parent 10897 8ea636ce120a
child 10952 8ad21fe5d062
equal deleted inserted replaced
10903:c9a0cdee4267 10905:c0919d7e5ce9
  4211 begin
  4211 begin
  4212     doPortalColorSwitch();
  4212     doPortalColorSwitch();
  4213 
  4213 
  4214     // destroy portal if ground it was attached too is gone
  4214     // destroy portal if ground it was attached too is gone
  4215     if (Land[hwRound(Gear^.Y), hwRound(Gear^.X)] <= lfAllObjMask)
  4215     if (Land[hwRound(Gear^.Y), hwRound(Gear^.X)] <= lfAllObjMask)
       
  4216     or (Land[hwRound(Gear^.Y), hwRound(Gear^.X)] and lfBouncy <> 0)
  4216     or (Gear^.Timer < 1)
  4217     or (Gear^.Timer < 1)
  4217     or (Gear^.Hedgehog^.Team <> CurrentHedgehog^.Team)
  4218     or (Gear^.Hedgehog^.Team <> CurrentHedgehog^.Team)
  4218     or CheckCoordInWater(hwRound(Gear^.X), hwRound(Gear^.Y)) then
  4219     or CheckCoordInWater(hwRound(Gear^.X), hwRound(Gear^.Y)) then
  4219         begin
  4220         begin
  4220         deleteGear(Gear);
  4221         deleteGear(Gear);