# HG changeset patch
# User nemo
# Date 1289583330 18000
# Node ID 154253f77b03598c8ac02b0afc0cadf3a7777396
# Parent  472fd2fc1f3163b42a6513272d6e48a2ec9fbfc4
ok... combine a tick check with texture percentage check. this should be a lot less frequent

diff -r 472fd2fc1f31 -r 154253f77b03 hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Fri Nov 12 12:30:22 2010 -0500
+++ b/hedgewars/GSHandlers.inc	Fri Nov 12 12:35:30 2010 -0500
@@ -3053,14 +3053,14 @@
 
     // erases them all at once :-/
     if (Gear^.Timer <> 0) and (GameTicks - Gear^.Timer > 250) then
-    begin
+        begin
         Gear^.Timer := 0;
         Gear^.MsgParam := 0
-    end;
+        end;
 
     if Gear^.Health < 0 then Gear^.Health := 0;
     i:= Gear^.Health div 20;
-    if i <> Gear^.Damage then
+    if (i <> Gear^.Damage) and ((GameTicks and $3F) = 0) then
         begin
         Gear^.Damage:= i;
         //AddCaption('Fuel: '+inttostr(round(Gear^.Health/20))+'%', cWhiteColor, capgrpAmmostate);
@@ -4046,7 +4046,7 @@
     else
         begin
         i:= Gear^.Health div 5;
-        if i <> Gear^.Damage then
+        if (i <> Gear^.Damage) and ((GameTicks and $3F) = 0) then
             begin
             Gear^.Damage:= i;
             if Gear^.Tex <> nil then FreeTexture(Gear^.Tex);