mtcontrib
/
meru
1
0
Fork 1
Code Issues Pull Requests Releases Wiki Activity

Merge d54e399514 into 0a1961a393

This commit is contained in:
Gaël Chrétien 2016-03-05 11:32:40 +00:00
parent 0a1961a393 d54e399514
commit 95071986d8
1 changed files with 30 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

54
init.lua
View File

@ -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