# HG changeset patch
# User palewolf
# Date 1269381026 0
# Node ID 3b6b57d8b7cdd8e8cebd66e799d3768e4d12a44c
# Parent  55a7e3a896ef77571c301efbda6d4cba4f115baf
Make UFO rotate while flying

diff -r 55a7e3a896ef -r 3b6b57d8b7cd hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Tue Mar 23 19:06:43 2010 +0000
+++ b/hedgewars/uGears.pas	Tue Mar 23 21:50:26 2010 +0000
@@ -1593,7 +1593,7 @@
 
            gtGrave: DrawTextureF(PHedgehog(Gear^.Hedgehog)^.Team^.GraveTex, 1, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, (GameTicks shr 7) and 7, 1, 32, 32);
 
-             gtUFO: DrawRotatedF(sprUFO, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, Gear^.Tag, 0, DxDy2Angle(Gear^.dY, Gear^.dX));
+             gtUFO: DrawRotatedF(sprUFO, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, Gear^.Tag, 0, DxDy2Angle(Gear^.dX, Gear^.dY) - GameTicks div 2);
 
       gtPickHammer: DrawSprite(sprPHammer, hwRound(Gear^.X) - 16 + WorldDx, hwRound(Gear^.Y) - 50 + LongInt(((GameTicks shr 5) and 1) * 2) + WorldDy, 0);
             gtRope: DrawRope(Gear);