From 96f4da9c148a9fb73356191ff2eb69fbf4d91336 Mon Sep 17 00:00:00 2001
From: Rochambeau <juergen.eberlein@web.de>
Date: Sun, 30 Jun 2019 10:37:40 +0200
Subject: [PATCH] spawn settlements more seldom

---
 const.lua | 6 +++---
 init.lua  | 4 ++--
 utils.lua | 9 ++++++---
 3 files changed, 11 insertions(+), 8 deletions(-)

diff --git a/const.lua b/const.lua
index 29ab5a9..3b57e26 100644
--- a/const.lua
+++ b/const.lua
@@ -8,8 +8,8 @@ settlements.lvm = false
 --
 -- timer between creation of two settlements
 --
-settlements.last_settlement = 0;
-settlements.min_timer = 5
+settlements.last_settlement = os.time()
+settlements.min_timer = 60
 --
 --
 -- material to replace cobblestone with
@@ -54,7 +54,7 @@ settlements_in_world = {}
 --
 -- min_distance between settlements
 --
-min_dist_settlements = 1000
+settlements.min_dist_settlements = 500
 if settlements.debug == true 
 then
   min_dist_settlements = 200
diff --git a/init.lua b/init.lua
index cc7b955..36aa5c7 100644
--- a/init.lua
+++ b/init.lua
@@ -35,7 +35,7 @@ if minetest.get_modpath("mobs_npc") ~= nil then
     20, --max_light
     0, --min_light
     20, --chance
-    7, --active_object_count
+    2, --active_object_count
     31000, --max_height
     nil) --day_toggle
   mobs:register_spawn("mobs_npc:trader", --name
@@ -43,7 +43,7 @@ if minetest.get_modpath("mobs_npc") ~= nil then
     20, --max_light
     0, --min_light
     20, --chance
-    7, --active_object_count
+    2, --active_object_count
     31000, --max_height
     nil)--day_toggle
 end 
diff --git a/utils.lua b/utils.lua
index 277aad8..2a32603 100644
--- a/utils.lua
+++ b/utils.lua
@@ -4,6 +4,7 @@ local c_dirt_with_dry_grass         = minetest.get_content_id("default:dirt_with
 local c_dirt_with_coniferous_litter = minetest.get_content_id("default:dirt_with_coniferous_litter")
 local c_sand                        = minetest.get_content_id("default:sand")
 local c_desert_sand                 = minetest.get_content_id("default:desert_sand")
+local c_silver_sand                 = minetest.get_content_id("default:silver_sand")
 --
 local c_air                         = minetest.get_content_id("air")
 local c_snow                        = minetest.get_content_id("default:snow")
@@ -49,7 +50,8 @@ function settlements.find_surface_heightmap(pos, minp)
     c_dirt_with_dry_grass,        
     c_dirt_with_coniferous_litter,
     c_sand,                       
-    c_desert_sand
+    c_desert_sand,
+    c_silver_sand
   }
   local p6 = settlements.shallowCopy(pos)
   local heightmap = minetest.get_mapgen_object("heightmap")
@@ -215,10 +217,11 @@ end
 -- check distance to other settlements
 -------------------------------------------------------------------------------
 function settlements.check_distance_other_settlements(center_new_chunk)
-  local min_dist_settlements = 300
+--  local min_dist_settlements = 300
   for i, pos in ipairs(settlements_in_world) do 
     local distance = vector.distance(center_new_chunk, pos)
-    if distance < min_dist_settlements then
+    minetest.chat_send_all("dist ".. distance)
+    if distance < settlements.min_dist_settlements then
       return false
     end
   end