hedgewars/HHHandlers.inc
changeset 5834 f9944a75b350
parent 5832 f730c8a9777b
child 5838 180ffae2c039
--- a/hedgewars/HHHandlers.inc	Sat Sep 10 01:05:01 2011 +0200
+++ b/hedgewars/HHHandlers.inc	Sat Sep 10 03:27:47 2011 +0200
@@ -770,30 +770,6 @@
    Gear^.State:= Gear^.State and not gstMoving;
    exit
    end;
-
-// move hedgehogs out of walls
-if hwAbs(Gear^.dX) < _0_03 then
-    begin
-    if CountCollisionsX(Gear, -1) > Gear^.Radius then
-        repeat
-        Gear^.X:= Gear^.X + _1;
-        if CountCollisionsX(Gear, 1) > Gear^.Radius then
-            begin
-            Gear^.X:= Gear^.X - _1;
-            break;
-            end
-        until CountCollisionsX(Gear, -1) <= Gear^.Radius
-    else if CountCollisionsX(Gear, 1) > Gear^.Radius then
-        repeat
-        Gear^.X:= Gear^. X - _1;
-        if CountCollisionsX(Gear, -1) > Gear^.Radius then
-            begin
-            Gear^.X:= Gear^.X + _1;
-            break;
-            end
-        until CountCollisionsX(Gear, 1) <= Gear^.Radius;
-    end;
-
 isFalling:= (Gear^.dY.isNegative) or not TestCollisionYKick(Gear, 1);
 if isFalling then
    begin