Added inner lake corners...

2024-05-25 14:20:43 -04:00 · 2024-05-25 14:20:43 -04:00 · 1d0e71f814
commit 1d0e71f814
parent 4be93b4380
7 changed files with 8 additions and 0 deletions
--- a/game/world/terrain/ash.png
+++ b/game/world/terrain/ash.png
--- a/game/world/terrain/grass.png
+++ b/game/world/terrain/grass.png
--- a/game/world/terrain/rough.png
+++ b/game/world/terrain/rough.png
--- a/game/world/terrain/sand.png
+++ b/game/world/terrain/sand.png
--- a/game/world/terrain/snow.png
+++ b/game/world/terrain/snow.png
--- a/game/world/terrain/swamp.png
+++ b/game/world/terrain/swamp.png
--- a/source/world.adb
+++ b/source/world.adb
@ -139,6 +139,14 @@ package body world is
 								map.tiles (lake_x + x, lake_y + y - 1) := 29;
 							elsif matrix = ((0, 1), (1, 1)) then
 								map.tiles (lake_x + x, lake_y + y) := 31;
+							elsif matrix = ((0, 0), (0, 1)) then
+								map.tiles (lake_x + x, lake_y + y) := 32;
+							elsif matrix = ((0, 0), (1, 0)) then
+								map.tiles (lake_x + x, lake_y + y - 1) := 34;
+							elsif matrix = ((0, 1), (0, 0)) then
+								map.tiles (lake_x + x - 1, lake_y + y) := 33;
+							elsif matrix = ((1, 0), (0, 0)) then
+								map.tiles (lake_x + x - 1, lake_y + y - 1) := 35;
 							--~elsif matrix = ((1, 1), (1, 0)) then
 							end if;
 						end;