# HG changeset patch # User nemo # Date 1361971761 18000 # Node ID 8946f98d09a0b7b0a34f398fef2357f911d4a669 # Parent bb724ef609dbefda8589d408db8b48bac4802e06 remove dead code diff -r bb724ef609db -r 8946f98d09a0 hedgewars/GSHandlers.inc --- a/hedgewars/GSHandlers.inc Wed Feb 27 13:13:34 2013 +0200 +++ b/hedgewars/GSHandlers.inc Wed Feb 27 08:29:21 2013 -0500 @@ -5092,41 +5092,6 @@ end; -function isLandscapeEdge(weight:Longint):boolean; -begin - result := (weight < 8) and (weight >= 2); -end; - -function isLandscape(weight:Longint):boolean; -begin - result := weight < 2; -end; - -function isEmptySpace(weight:Longint):boolean; -begin - result := not isLandscape(weight) and not isLandscapeEdge(weight); -end; - - -function getPixelWeight(x, y:Longint): Longint; -var - i, j:Longint; -begin - result := 0; - for i := x - 1 to x + 1 do - for j := y - 1 to y + 1 do - begin - if (i < 0) or - (i > LAND_WIDTH - 1) or - (j < 0) or - (j > LAND_HEIGHT -1) or - ((Land[j, i] and $FF00) = 0) then - begin - result := result + 1; - end; - end; -end; - procedure doStepIceGun(Gear: PGear); const iceWaitCollision:Longint = 0; const iceCollideWithGround:Longint = 1;