hedgewars/uRender.pas
changeset 12898 8a40ce061d94
parent 12886 a089326f0e16
child 13495 b5f8864a38d3
equal deleted inserted replaced
12891:856570ddd409 12898:8a40ce061d94
  1146 begin
  1146 begin
  1147 
  1147 
  1148 if Angle <> 0  then
  1148 if Angle <> 0  then
  1149     begin
  1149     begin
  1150     // Check the bounding circle 
  1150     // Check the bounding circle 
  1151     if isCircleOffscreen(X, Y, sqr(SpritesData[Sprite].Width) + sqr(SpritesData[Sprite].Height)) then
  1151     if isCircleOffscreen(X, Y, (sqr(SpritesData[Sprite].Width) + sqr(SpritesData[Sprite].Height)) div 4) then
  1152         exit;
  1152         exit;
  1153     end
  1153     end
  1154 else
  1154 else
  1155     begin
  1155     begin
  1156     if isDxAreaOffscreen(X - SpritesData[Sprite].Width div 2, SpritesData[Sprite].Width) <> 0 then
  1156     if isDxAreaOffscreen(X - SpritesData[Sprite].Width div 2, SpritesData[Sprite].Width) <> 0 then