hedgewars/uVisualGears.pas
changeset 10251 a3b42e81803c
parent 10193 d7cd5b43588f
child 10301 6a225b469eef
--- a/hedgewars/uVisualGears.pas	Sat May 31 15:04:26 2014 -0400
+++ b/hedgewars/uVisualGears.pas	Sun Jun 01 04:17:27 2014 +0200
@@ -449,6 +449,8 @@
                                 DrawSprite(sprFlake, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy + SkyOffset, Gear^.Frame)
                             else
                                 DrawSpriteRotatedF(sprFlake, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy + SkyOffset, Gear^.Frame, 1, Gear^.Angle);
+                vgtNoPlaceWarn:
+                            DrawTexture(round(Gear^.X) + WorldDx - round(Gear^.Tex^.w * Gear^.Scale) div 2, round(Gear^.Y) + WorldDy - round(Gear^.Tex^.h * Gear^.Scale) div 2, Gear^.Tex, Gear^.Scale);
                 end;
             if (Gear^.Tint <> $FFFFFFFF) then
                 untint;