Remove lava. Thin rivers with altitude. Remove flexy realm option and flex noise. Cube centre parameters. Add dyson cube realm. Constant width fissures
paramat
parent
5c2844a8ac
commit
14cf3b1fdc
|
|
@ -1,4 +1,4 @@
|
|||
flexrealm 0.3.0 by paramat
|
||||
flexrealm 0.3.1 by paramat
|
||||
For latest stable Minetest and back to 0.4.8
|
||||
Depends default
|
||||
Licenses: code WTFPL, textures CC BY-SA
|
||||
|
|
|
|||
|
|
@ -637,6 +637,7 @@ function flexrealm_jungrass(x, y, z, treedir, area, data)
|
|||
local via = area:index(x + 1, y, z)
|
||||
data[via] = c_jungrass
|
||||
elseif treedir == 2 then
|
||||
local via = area:index(x - 1, y, z)
|
||||
data[via] = c_jungrass
|
||||
elseif treedir == 3 then
|
||||
local via = area:index(x , y + 1, z)
|
||||
|
|
@ -791,4 +792,4 @@ function flexrealm_cactus(x, y, z, treedir, area, data)
|
|||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
|
|
|||
752
init.lua
752
init.lua
|
|
@ -1,27 +1,25 @@
|
|||
-- flexrealm 0.3.0 by paramat
|
||||
-- flexrealm 0.3.1 by paramat
|
||||
-- For latest stable Minetest and back to 0.4.8
|
||||
-- Depends default
|
||||
-- Licenses: code WTFPL, textures CC BY-SA
|
||||
|
||||
-- use sidelen, facearea for any chunk size
|
||||
-- cubic world option
|
||||
-- singlenode, no default clouds
|
||||
-- non transparent needles
|
||||
-- TODO
|
||||
-- thin rivers with altitude, erase from endcaps
|
||||
-- too much lava in fissures, separate magma conduit system?
|
||||
-- simplify biomes?
|
||||
-- remove lava
|
||||
-- thin rivers with altitude
|
||||
-- remove flexy realm option
|
||||
-- cube centre parameters
|
||||
-- add dyson cube
|
||||
-- constant width fissures
|
||||
|
||||
-- Variables
|
||||
|
||||
local flex = false -- 3D noise flexy realm
|
||||
local flat = false -- Normal flat realm
|
||||
local vertical = false -- Vertical flat realm facing south
|
||||
local invert = false -- Inverted flat realm
|
||||
local dyson = false -- Dyson sphere
|
||||
local planet = false -- Planet sphere
|
||||
local dysonsphere = false -- Dyson sphere
|
||||
local tube = false -- East-West tube world / O'Neill space colony
|
||||
local cube = true
|
||||
local cube = false -- Planet cube
|
||||
local dysoncube = true -- Dyson cube
|
||||
|
||||
local limit = {
|
||||
XMIN = -33000, -- Limits for all realm types
|
||||
|
|
@ -32,10 +30,7 @@ local limit = {
|
|||
ZMAX = 33000,
|
||||
}
|
||||
|
||||
-- Flexy realm
|
||||
local GFAC = 10 -- Density gradient factor (noise4 multiplier). Reduce for higher hills
|
||||
|
||||
local TERRS = 64 -- Terrain scale for all realms below
|
||||
local TERRS = 128 -- Terrain scale for all realms below
|
||||
-- Normal and inverted flat realms
|
||||
local FLATY = 0 -- Surface y
|
||||
-- Vertical flat realm facing south
|
||||
|
|
@ -44,60 +39,49 @@ local VERTZ = 0 -- Surface z
|
|||
local SPHEX = 0 -- Centre x
|
||||
local SPHEZ = 0 -- ..z
|
||||
local SPHEY = 0 -- ..y
|
||||
local SPHER = 128 -- Surface radius
|
||||
local SPHER = 1024 -- Surface radius
|
||||
-- Tube realm
|
||||
local CYLZ = 0 -- Axis z
|
||||
local CYLY = 0 -- ..y
|
||||
local CYLR = 2000 -- Surface radius
|
||||
local CYLR = 512 -- Surface radius
|
||||
local CYLEX = 4000 -- Endcap base +-x
|
||||
local CYLEW = 512 -- Endcap dish depth
|
||||
-- Cube realm
|
||||
local CUBER = 128 -- Surface radius
|
||||
-- Cube and dyson cube realm
|
||||
local CUBEX = 0 -- Centre x
|
||||
local CUBEZ = 0 -- ..z
|
||||
local CUBEY = 0 -- ..y
|
||||
local CUBER = 512 -- Surface radius
|
||||
|
||||
-- Large scale density field 'grad'
|
||||
-- Noise thresholds for density gradient 'grad'
|
||||
local DEPT = 2 -- -- Realm +-depth density threshold
|
||||
local ICET = 0.05 -- -- Ice density threshold
|
||||
local SAAV = 0 -- -- Sandline average density threshold
|
||||
local SAAM = 0.08 -- -- Sandline density threshold amplitude
|
||||
local SARA = 0.02 -- -- Sandline density threshold randomness
|
||||
local DUGT = -0.03 -- -- Dune grass density threshold
|
||||
local ROCK = -1 -- -- Rocky terrain density threshold
|
||||
local CLLT = -0.9 -- -- Cloud low density threshold
|
||||
local CLHT = -0.89 -- -- Cloud high density threshold
|
||||
|
||||
-- Terrain density field 'density = terno + grad'
|
||||
local SSLT1 = 0.50 -- -- Sandstone strata low density threshold1
|
||||
local SSHT1 = 0.55 -- -- Sandstone strata high density threshold1
|
||||
local SSLT2 = 0.30 -- -- Sandstone strata low density threshold2
|
||||
local SSHT2 = 0.40 -- -- Sandstone strata high density threshold2
|
||||
local SSLT3 = 0.20 -- -- Gravel strata low density threshold3
|
||||
local SSHT3 = 0.25 -- -- Gravel strata high density threshold3
|
||||
-- Noise thresholds for density field 'density'
|
||||
local STOT = 0.10 -- -- Stone density threshold at sea level
|
||||
local DIRT = 0.05 -- -- Dirt density threshold
|
||||
local TRET = 0.01 -- -- Tree growth density threshold, links tree density to soil depth
|
||||
|
||||
local FISEXP = 0.02 -- Fissure expansion rate under surface
|
||||
local TRET = 0.01 -- -- Tree growth density threshold
|
||||
-- Other parameters
|
||||
local TFIS = 0.02 -- Fissure width
|
||||
local OCHA = 7*7*7 -- -- Ore 1/x chance per stone node
|
||||
local TCLOUD = 0.5 -- -- Cloud threshold, -2 = overcast, 2 = no cloud
|
||||
|
||||
local HTET = 0.2 -- -- Desert / savanna / rainforest temperature noise threshold.
|
||||
local LTET = -0.4 -- -- Tundra / taiga temperature noise threshold.
|
||||
local HWET = 0.2 -- -- Wet grassland / rainforest wetness noise threshold.
|
||||
local LWET = -0.4 -- -- Tundra / dry grassland / desert wetness noise threshold.
|
||||
local BIOR = 0.05 -- -- Biome noise randomness for blend dithering
|
||||
|
||||
local BIOR = 0.02 -- -- Biome noise randomness for blend dithering
|
||||
local flora = {
|
||||
ATCHA = 49, -- -- Apple tree maximum 1/x chance per surface node
|
||||
PTCHA = 49, -- -- Pine tree maximum 1/x chance per surface node
|
||||
STCHA = 529, -- -- Savanna tree maximum 1/x chance per surface node
|
||||
JTCHA = 25, -- -- Jungle tree maximum 1/x chance per surface node
|
||||
JTCHA = 16, -- -- Jungle tree maximum 1/x chance per surface node
|
||||
DEGCHA = 9, -- -- Grass 1/x chance per surface node
|
||||
SAGCHA = 5, -- -- Savanna grass 1/x chance per surface node
|
||||
DRGCHA = 3, -- -- Dry grassland grass 1/x chance per surface node
|
||||
WEGCHA = 3, -- -- Wet grassland grass 1/x chance per surface node
|
||||
DRGCHA = 5, -- -- Dry grassland grass 1/x chance per surface node
|
||||
WEGCHA = 5, -- -- Wet grassland grass 1/x chance per surface node
|
||||
DUGCHA = 5, -- -- Dune grass 1/x chance per surface node
|
||||
PAPCHA = 3, -- -- Papyrus 1/x chance per surface swamp water node
|
||||
DEFCHA = 25, -- -- Flower 1/x chance per surface node
|
||||
DEFCHA = 47 ^ 2, -- -- Flower 1/x chance per surface node
|
||||
CACHA = 361, -- -- Cactus 1/x chance per surface node
|
||||
}
|
||||
|
||||
|
|
@ -111,7 +95,7 @@ local np_terrain = {
|
|||
spread = {x=512, y=512, z=512},
|
||||
seed = 92,
|
||||
octaves = 6,
|
||||
persist = 0.6
|
||||
persist = 0.63
|
||||
}
|
||||
|
||||
-- 3D noise 7 for smooth terrain
|
||||
|
|
@ -119,7 +103,7 @@ local np_terrain = {
|
|||
local np_smooth = {
|
||||
offset = 0,
|
||||
scale = 1,
|
||||
spread = {x=512, y=512, z=512},
|
||||
spread = {x=828, y=828, z=828},
|
||||
seed = 800911,
|
||||
octaves = 5,
|
||||
persist = 0.4
|
||||
|
|
@ -130,10 +114,10 @@ local np_smooth = {
|
|||
local np_terblen = {
|
||||
offset = 0,
|
||||
scale = 1,
|
||||
spread = {x=414, y=414, z=414},
|
||||
spread = {x=670, y=670, z=670},
|
||||
seed = -440002,
|
||||
octaves = 1,
|
||||
persist = 0.5
|
||||
octaves = 3,
|
||||
persist = 0.33
|
||||
}
|
||||
|
||||
-- 3D noise 6 for faults and rivers
|
||||
|
|
@ -144,7 +128,7 @@ local np_fault = {
|
|||
spread = {x=512, y=512, z=512},
|
||||
seed = 14440002,
|
||||
octaves = 5,
|
||||
persist = 0.6
|
||||
persist = 0.5
|
||||
}
|
||||
|
||||
-- 3D noise 2 for temperature
|
||||
|
|
@ -152,10 +136,10 @@ local np_fault = {
|
|||
local np_temp = {
|
||||
offset = 0,
|
||||
scale = 1,
|
||||
spread = {x=512, y=512, z=512},
|
||||
spread = {x=1024, y=1024, z=1024},
|
||||
seed = 9130,
|
||||
octaves = 1,
|
||||
persist = 0.5
|
||||
octaves = 2,
|
||||
persist = 0.33
|
||||
}
|
||||
|
||||
-- 3D noise 9 for humidity
|
||||
|
|
@ -163,10 +147,10 @@ local np_temp = {
|
|||
local np_humid = {
|
||||
offset = 0,
|
||||
scale = 1,
|
||||
spread = {x=512, y=512, z=512},
|
||||
spread = {x=1024, y=1024, z=1024},
|
||||
seed = -55500,
|
||||
octaves = 1,
|
||||
persist = 0.5
|
||||
octaves = 2,
|
||||
persist = 0.33
|
||||
}
|
||||
|
||||
-- 3D noise 3 for fissures
|
||||
|
|
@ -174,23 +158,12 @@ local np_humid = {
|
|||
local np_fissure = {
|
||||
offset = 0,
|
||||
scale = 1,
|
||||
spread = {x=128, y=128, z=128},
|
||||
seed = 186000048881,
|
||||
spread = {x=192, y=192, z=192},
|
||||
seed = 108881,
|
||||
octaves = 4,
|
||||
persist = 0.5
|
||||
}
|
||||
|
||||
-- 3D noise 4 for flexy realm large scale density gradient
|
||||
|
||||
local np_dengrad = {
|
||||
offset = 0,
|
||||
scale = 1,
|
||||
spread = {x=828, y=828, z=828},
|
||||
seed = 80000002222208,
|
||||
octaves = 3,
|
||||
persist = 0.3
|
||||
}
|
||||
|
||||
-- 3D noise for clouds
|
||||
|
||||
local np_cloud = {
|
||||
|
|
@ -228,7 +201,7 @@ minetest.register_on_generated(function(minp, maxp, seed)
|
|||
return
|
||||
end
|
||||
|
||||
local t1 = os.clock()
|
||||
local t0 = os.clock()
|
||||
local x0 = minp.x
|
||||
local y0 = minp.y
|
||||
local z0 = minp.z
|
||||
|
|
@ -236,15 +209,6 @@ minetest.register_on_generated(function(minp, maxp, seed)
|
|||
local y1 = maxp.y
|
||||
local z1 = maxp.z
|
||||
print ("[flexrealm] chunk minp ("..x0.." "..y0.." "..z0..")")
|
||||
|
||||
local sidelen = x1 - x0 + 1
|
||||
local facearea = sidelen ^ 2
|
||||
local chulens = {x=sidelen, y=sidelen, z=sidelen}
|
||||
local minpos = {x=x0, y=y0, z=z0}
|
||||
|
||||
local vm, emin, emax = minetest.get_mapgen_object("voxelmanip")
|
||||
local area = VoxelArea:new{MinEdge=emin, MaxEdge=emax}
|
||||
local data = vm:get_data()
|
||||
|
||||
local c_air = minetest.get_content_id("air")
|
||||
local c_meseblock = minetest.get_content_id("default:mese_block")
|
||||
|
|
@ -276,12 +240,18 @@ minetest.register_on_generated(function(minp, maxp, seed)
|
|||
local c_flrswatfour = minetest.get_content_id("flexrealm:swatfour")
|
||||
local c_flrlavazero = minetest.get_content_id("flexrealm:lavazero")
|
||||
|
||||
local vm, emin, emax = minetest.get_mapgen_object("voxelmanip")
|
||||
local area = VoxelArea:new{MinEdge=emin, MaxEdge=emax}
|
||||
local data = vm:get_data()
|
||||
|
||||
local sidelen = x1 - x0 + 1
|
||||
local facearea = sidelen ^ 2
|
||||
local chulens = {x=sidelen, y=sidelen, z=sidelen}
|
||||
local minpos = {x=x0, y=y0, z=z0}
|
||||
|
||||
local nvals1 = minetest.get_perlin_map(np_terrain, chulens):get3dMap_flat(minpos)
|
||||
local nvals2 = minetest.get_perlin_map(np_temp, chulens):get3dMap_flat(minpos)
|
||||
local nvals3 = minetest.get_perlin_map(np_fissure, chulens):get3dMap_flat(minpos)
|
||||
if flex then
|
||||
local nvals4 = minetest.get_perlin_map(np_dengrad, chulens):get3dMap_flat(minpos)
|
||||
end
|
||||
local nvals6 = minetest.get_perlin_map(np_fault, chulens):get3dMap_flat(minpos)
|
||||
local nvals7 = minetest.get_perlin_map(np_smooth, chulens):get3dMap_flat(minpos)
|
||||
local nvals8 = minetest.get_perlin_map(np_terblen, chulens):get3dMap_flat(minpos)
|
||||
|
|
@ -289,37 +259,36 @@ minetest.register_on_generated(function(minp, maxp, seed)
|
|||
local nvals_cloud = minetest.get_perlin_map(np_cloud, chulens):get3dMap_flat(minpos)
|
||||
|
||||
local ni = 1
|
||||
local treedir = 4 -- set to upside down to place non-flowing water before treedir recalculated for node at ni = 6482
|
||||
for z = z0, z1 do
|
||||
local treedir = 4 -- set to upside down to place non-flowing water before treedir
|
||||
for z = z0, z1 do -- recalculated for node at ni = 6482
|
||||
for y = y0, y1 do
|
||||
local vi = area:index(x0, y, z) -- LVM index for first node in x row
|
||||
for x = x0, x1 do -- for each node do
|
||||
local nodid = data[vi] -- node
|
||||
|
||||
local vi = area:index(x0, y, z)
|
||||
for x = x0, x1 do
|
||||
local nodid = data[vi]
|
||||
local density
|
||||
local terno
|
||||
local grad
|
||||
local noise6 = nvals6[ni] -- faults
|
||||
local noise8 = nvals8[ni] -- terrain blend
|
||||
local terblen = math.min(math.abs(noise8) * 2, 1) -- terrain blend with smooth
|
||||
local cubexr, cubeyr, cubezr
|
||||
-- terrain blend
|
||||
local noise6 = nvals6[ni]
|
||||
local noise8 = nvals8[ni]
|
||||
local terblen = math.min(math.abs(noise8) * 2, 1)
|
||||
if noise6 >= -0.4 and noise6 <= 0.4 then
|
||||
terno = nvals1[ni] * (1 - terblen) + nvals7[ni] * terblen
|
||||
else
|
||||
terno = nvals1[ni] * (1 - terblen) - nvals7[ni] * terblen
|
||||
end
|
||||
|
||||
if flex then
|
||||
local noise4 = nvals4[ni]
|
||||
grad = noise4 * GFAC
|
||||
elseif flat then
|
||||
-- noise gradient
|
||||
if flat then
|
||||
grad = (FLATY - y) / TERRS
|
||||
elseif vertical then
|
||||
grad = (z - VERTZ) / TERRS
|
||||
elseif invert then
|
||||
grad = (y - FLATY) / TERRS
|
||||
elseif dyson or planet then
|
||||
local nodrad = math.sqrt((x - SPHEX) ^ 2 + (y - SPHEY) ^ 2 + (z - SPHEZ) ^ 2)
|
||||
if dyson then
|
||||
elseif dysonsphere or planet then
|
||||
local nodrad =
|
||||
math.sqrt((x - SPHEX) ^ 2 + (y - SPHEY) ^ 2 + (z - SPHEZ) ^ 2)
|
||||
if dysonsphere then
|
||||
grad = (nodrad - SPHER) / TERRS
|
||||
else
|
||||
grad = (SPHER - nodrad) / TERRS
|
||||
|
|
@ -327,11 +296,18 @@ minetest.register_on_generated(function(minp, maxp, seed)
|
|||
elseif tube then
|
||||
local nodrad = math.sqrt((y - CYLY) ^ 2 + (z - CYLZ) ^ 2)
|
||||
grad = (nodrad - CYLR) / TERRS
|
||||
elseif cube then
|
||||
local noddis = math.max(math.abs(x), math.abs(y), math.abs(z))
|
||||
grad = (CUBER - noddis) / TERRS
|
||||
elseif cube or dysoncube then
|
||||
cubexr = x - CUBEX
|
||||
cubeyr = y - CUBEY
|
||||
cubezr = z - CUBEZ
|
||||
local noddis = math.max(math.abs(cubexr), math.abs(cubeyr), math.abs(cubezr))
|
||||
if dysoncube then
|
||||
grad = (noddis - CUBER) / TERRS
|
||||
else
|
||||
grad = (CUBER - noddis) / TERRS
|
||||
end
|
||||
end
|
||||
|
||||
-- density field
|
||||
if tube then
|
||||
if math.abs(x) > CYLEX then -- endcaps
|
||||
local wall = ((math.abs(x) - CYLEX) / CYLEW) ^ 2 * CYLR / TERRS
|
||||
|
|
@ -342,306 +318,308 @@ minetest.register_on_generated(function(minp, maxp, seed)
|
|||
else
|
||||
density = terno + grad
|
||||
end
|
||||
|
||||
if ((not tube and grad >= -DEPT) or tube) and grad <= DEPT then
|
||||
|
||||
local temp
|
||||
local humid
|
||||
local desert = false -- desert biome
|
||||
local savanna = false -- savanna biome
|
||||
local raforest = false -- rainforest biome
|
||||
local wetgrass = false -- wet grassland biome
|
||||
local drygrass = false -- dry grassland biome
|
||||
local deforest = false -- deciduous forest biome
|
||||
local tundra = false -- tundra biome
|
||||
local taiga = false -- taiga forest biome
|
||||
if density > 0 or grad > 0 then -- if terrain or water calculate biome
|
||||
temp = nvals2[ni] + grad
|
||||
humid = nvals9[ni] + grad
|
||||
if temp > HTET + (math.random() - 0.5) * BIOR then
|
||||
if humid > HWET + (math.random() - 0.5) * BIOR then
|
||||
raforest = true
|
||||
elseif humid < LWET + (math.random() - 0.5) * BIOR then
|
||||
desert = true
|
||||
else
|
||||
savanna = true
|
||||
end
|
||||
elseif temp < LTET + (math.random() - 0.5) * BIOR then
|
||||
if humid < LWET + (math.random() - 0.5) * BIOR then
|
||||
tundra = true
|
||||
else
|
||||
taiga = true
|
||||
end
|
||||
elseif humid > HWET + (math.random() - 0.5) * BIOR then
|
||||
wetgrass = true
|
||||
-- thin fine materials with altitude
|
||||
local stot = STOT * (1 - grad / ROCK)
|
||||
local altprop = math.max(1 + grad, 0)
|
||||
-- get biome
|
||||
local temp, humid
|
||||
local desert = false -- desert biome
|
||||
local savanna = false -- savanna biome
|
||||
local raforest = false -- rainforest biome
|
||||
local wetgrass = false -- wet grassland biome
|
||||
local drygrass = false -- dry grassland biome
|
||||
local deforest = false -- deciduous forest biome
|
||||
local tundra = false -- tundra biome
|
||||
local taiga = false -- taiga forest biome
|
||||
if density > 0 or grad > 0 then -- if terrain or water calculate biome
|
||||
temp = nvals2[ni] + grad
|
||||
humid = nvals9[ni] + grad
|
||||
if temp > HTET + (math.random() - 0.5) * BIOR then
|
||||
if humid > HWET + (math.random() - 0.5) * BIOR then
|
||||
raforest = true
|
||||
elseif humid < LWET + (math.random() - 0.5) * BIOR then
|
||||
drygrass = true
|
||||
desert = true
|
||||
else
|
||||
deforest = true
|
||||
savanna = true
|
||||
end
|
||||
end
|
||||
|
||||
local nofis = false
|
||||
if density > 0 then -- if terrain then set nofis
|
||||
if math.abs(nvals3[ni]) > math.sqrt(density) * FISEXP then
|
||||
nofis = true
|
||||
elseif temp < LTET + (math.random() - 0.5) * BIOR then
|
||||
if humid < LWET + (math.random() - 0.5) * BIOR then
|
||||
tundra = true
|
||||
else
|
||||
taiga = true
|
||||
end
|
||||
elseif humid > HWET + (math.random() - 0.5) * BIOR then
|
||||
wetgrass = true
|
||||
elseif humid < LWET + (math.random() - 0.5) * BIOR then
|
||||
drygrass = true
|
||||
else
|
||||
deforest = true
|
||||
end
|
||||
|
||||
-- if surface node away from chunk boundary get up direction for trees
|
||||
local tree = false
|
||||
if density <= TRET -- surface node
|
||||
and x-x0 >= 1 and x1 - x >= 1
|
||||
and y-y0 >= 1 and y1 - y >= 1
|
||||
and z-z0 >= 1 and z1 - z >= 1 then
|
||||
tree = true
|
||||
end
|
||||
if tree or ni == facearea + sidelen + 2 then -- set treedir at first non-border node for water selection
|
||||
local sphedis = SPHER * 0.707
|
||||
local cyldis = CYLR * 0.707
|
||||
if vertical then
|
||||
treedir = 6
|
||||
elseif invert then
|
||||
treedir = 4
|
||||
elseif flex then
|
||||
local nxp = nvals4[ni + 1] -- 1 east
|
||||
local nxn = nvals4[ni - 1] -- 2 west
|
||||
local nyp = nvals4[ni + sidelen] -- 3 up
|
||||
local nyn = nvals4[ni - sidelen] -- 4 down
|
||||
local nzp = nvals4[ni + facearea] -- 5 north
|
||||
local nzn = nvals4[ni - facearea] -- 6 south
|
||||
local nlo = math.min(nxp, nxn, nyp, nyn, nzp, nzn)
|
||||
if nxp == nlo then
|
||||
treedir = 1
|
||||
elseif nxn == nlo then
|
||||
treedir = 2
|
||||
elseif nyp == nlo then
|
||||
treedir = 3
|
||||
elseif nyn == nlo then
|
||||
treedir = 4
|
||||
elseif nzp == nlo then
|
||||
treedir = 5
|
||||
else
|
||||
treedir = 6
|
||||
end
|
||||
elseif dyson then
|
||||
if SPHEY - y > sphedis then
|
||||
treedir = 3
|
||||
elseif y - SPHEY > sphedis then
|
||||
treedir = 4
|
||||
elseif SPHEX - x > sphedis then
|
||||
treedir = 1
|
||||
elseif x - SPHEX > sphedis then
|
||||
treedir = 2
|
||||
elseif SPHEZ - z > sphedis then
|
||||
treedir = 5
|
||||
else
|
||||
treedir = 6
|
||||
end
|
||||
elseif planet then
|
||||
if y - SPHEY > sphedis then
|
||||
treedir = 3
|
||||
elseif SPHEY - y > sphedis then
|
||||
treedir = 4
|
||||
elseif x - SPHEX > sphedis then
|
||||
treedir = 1
|
||||
elseif SPHEX - x > sphedis then
|
||||
treedir = 2
|
||||
elseif z - SPHEZ > sphedis then
|
||||
treedir = 5
|
||||
else
|
||||
treedir = 6
|
||||
end
|
||||
elseif tube then
|
||||
if CYLY - y > cyldis then
|
||||
treedir = 3
|
||||
elseif y - CYLY > cyldis then
|
||||
treedir = 4
|
||||
elseif CYLZ - z > cyldis then
|
||||
treedir = 5
|
||||
else
|
||||
treedir = 6
|
||||
end
|
||||
elseif cube then
|
||||
if y > math.abs(x) and y > math.abs(z) then
|
||||
treedir = 3
|
||||
elseif y < -math.abs(x) and y < -math.abs(z) then
|
||||
treedir = 4
|
||||
elseif x > math.abs(y) and x > math.abs(z) then
|
||||
treedir = 1
|
||||
elseif x < -math.abs(y) and x < -math.abs(z) then
|
||||
treedir = 2
|
||||
elseif z > math.abs(x) and z > math.abs(y) then
|
||||
treedir = 5
|
||||
elseif z < -math.abs(x) and z < -math.abs(y) then
|
||||
treedir = 6
|
||||
end
|
||||
else -- flat realm
|
||||
end
|
||||
-- caves boolean
|
||||
local nofis = math.abs(nvals3[ni]) > TFIS
|
||||
-- if surface node away from chunk boundary get up direction for trees
|
||||
local tree = false
|
||||
if density <= TRET -- surface node
|
||||
and x > x0 and x < x1
|
||||
and y > y0 and y < y1
|
||||
and z > z0 and z < z1 then
|
||||
tree = true
|
||||
end
|
||||
if tree or ni == facearea + sidelen + 2 then -- set treedir at first non-border
|
||||
local sphedis = SPHER * 0.707 -- node for water selection
|
||||
local cyldis = CYLR * 0.707
|
||||
if flat then
|
||||
treedir = 3
|
||||
elseif vertical then
|
||||
treedir = 6
|
||||
elseif invert then
|
||||
treedir = 4
|
||||
elseif dyson then
|
||||
if SPHEY - y > sphedis then
|
||||
treedir = 3
|
||||
elseif y - SPHEY > sphedis then
|
||||
treedir = 4
|
||||
elseif SPHEX - x > sphedis then
|
||||
treedir = 1
|
||||
elseif x - SPHEX > sphedis then
|
||||
treedir = 2
|
||||
elseif SPHEZ - z > sphedis then
|
||||
treedir = 5
|
||||
else
|
||||
treedir = 6
|
||||
end
|
||||
elseif planet then
|
||||
if y - SPHEY > sphedis then
|
||||
treedir = 3
|
||||
elseif SPHEY - y > sphedis then
|
||||
treedir = 4
|
||||
elseif x - SPHEX > sphedis then
|
||||
treedir = 1
|
||||
elseif SPHEX - x > sphedis then
|
||||
treedir = 2
|
||||
elseif z - SPHEZ > sphedis then
|
||||
treedir = 5
|
||||
else
|
||||
treedir = 6
|
||||
end
|
||||
elseif tube then
|
||||
if CYLY - y > cyldis then
|
||||
treedir = 3
|
||||
elseif y - CYLY > cyldis then
|
||||
treedir = 4
|
||||
elseif CYLZ - z > cyldis then
|
||||
treedir = 5
|
||||
else
|
||||
treedir = 6
|
||||
end
|
||||
elseif cube then
|
||||
if cubeyr > math.abs(cubexr)
|
||||
and cubeyr > math.abs(cubezr) then
|
||||
treedir = 3
|
||||
elseif cubeyr < -math.abs(cubexr)
|
||||
and cubeyr < -math.abs(cubezr) then
|
||||
treedir = 4
|
||||
elseif cubexr > math.abs(cubeyr)
|
||||
and cubexr > math.abs(cubezr) then
|
||||
treedir = 1
|
||||
elseif cubexr < -math.abs(cubeyr)
|
||||
and cubexr < -math.abs(cubezr) then
|
||||
treedir = 2
|
||||
elseif cubezr > math.abs(cubexr)
|
||||
and cubezr > math.abs(cubeyr) then
|
||||
treedir = 5
|
||||
elseif cubezr < -math.abs(cubexr)
|
||||
and cubezr < -math.abs(cubeyr) then
|
||||
treedir = 6
|
||||
end
|
||||
elseif dysoncube then
|
||||
if cubeyr > math.abs(cubexr)
|
||||
and cubeyr > math.abs(cubezr) then
|
||||
treedir = 4
|
||||
elseif cubeyr < -math.abs(cubexr)
|
||||
and cubeyr < -math.abs(cubezr) then
|
||||
treedir = 3
|
||||
elseif cubexr > math.abs(cubeyr)
|
||||
and cubexr > math.abs(cubezr) then
|
||||
treedir = 2
|
||||
elseif cubexr < -math.abs(cubeyr)
|
||||
and cubexr < -math.abs(cubezr) then
|
||||
treedir = 1
|
||||
elseif cubezr > math.abs(cubexr)
|
||||
and cubezr > math.abs(cubeyr) then
|
||||
treedir = 6
|
||||
elseif cubezr < -math.abs(cubexr)
|
||||
and cubezr < -math.abs(cubeyr) then
|
||||
treedir = 5
|
||||
end
|
||||
end
|
||||
|
||||
local stot = STOT * (1 - grad / ROCK) -- thin fine materials with altitude
|
||||
|
||||
local noise6abs = math.abs(noise6) -- rivers
|
||||
if noise6abs <= 0.03 * (1 - (density / 0.25) ^ 2)
|
||||
and grad <= 0.12 and (density > 0 or grad > 0) then
|
||||
if grad > 0.1 and density > 0 then
|
||||
data[vi] = c_flrsand
|
||||
elseif (density >= 0.1 and not desert) or grad > 0 then -- dry river in deserts
|
||||
if tundra or taiga then
|
||||
data[vi] = c_ice
|
||||
else
|
||||
if treedir == 3 then
|
||||
data[vi] = c_flrwatfour
|
||||
else
|
||||
data[vi] = c_flrwatzero
|
||||
end
|
||||
end
|
||||
end
|
||||
elseif noise6abs > 0.03 * (1 - (density / 0.25) ^ 2) -- riverbed sand
|
||||
and noise6abs <= 0.04 * (1 - (density / 0.3) ^ 2)
|
||||
and grad < 0.12 and density >= 0.1 then
|
||||
end
|
||||
-- mapgen
|
||||
local noise6abs = math.abs(noise6) -- rivers
|
||||
if noise6abs <= 0.03 * (1 - (density / 0.25) ^ 2) * altprop
|
||||
and grad <= 0.12 and (density > 0 or grad > 0) then
|
||||
if grad > 0.1 and density > 0 then
|
||||
data[vi] = c_flrsand
|
||||
elseif (density >= stot and grad <= DEPT and nofis) then -- stone cut by fissures
|
||||
if (density >= SSLT1 and density <= SSHT1)
|
||||
or (density >= SSLT2 and density <= SSHT2)
|
||||
or (density >= SSLT3 and density <= SSHT3) then
|
||||
data[vi] = c_sastone
|
||||
elseif desert then
|
||||
data[vi] = c_flrdestone
|
||||
elseif math.random(OCHA) == 2 and density >= STOT then -- ores
|
||||
local osel = math.random(34)
|
||||
if osel == 34 then
|
||||
data[vi] = c_meseblock -- revenge!
|
||||
elseif osel >= 31 then
|
||||
data[vi] = c_stodiam
|
||||
elseif osel >= 28 then
|
||||
data[vi] = c_stogold
|
||||
elseif osel >= 19 then
|
||||
data[vi] = c_stocopp
|
||||
elseif osel >= 10 then
|
||||
data[vi] = c_stoiron
|
||||
else
|
||||
data[vi] = c_stocoal
|
||||
end
|
||||
else
|
||||
data[vi] = c_flrstone
|
||||
end
|
||||
elseif density > 0 and density < stot then -- fine materials
|
||||
if grad >= SAAV + noise8 * SAAM + (math.random() - 0.5) * SARA then -- clay, sand, beach, dunes
|
||||
if taiga and density < DIRT and grad <= 0 then -- snowy beach
|
||||
data[vi] = c_snowblock
|
||||
elseif deforest and grad > 0.05 and grad < 0.057 then -- clay
|
||||
data[vi] = c_clay
|
||||
else
|
||||
data[vi] = c_flrsand
|
||||
if tree and grad < DUGT and math.random(flora.DUGCHA) == 2 then
|
||||
flexrealm_dryshrub(x, y, z, treedir, area, data)
|
||||
end
|
||||
end
|
||||
elseif nofis or (not nofis and grad > 0) then -- fine materials cut by fissures above sea level only
|
||||
if density >= DIRT then
|
||||
if desert then
|
||||
data[vi] = c_flrdesand
|
||||
elseif tundra then
|
||||
data[vi] = c_flrperfrost
|
||||
elseif drygrass or savanna then
|
||||
data[vi] = c_flrdirt -- doesnt turn to green grass
|
||||
else
|
||||
data[vi] = c_dirt
|
||||
end
|
||||
else -- else surface nodes
|
||||
if taiga then
|
||||
if tree and math.random(flora.PTCHA) == 2 then
|
||||
flexrealm_pinetree(x, y, z, treedir, area, data)
|
||||
else
|
||||
data[vi] = c_snowblock
|
||||
end
|
||||
elseif deforest then
|
||||
data[vi] = c_flrgrass
|
||||
if tree and math.random(flora.ATCHA) == 2 then
|
||||
flexrealm_appletree(x, y, z, treedir, area, data)
|
||||
elseif tree and grad <= 0 and math.random(flora.DEFCHA) == 2 then
|
||||
flexrealm_flower(x, y, z, treedir, area, data)
|
||||
elseif tree and grad <= 0 and math.random(flora.DEGCHA) == 2 then
|
||||
flexrealm_grass(x, y, z, treedir, area, data)
|
||||
end
|
||||
elseif savanna then
|
||||
data[vi] = c_flrdrygrass
|
||||
if tree and math.random(flora.STCHA) == 2 then
|
||||
flexrealm_savannatree(x, y, z, treedir, area, data)
|
||||
elseif tree and grad <= 0 and math.random(flora.SAGCHA) == 2 then
|
||||
flexrealm_dryshrub(x, y, z, treedir, area, data)
|
||||
end
|
||||
elseif raforest then
|
||||
if tree and math.random(flora.JTCHA) == 2 then
|
||||
flexrealm_jungletree(x, y, z, treedir, area, data)
|
||||
else
|
||||
data[vi] = c_flrgrass
|
||||
end
|
||||
elseif drygrass then
|
||||
data[vi] = c_flrdrygrass
|
||||
if tree and grad <= 0 and math.random(flora.DRGCHA) == 2 then
|
||||
flexrealm_dryshrub(x, y, z, treedir, area, data)
|
||||
end
|
||||
elseif wetgrass then
|
||||
data[vi] = c_flrgrass
|
||||
if tree and grad <= 0 and math.random(flora.WEGCHA) == 2 then
|
||||
if math.random(3) == 2 then
|
||||
flexrealm_grass(x, y, z, treedir, area, data)
|
||||
else
|
||||
flexrealm_jungrass(x, y, z, treedir, area, data)
|
||||
end
|
||||
end
|
||||
elseif tundra then
|
||||
data[vi] = c_flrfrograss
|
||||
elseif desert then
|
||||
if tree and humid > LWET - 0.2 and math.random(flora.CACHA) == 2 then
|
||||
flexrealm_cactus(x, y, z, treedir, area, data)
|
||||
else
|
||||
data[vi] = c_flrdesand
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
elseif taiga and grad > 0 and grad <= ICET and density <= 0 then -- ice sheets
|
||||
if nodid == c_air then
|
||||
elseif (density >= 0.1 and not desert) or grad > 0 then
|
||||
if tundra or taiga then -- dry river in deserts
|
||||
data[vi] = c_ice
|
||||
end
|
||||
elseif grad > 0 and density <= 0 then
|
||||
if nodid == c_air then
|
||||
if noise8 > 0.2 and density > -0.01 + (math.random() - 0.5) * 0.005 and grad < 0.02
|
||||
and (desert or savanna or raforest) then
|
||||
if treedir == 3 then -- swampwater
|
||||
data[vi] = c_flrswatfour
|
||||
else
|
||||
data[vi] = c_flrswatzero
|
||||
end
|
||||
if math.random(flora.PAPCHA) == 2 then -- papyrus
|
||||
flexrealm_papyrus(x, y, z, treedir, area, data)
|
||||
end
|
||||
elseif treedir == 3 then -- water
|
||||
else
|
||||
if treedir == 3 then
|
||||
data[vi] = c_flrwatfour
|
||||
else
|
||||
data[vi] = c_flrwatzero
|
||||
end
|
||||
end
|
||||
elseif not nofis and grad > 0 and density > 0 and grad <= DEPT
|
||||
and ((noise6 > -0.45 and noise6 < -0.35) or (noise6 > 0.35 and noise6 < 0.45)) then
|
||||
data[vi] = c_flrsand -- sand blocking fissures in faults below water level
|
||||
elseif not nofis and density >= math.sqrt(terblen) * DEPT and grad <= DEPT then
|
||||
data[vi] = c_flrlavazero -- lava in fissures, rises to surface in rougher ground
|
||||
elseif grad >= CLLT and grad <= CLHT then -- clouds
|
||||
local xrq = 16 * math.floor((x - x0) / 16)
|
||||
local yrq = 16 * math.floor((y - y0) / 16)
|
||||
local zrq = 16 * math.floor((z - z0) / 16)
|
||||
local qixyz = zrq * facearea + yrq * sidelen + xrq + 1
|
||||
if nvals_cloud[qixyz] > TCLOUD and grad < -0.895 + nvals9[ni] * 0.005 then
|
||||
data[vi] = c_flrcloud
|
||||
end
|
||||
elseif noise6abs > 0.03 * (1 - (density / 0.25) ^ 2) * altprop -- river sand
|
||||
and noise6abs <= 0.04 * (1 - (density / 0.3) ^ 2) * altprop
|
||||
and grad < 0.12 and density >= 0.1 then
|
||||
data[vi] = c_flrsand
|
||||
elseif (density >= stot and grad <= DEPT and nofis) then -- stone
|
||||
if (density >= 0.5 and density <= 0.55)
|
||||
or (density >= 0.3 and density <= 0.4)
|
||||
or (density >= 0.2 and density <= 0.25) then
|
||||
data[vi] = c_sastone
|
||||
elseif desert then
|
||||
data[vi] = c_flrdestone
|
||||
elseif math.random(OCHA) == 2 and density >= STOT then -- ores
|
||||
local osel = math.random(34)
|
||||
if osel == 34 then
|
||||
data[vi] = c_meseblock -- revenge!
|
||||
elseif osel >= 31 then
|
||||
data[vi] = c_stodiam
|
||||
elseif osel >= 28 then
|
||||
data[vi] = c_stogold
|
||||
elseif osel >= 19 then
|
||||
data[vi] = c_stocopp
|
||||
elseif osel >= 10 then
|
||||
data[vi] = c_stoiron
|
||||
else
|
||||
data[vi] = c_stocoal
|
||||
end
|
||||
else
|
||||
data[vi] = c_flrstone
|
||||
end
|
||||
elseif density > 0 and density < stot then -- fine materials
|
||||
if grad >= -0.04 + noise8 * 0.08 + math.random() * 0.02 then -- beaches
|
||||
if taiga and density < DIRT and grad <= 0 then -- snowy beach
|
||||
data[vi] = c_snowblock
|
||||
elseif deforest and grad > 0.05 and grad < 0.057 then -- clay
|
||||
data[vi] = c_clay
|
||||
else
|
||||
data[vi] = c_flrsand -- sand
|
||||
if tree and grad < -0.03
|
||||
and math.random(flora.DUGCHA) == 2 then
|
||||
flexrealm_dryshrub(x, y, z, treedir, area, data)
|
||||
end
|
||||
end
|
||||
elseif nofis or (not nofis and grad > 0) then -- fine materials cut by
|
||||
if density >= DIRT then -- fissures above sea level only
|
||||
if desert then
|
||||
data[vi] = c_flrdesand
|
||||
elseif tundra then
|
||||
data[vi] = c_flrperfrost
|
||||
elseif drygrass or savanna then
|
||||
data[vi] = c_flrdirt -- doesnt turn to green grass
|
||||
else
|
||||
data[vi] = c_dirt
|
||||
end
|
||||
else -- else surface nodes
|
||||
if taiga then
|
||||
if tree and math.random(flora.PTCHA) == 2 then
|
||||
flexrealm_pinetree(x, y, z, treedir, area, data)
|
||||
else
|
||||
data[vi] = c_snowblock
|
||||
end
|
||||
elseif deforest then
|
||||
data[vi] = c_flrgrass
|
||||
if tree and math.random(flora.ATCHA) == 2 then
|
||||
flexrealm_appletree(x, y, z, treedir, area, data)
|
||||
elseif tree and grad <= 0
|
||||
and math.random(flora.DEFCHA) == 2 then
|
||||
flexrealm_flower(x, y, z, treedir, area, data)
|
||||
elseif tree and grad <= 0
|
||||
and math.random(flora.DEGCHA) == 2 then
|
||||
flexrealm_grass(x, y, z, treedir, area, data)
|
||||
end
|
||||
elseif savanna then
|
||||
data[vi] = c_flrdrygrass
|
||||
if tree and math.random(flora.STCHA) == 2 then
|
||||
flexrealm_savannatree(x, y, z, treedir, area, data)
|
||||
elseif tree and grad <= 0
|
||||
and math.random(flora.SAGCHA) == 2 then
|
||||
flexrealm_dryshrub(x, y, z, treedir, area, data)
|
||||
end
|
||||
elseif raforest then
|
||||
if tree and math.random(flora.JTCHA) == 2 then
|
||||
flexrealm_jungletree(x, y, z, treedir, area, data)
|
||||
else
|
||||
data[vi] = c_flrgrass
|
||||
end
|
||||
elseif drygrass then
|
||||
data[vi] = c_flrdrygrass
|
||||
if tree and grad <= 0
|
||||
and math.random(flora.DRGCHA) == 2 then
|
||||
flexrealm_dryshrub(x, y, z, treedir, area, data)
|
||||
end
|
||||
elseif wetgrass then
|
||||
data[vi] = c_flrgrass
|
||||
if tree and grad <= 0
|
||||
and math.random(flora.WEGCHA) == 2 then
|
||||
if math.random(3) == 2 then
|
||||
flexrealm_grass(x, y, z, treedir, area, data)
|
||||
else
|
||||
flexrealm_jungrass(x, y, z, treedir, area, data)
|
||||
end
|
||||
end
|
||||
elseif tundra then
|
||||
data[vi] = c_flrfrograss
|
||||
elseif desert then
|
||||
if tree and humid > LWET - 0.2
|
||||
and math.random(flora.CACHA) == 2 then
|
||||
flexrealm_cactus(x, y, z, treedir, area, data)
|
||||
else
|
||||
data[vi] = c_flrdesand
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
elseif taiga and grad > 0 and grad <= 0.05 and density <= 0 then -- ice sheets
|
||||
if nodid == c_air then
|
||||
data[vi] = c_ice
|
||||
end
|
||||
elseif grad > 0 and density <= 0 then
|
||||
if nodid == c_air then
|
||||
if noise8 > 0.2 and density > -0.01 + (math.random() - 0.5) * 0.005
|
||||
and grad < 0.02 and (desert or savanna or raforest) then
|
||||
if treedir == 3 then -- swampwater
|
||||
data[vi] = c_flrswatfour
|
||||
else
|
||||
data[vi] = c_flrswatzero
|
||||
end
|
||||
if math.random(flora.PAPCHA) == 2 then -- papyrus
|
||||
flexrealm_papyrus(x, y, z, treedir, area, data)
|
||||
end
|
||||
elseif treedir == 3 then -- water
|
||||
data[vi] = c_flrwatfour
|
||||
else
|
||||
data[vi] = c_flrwatzero
|
||||
end
|
||||
end
|
||||
elseif not nofis and grad > 0 and density > 0 and grad <= DEPT
|
||||
and ((noise6 > -0.45 and noise6 < -0.35) or (noise6 > 0.35 and noise6 < 0.45)) then
|
||||
data[vi] = c_flrsand -- sand blocking fissures in faults below water level
|
||||
elseif grad >= CLLT and grad <= CLHT then -- clouds
|
||||
local xrq = 16 * math.floor((x - x0) / 16)
|
||||
local yrq = 16 * math.floor((y - y0) / 16)
|
||||
local zrq = 16 * math.floor((z - z0) / 16)
|
||||
local qixyz = zrq * facearea + yrq * sidelen + xrq + 1
|
||||
if nvals_cloud[qixyz] > TCLOUD and grad < -0.895 + nvals9[ni] * 0.005 then
|
||||
data[vi] = c_flrcloud
|
||||
end
|
||||
end
|
||||
|
||||
ni = ni + 1
|
||||
vi = vi + 1
|
||||
end
|
||||
|
|
@ -652,6 +630,8 @@ minetest.register_on_generated(function(minp, maxp, seed)
|
|||
vm:set_lighting({day=0, night=0})
|
||||
vm:calc_lighting()
|
||||
vm:write_to_map(data)
|
||||
local chugent = math.ceil((os.clock() - t1) * 1000)
|
||||
vm:update_liquids()
|
||||
|
||||
local chugent = math.ceil((os.clock() - t0) * 1000)
|
||||
print ("[flexrealm] "..chugent.." ms")
|
||||
end)
|
||||
|
|
|
|||
Loading…
Reference in New Issue