hedgewars/uGearsRender.pas
changeset 15041 7328f16bd299
parent 15040 a315927a44b2
child 15043 01bb1d7ca14f
equal deleted inserted replaced
15040:a315927a44b2 15041:7328f16bd299
   840                 amSeduction: begin
   840                 amSeduction: begin
   841                              DrawSpriteRotated(sprHandSeduction, hx, hy, sign, aangle);
   841                              DrawSpriteRotated(sprHandSeduction, hx, hy, sign, aangle);
   842                              DrawCircle(ox, oy, 248, 4, $FF, $00, $00, $AA);
   842                              DrawCircle(ox, oy, 248, 4, $FF, $00, $00, $AA);
   843                              end;
   843                              end;
   844                 amVampiric: DrawSpriteRotatedF(sprHandVamp, hx, hy, (RealTicks div 125) mod 4, sign, aangle);
   844                 amVampiric: DrawSpriteRotatedF(sprHandVamp, hx, hy, (RealTicks div 125) mod 4, sign, aangle);
   845                 amRCPlane: begin
       
   846                     DrawSpriteRotated(sprHandPlane, hx, hy, sign, 0);
       
   847                     defaultPos:= false
       
   848                     end;
       
   849                 amRubber,
   845                 amRubber,
   850                 amGirder: begin
   846                 amGirder: begin
   851                     DrawSpriteRotated(sprHandConstruction, hx, hy, sign, aangle);
   847                     DrawSpriteRotated(sprHandConstruction, hx, hy, sign, aangle);
   852                     if cBuildMaxDist = cDefaultBuildMaxDist then
   848                     if cBuildMaxDist = cDefaultBuildMaxDist then
   853                         begin
   849                         begin
   917                             sx,
   913                             sx,
   918                             sy,
   914                             sy,
   919                             0,
   915                             0,
   920                             sign,
   916                             sign,
   921                             0);
   917                             0);
       
   918                 amRCPlane:
       
   919                     begin
       
   920                     DrawSpriteRotated(sprHandPlane, hx, hy, sign, 0);
       
   921                     defaultPos:= false
       
   922                     end;
   922                 amBaseballBat, amMinigun:
   923                 amBaseballBat, amMinigun:
   923                     begin
   924                     begin
   924                     HatVisible:= true;
   925                     HatVisible:= true;
   925                     DrawHedgehog(sx, sy,
   926                     DrawHedgehog(sx, sy,
   926                             sign,
   927                             sign,