hedgewars/uWorld.pas
changeset 10304 7e40820b7ed6
parent 10300 f70b2fb8acab
child 10312 eda8d563f677
equal deleted inserted replaced
10303:f726e36c3e24 10304:7e40820b7ed6
  1852         //DrawSprite(sprArrow, TargetCursorPoint.X, cScreenHeight - TargetCursorPoint.Y, (RealTicks shr 6) mod 8)
  1852         //DrawSprite(sprArrow, TargetCursorPoint.X, cScreenHeight - TargetCursorPoint.Y, (RealTicks shr 6) mod 8)
  1853         DrawTextureF(SpritesData[sprArrow].Texture, cDefaultZoomLevel / cScaleFactor, TargetCursorPoint.X + round(SpritesData[sprArrow].Width / cScaleFactor), cScreenHeight - TargetCursorPoint.Y + round(SpritesData[sprArrow].Height / cScaleFactor), (RealTicks shr 6) mod 8, 1, SpritesData[sprArrow].Width, SpritesData[sprArrow].Height);
  1853         DrawTextureF(SpritesData[sprArrow].Texture, cDefaultZoomLevel / cScaleFactor, TargetCursorPoint.X + round(SpritesData[sprArrow].Width / cScaleFactor), cScreenHeight - TargetCursorPoint.Y + round(SpritesData[sprArrow].Height / cScaleFactor), (RealTicks shr 6) mod 8, 1, SpritesData[sprArrow].Width, SpritesData[sprArrow].Height);
  1854         end
  1854         end
  1855     end;
  1855     end;
  1856 
  1856 
       
  1857 // debug stuff
       
  1858 if cViewLimitsDebug then
       
  1859     begin
       
  1860     r.x:= ViewLeftX;
       
  1861     r.y:= ViewTopY;
       
  1862     r.w:= ViewWidth;
       
  1863     r.h:= ViewHeight;
       
  1864     DrawRect(r, 255, 0, 0, 128, false);
       
  1865     end;
       
  1866 
  1857 isFirstFrame:= false
  1867 isFirstFrame:= false
  1858 end;
  1868 end;
  1859 
  1869 
  1860 var PrevSentPointTime: LongWord = 0;
  1870 var PrevSentPointTime: LongWord = 0;
  1861 
  1871