--- a/hedgewars/uGears.pas	Fri Sep 10 16:42:11 2010 +0200
+++ b/hedgewars/uGears.pas	Fri Sep 10 20:46:19 2010 +0200
@@ -731,6 +731,8 @@
             Gear^.Tex:= RenderStringTex(inttostr(Gear^.Timer div 1000), cWhiteColor, fntSmall);
             end;
         Gear^.doStep(Gear);
+        // might be useful later
+        //ScriptCall('OnGearStep', Gear^.uid);
         end
     end;
 
@@ -969,6 +971,7 @@
         end;
     end;
     inc(Gear^.Damage, Damage);
+    ScriptCall('OnGearDamage', Gear^.UID, Damage);
 end;
 
 procedure SetAllToActive;
@@ -1573,7 +1576,7 @@
     FindPlace(gear, false, 0, LAND_WIDTH); 
     if gear <> nil then begin
         RenderHealth(PHedgehog(gear^.Hedgehog)^);
-        ScriptCall('onResurrect', gear^.uid);
+        ScriptCall('onGearResurrect', gear^.uid);
     end;
     RecountTeamHealth(tempTeam);
 end;