From 57754a1be5c37347bb2f404a2cd8e2e36c38cadf Mon Sep 17 00:00:00 2001
From: sys4-fr <sys4@free.fr>
Date: Sat, 8 Sep 2018 00:55:06 +0200
Subject: [PATCH] Version MFF.

---
 README.txt  |  0
 depends.txt |  0
 init.lua    | 66 +++++++++++++++++++++++++++++------------------------
 license.txt |  0
 4 files changed, 36 insertions(+), 30 deletions(-)
 mode change 100644 => 100755 README.txt
 mode change 100644 => 100755 depends.txt
 mode change 100644 => 100755 init.lua
 mode change 100644 => 100755 license.txt

diff --git a/README.txt b/README.txt
old mode 100644
new mode 100755
diff --git a/depends.txt b/depends.txt
old mode 100644
new mode 100755
diff --git a/init.lua b/init.lua
old mode 100644
new mode 100755
index 47b2d88..d200d2d
--- a/init.lua
+++ b/init.lua
@@ -2,10 +2,10 @@
 
 local COORD = false -- Print tower co-ordinates to terminal (cheat)
 
-local XMIN = -1024 -- Area for random spawn
-local XMAX = 1024
-local ZMIN = -1024
-local ZMAX = 1024
+local XMIN = 1000 -- Area for the meru mountain spawn
+local XMAX = 1000
+local ZMIN = 14000
+local ZMAX = 14000
 
 local BASRAD = 64 -- Average radius at y = -32
 local HEIGHT = 2048 -- Approximate height measured from y = -32
@@ -55,14 +55,18 @@ local np_biome = {
 
 -- Stuff
 
-local cxmin = math.floor((XMIN + 32) / 80) -- limits in chunk co-ordinates
-local czmin = math.floor((ZMIN + 32) / 80)
-local cxmax = math.floor((XMAX + 32) / 80)
-local czmax = math.floor((ZMAX + 32) / 80)
-local cxav = (cxmin + cxmax) / 2 -- spawn area midpoint in chunk co-ordinates
-local czav = (czmin + czmax) / 2
-local xnom = (cxmax - cxmin) / 4 -- noise multipliers
-local znom = (czmax - czmin) / 4
+local xmid = (XMIN + XMAX) / 2
+local zmid = (ZMIN + ZMAX) / 2
+local xrad = xmid - XMIN
+local zrad = zmid - ZMIN
+
+local merux -- The position of the mountain is calculated on first mapgen
+local meruz
+
+local merux_min
+local merux_max
+local meruz_min
+local meruz_max
 
 -- Nodes
 
@@ -93,24 +97,26 @@ local nobj_biome = nil
 -- On generated function
 
 minetest.register_on_generated(function(minp, maxp, seed)
-	if maxp.x < XMIN or minp.x > XMAX
-	or maxp.z < ZMIN or minp.z > ZMAX then
-		return
+	if not merux and not meruz then -- on first mapgen
+		local persist = math.sqrt(1.25) - 0.5 -- golden ratio - 1, solves the equation x²+x+1 = 2
+
+		local locnoise = minetest.get_perlin(5839090, 3, persist, 1)
+		local noisex = locnoise:get2d({x = 31, y = 23}) / 2
+		local noisez = locnoise:get2d({x = 17, y = 11}) / 2
+
+		merux = math.floor(xmid + noisex * xrad + 0.5)
+		meruz = math.floor(zmid + noisez * zrad + 0.5)
+		merux_min = merux - BASRAD
+		merux_max = merux + BASRAD
+		meruz_min = meruz - BASRAD
+		meruz_max = meruz + BASRAD
+
+		if COORD then
+			print ("[meru] at x " .. merux .. " z " .. meruz)
+		end
 	end
 
-	local locnoise = minetest.get_perlin(5839090, 2, 0.5, 3)
-	local noisex = locnoise:get2d({x = 31, y = 23})
-	local noisez = locnoise:get2d({x = 17, y = 11})
-	local cx = cxav + math.floor(noisex * xnom) -- chunk co ordinates
-	local cz = czav + math.floor(noisez * znom)
-	local merux = 80 * cx + 8
-	local meruz = 80 * cz + 8
-	if COORD then
-		print ("[meru] at x " .. merux .. " z " .. meruz)
-	end
-	if minp.x < merux - 120 or minp.x > merux + 40
-	or minp.z < meruz - 120 or minp.z > meruz + 40
-	or minp.y < -32 or minp.y > HEIGHT * 1.2 then
+	if minp.x > merux_max or maxp.x < merux_min or minp.z > meruz_max or maxp.z < meruz_min then
 		return
 	end
 
@@ -126,8 +132,8 @@ minetest.register_on_generated(function(minp, maxp, seed)
 	local area = VoxelArea:new{MinEdge = emin, MaxEdge = emax}
 	local data = vm:get_data()
 
-	local c_stone = minetest.get_content_id("meru:stone")
-	local c_destone = minetest.get_content_id("meru:destone")
+	local c_stone = minetest.get_content_id("default:stone")
+	local c_destone = minetest.get_content_id("default:desert_stone")
 
 	local sidelen = x1 - x0 + 1
 	local chulens3d = {x = sidelen, y = sidelen, z = sidelen}
diff --git a/license.txt b/license.txt
old mode 100644
new mode 100755