Added 10 world landmarks...

source/world.adb

@@ -81,7 +81,7 @@ package body world is
 		end loop;
 		--
 		for index in 1 .. landmark_limit loop
-			map.landmarks (index).index := core.random (0, 9);
+			map.landmarks (index).index := core.random (0, landmark_count - 1);
 			map.landmarks (index).x     := core.random (6, map.width  - 6);
 			map.landmarks (index).y     := core.random (6, map.height - 6);
 			--

source/world.ads

@@ -16,7 +16,9 @@ package world is
 
 	type landmark_index is (
 		dead_tree,              mossy_rock,             palm_tree,              pine_tree,              pine_forest,            reeds,
-		rock,                   snowed_pine_tree,       snowed_rock,            spiky_rock
+		rock,                   snowed_pine_tree,       snowed_rock,            spiky_rock,             wooden_sign,            wooden_arrow_sign,
+		rune_stone,             snowed_rune_stone,      mossy_rune_stone,       snowed_pine_forest,     hyacinths,              orchids,
+		asters,                 daffodils
 	);
 
 	type landmark_trait is record
@@ -56,6 +58,7 @@ package world is
 	landmarks : array (landmark_index) of core.sprite;
 
 	landmark_limit : constant integer := 120;
+	landmark_count : constant natural := landmark_index'pos (landmark_index'last) + 1;
 
 	trait : constant array (landmark_index) of landmark_trait := (
 		dead_tree          => (ash,   true,  1),
@@ -67,7 +70,17 @@ package world is
 		rock               => (sand,  true,  1),
 		snowed_pine_tree   => (snow,  true,  4),
 		snowed_rock        => (snow,  true,  1),
-		spiky_rock       => (ash,   true,  1)
+		spiky_rock         => (ash,   true,  1),
+		wooden_sign        => (grass, false, 1),
+		wooden_arrow_sign  => (grass, false, 1),
+		rune_stone         => (grass, true,  4),
+		snowed_rune_stone  => (snow,  true,  1),
+		mossy_rune_stone   => (swamp, true,  4),
+		snowed_pine_forest => (snow,  true,  4),
+		hyacinths          => (grass, false, 1),
+		orchids            => (grass, false, 1),
+		asters             => (grass, false, 1),
+		daffodils          => (grass, false, 1)
 	);
 
 	map : information;