hedgewars/uGearsRender.pas
changeset 9667 0b27737fc28f
parent 9666 8dcb25112d96
child 9685 7d925e82e572
equal deleted inserted replaced
9666:8dcb25112d96 9667:0b27737fc28f
   364 
   364 
   365             setTintAdd(true);
   365             setTintAdd(true);
   366             Tint(HH^.Team^.Clan^.Color shl 8 or $FF);
   366             Tint(HH^.Team^.Clan^.Color shl 8 or $FF);
   367             DrawTextureRotated(CrosshairTexture,
   367             DrawTextureRotated(CrosshairTexture,
   368                     12, 12, CrosshairX + WorldDx, CrosshairY + WorldDy, 0,
   368                     12, 12, CrosshairX + WorldDx, CrosshairY + WorldDy, 0,
   369                     sign * (Gear^.Angle * 180.0) / cMaxAngle);
   369                     sign * m * (Gear^.Angle * 180.0) / cMaxAngle);
   370             untint;
   370             untint;
   371             setTintAdd(false);
   371             setTintAdd(false);
   372             end;
   372             end;
   373 
   373 
   374         hx:= ox + 8 * sign;
   374         hx:= ox + 8 * sign;