--- a/hedgewars/uVisualGears.pas	Thu Dec 16 15:02:35 2010 -0500
+++ b/hedgewars/uVisualGears.pas	Thu Dec 16 15:26:19 2010 -0500
@@ -501,7 +501,7 @@
             vgtCircle:  if gear^.Angle = 1 then 
                             begin
                             tmp:= Gear^.State / 100;
-                            DrawTexture(round(Gear^.X-24*tmp), round(Gear^.Y-24*tmp), SpritesData[sprVampiric].Texture, tmp)
+                            DrawTexture(round(Gear^.X-24*tmp) + WorldDx, round(Gear^.Y-24*tmp) + WorldDy, SpritesData[sprVampiric].Texture, tmp)
                             end
                         else DrawCircle(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.State, Gear^.Timer);
         end;