From dfef4d35564e9adcc263bf5b72e9a8fcbaef9dea Mon Sep 17 00:00:00 2001
From: Andreas Schneider <aksdb@gmx.de>
Date: Sun, 8 May 2022 18:42:01 +0200
Subject: [PATCH] =?UTF-8?q?=F0=9F=94=A7=20Increase=20caches=20to=20accommo?=
 =?UTF-8?q?date=20larger=20resolutions?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Client/ULandscape.pas | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/Client/ULandscape.pas b/Client/ULandscape.pas
index 892addb..00313b1 100644
--- a/Client/ULandscape.pas
+++ b/Client/ULandscape.pas
@@ -330,9 +330,9 @@ end;
 constructor TLandTextureManager.Create;
 begin
   inherited Create;
-  FArtCache := TMaterialCache.Create(1024);
-  FTexCache := TMaterialCache.Create(128);
-  FAnimCache := TMaterialCache.Create(128);
+  FArtCache := TMaterialCache.Create(4096);
+  FTexCache := TMaterialCache.Create(512);
+  FAnimCache := TMaterialCache.Create(512);
   FUseAnims := True;
 end;
 
@@ -594,7 +594,7 @@ begin
   FHeight := AHeight;
   FCellWidth := FWidth * 8;
   FCellHeight := FHeight * 8;
-  FBlockCache := TBlockCache.Create(256);
+  FBlockCache := TBlockCache.Create(1024);
   FBlockCache.OnRemoveObject := @OnRemoveCachedObject;
 
   FOnChange := nil;