--- a/hedgewars/uGears.pas	Fri Jan 21 17:07:42 2011 -0500
+++ b/hedgewars/uGears.pas	Sat Jan 22 19:40:57 2011 +0100
@@ -427,7 +427,9 @@
                 gear^.Timer:= 5000
                 end;
        gtDrill: begin
-                gear^.Timer:= 5000;
+                if gear^.Timer = 0 then gear^.Timer:= 5000;
+                // Tag for drill strike. if 1 then first impact occured already
+                gear^.Tag := 0;
                 gear^.Radius:= 4;
                 gear^.Density:= _1;
                 end;