hedgewars/GSHandlers.inc
changeset 2089 a08758aed76a
parent 2087 79472a9be025
child 2090 4edb0d49a42d
--- a/hedgewars/GSHandlers.inc	Fri May 22 18:55:38 2009 +0000
+++ b/hedgewars/GSHandlers.inc	Fri May 22 20:36:57 2009 +0000
@@ -1267,7 +1267,8 @@
 	AfterAttack;
 	exit
 	end;
-HHGear^.Y:= HHGear^.Y + HHGear^.dY
+
+if Land[hwRound(HHGear^.Y + HHGear^.dY), hwRound(HHGear^.X)] <> COLOR_INDESTRUCTIBLE then HHGear^.Y:= HHGear^.Y + HHGear^.dY
 end;
 
 procedure doStepFirePunch(Gear: PGear);