# HG changeset patch
# User nemo
# Date 1288398917 14400
# Node ID 7f2c71638466df054ea63a8853ae6595181cba2a
# Parent  048bcb8c72ae01bfefe7675ead23f3ed994d0ee5
burp can always remove this if he doesn't like it. just making it a bit more interesting.

diff -r 048bcb8c72ae -r 7f2c71638466 hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Fri Oct 29 20:05:19 2010 -0400
+++ b/hedgewars/GSHandlers.inc	Fri Oct 29 20:35:17 2010 -0400
@@ -4096,8 +4096,8 @@
     hh := PHedgehog(Gear^.Hedgehog);
     DrawCentered(hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy -
             cHHRadius - 14 - hh^.HealthTagTex^.h, hh^.HealthTagTex);
-    DrawCircle(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Radius, 1.5, 0, 0, $FF,
-            $FF);
+    (*DrawCircle(hwRound(Gear^.X), hwRound(Gear^.Y), Gear^.Radius, 1.5, 0, 0, $FF,
+            $FF);*)
 
     doStepHedgehogMoving(hh^.Gear);
 
diff -r 048bcb8c72ae -r 7f2c71638466 hedgewars/GearDrawing.inc
--- a/hedgewars/GearDrawing.inc	Fri Oct 29 20:05:19 2010 -0400
+++ b/hedgewars/GearDrawing.inc	Fri Oct 29 20:35:17 2010 -0400
@@ -281,7 +281,10 @@
                 DrawRotated(sprHandResurrector, hwRound(Gear^.X) + WorldDx,
                         hwRound(Gear^.Y) + WorldDy, 0, 0); 
                 defaultPos := false;
-            end;
+                Tint($33, $33, $FF, max($00, floor($C0 * abs(1 - (GameTicks mod 6000) / 3000))));
+                DrawTexture(sx - 108, sy - 108, SpritesData[sprVampiric].Texture, 4.5);
+                Tint($FF, $FF, $FF, $FF);
+                end;
             gtKamikaze: begin
                 if CurAmmoGear^.Pos = 0 then
                     DrawHedgehog(sx, sy,