# HG changeset patch # User sheepluva # Date 1293827593 -3600 # Node ID 15a443eec3716624596135eed650e0813d8ddceb # Parent 40f29f4300aa7ddacf02924b022d87d450017c7e revert ed78465973f6 ("detach rope if the Land[] vanishes") for now, some questionable/troublecausing parts there. diff -r 40f29f4300aa -r 15a443eec371 hedgewars/GSHandlers.inc --- a/hedgewars/GSHandlers.inc Fri Dec 31 21:30:38 2010 +0100 +++ b/hedgewars/GSHandlers.inc Fri Dec 31 21:33:13 2010 +0100 @@ -1494,35 +1494,8 @@ HHGear^.dY := HHGear^.dY * len; end; - haveCollision:= false; - if RopePoints.Count > 0 then - begin - ly:= hwRound(RopePoints.ar[0].Y); - lx:= hwRound(RopePoints.ar[0].X) - end - else if Gear^.Elasticity.QWordValue > 0 then - begin - ly:= hwRound(Gear^.Y); - lx:= hwRound(Gear^.X) - end; -(* // just in case it turns out we have rounding problems - i:= -1; - while not haveCollision and (i < 2) do - begin - j:= -1; - while not haveCollision and (j < 2) do - begin - haveCollision:= ((((ly + i) and LAND_HEIGHT_MASK) = 0) and - (((lx + j) and LAND_WIDTH_MASK) = 0) and - ((Land[ly + i, lx + j] and $FF00) <> 0)); - inc(j) - end; - inc(i) - end; *) - if ((Gear^.Message and gmAttack) <> 0) or - (((ly and LAND_HEIGHT_MASK) = 0) and - ((lx and LAND_WIDTH_MASK) = 0) and - ((Land[ly, lx] and $FF00) = 0)) then + + if (Gear^.Message and gmAttack) <> 0 then if (Gear^.State and gsttmpFlag) <> 0 then with Gear^.Hedgehog^ do begin