init.lua

@@ -2,10 +2,10 @@
 
 local COORD = false -- Print tower co-ordinates to terminal (cheat)
 
-local XMIN = 1000 -- Area for the meru mountain spawn
+local XMIN = -1024 -- Area for random spawn
-local XMAX = 1000
+local XMAX = 1024
-local ZMIN = 14000
+local ZMIN = -1024
-local ZMAX = 14000
+local ZMAX = 1024
 
 local BASRAD = 64 -- Average radius at y = -32
 local HEIGHT = 2048 -- Approximate height measured from y = -32
@@ -55,18 +55,14 @@ local np_biome = {
 
 -- Stuff
 
-local xmid = (XMIN + XMAX) / 2
+local cxmin = math.floor((XMIN + 32) / 80) -- limits in chunk co-ordinates
-local zmid = (ZMIN + ZMAX) / 2
+local czmin = math.floor((ZMIN + 32) / 80)
-local xrad = xmid - XMIN
+local cxmax = math.floor((XMAX + 32) / 80)
-local zrad = zmid - ZMIN
+local czmax = math.floor((ZMAX + 32) / 80)
-
+local cxav = (cxmin + cxmax) / 2 -- spawn area midpoint in chunk co-ordinates
-local merux -- The position of the mountain is calculated on first mapgen
+local czav = (czmin + czmax) / 2
-local meruz
+local xnom = (cxmax - cxmin) / 4 -- noise multipliers
-
+local znom = (czmax - czmin) / 4
-local merux_min
-local merux_max
-local meruz_min
-local meruz_max
 
 -- Nodes
 
@@ -97,26 +93,24 @@ local nobj_biome = nil
 -- On generated function
 
 minetest.register_on_generated(function(minp, maxp, seed)
-	if not merux and not meruz then -- on first mapgen
+	if maxp.x < XMIN or minp.x > XMAX
-		local persist = math.sqrt(1.25) - 0.5 -- golden ratio - 1, solves the equation x²+x+1 = 2
+	or maxp.z < ZMIN or minp.z > ZMAX then
-
+		return
-		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
 
-	if minp.x > merux_max or maxp.x < merux_min or minp.z > meruz_max or maxp.z < meruz_min then
+	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
 		return
 	end
 
@@ -132,8 +126,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("default:stone")
+	local c_stone = minetest.get_content_id("meru:stone")
-	local c_destone = minetest.get_content_id("default:desert_stone")
+	local c_destone = minetest.get_content_id("meru:destone")
 
 	local sidelen = x1 - x0 + 1
 	local chulens3d = {x = sidelen, y = sidelen, z = sidelen}