398 lines
11 KiB
Lua
398 lines
11 KiB
Lua
-- fracture 0.1.3 by paramat
|
|
-- For latest stable Minetest and back to 0.4.8
|
|
-- Depends default
|
|
-- License: code WTFPL
|
|
|
|
-- Parameters
|
|
|
|
local YMIN = 208
|
|
local YMAX = 33000
|
|
local DENOFF = -0.4 -- Density offset, -2 to 2, 0 = equal volumes of air and floatland
|
|
local TSTONE = 0.03 -- Stone density threshold, controls average depth of stone below surface
|
|
local TVOID = 0.3 -- Central void threshold, controls size
|
|
local TFIS = 0.02 -- Fissure threshold, controls width
|
|
local ORECHA = 1 / 5 ^ 3 -- Ore chance per stone node
|
|
|
|
local BLEND = 0.03 -- Controls biome blend distance
|
|
local PINCHA = 17 * 17 -- Pine chance 1/x chance per surface node
|
|
local APPCHA = 13 * 13 -- Appletree
|
|
local CACCHA = 31 * 31 -- Cactus
|
|
local TCAC = 0.2 -- Cactus threshold, width of cactus areas
|
|
local TFOR = 0.2 -- Forest threshold, width of forest paths/clearings
|
|
|
|
-- 3D noise for terrain
|
|
|
|
local np_terrain = {
|
|
offset = 0,
|
|
scale = 1,
|
|
spread = {x=256, y=128, z=256},
|
|
seed = 593,
|
|
octaves = 5,
|
|
persist = 0.67
|
|
}
|
|
|
|
-- 3D noise for alt terrain
|
|
|
|
local np_terralt = {
|
|
offset = 0,
|
|
scale = 1,
|
|
spread = {x=207, y=104, z=207},
|
|
seed = 593,
|
|
octaves = 5,
|
|
persist = 0.67
|
|
}
|
|
|
|
-- 3D noise for fissures
|
|
|
|
local np_fissure = {
|
|
offset = 0,
|
|
scale = 1,
|
|
spread = {x=128, y=256, z=128},
|
|
seed = 2001,
|
|
octaves = 5,
|
|
persist = 0.6
|
|
}
|
|
|
|
-- 3D noise for biomes
|
|
|
|
local np_biome = {
|
|
offset = 0,
|
|
scale = 1,
|
|
spread = {x=512, y=256, z=512},
|
|
seed = -188900,
|
|
octaves = 2,
|
|
persist = 0.33
|
|
}
|
|
|
|
-- 3D noise for flora
|
|
|
|
local np_flora = {
|
|
offset = 0,
|
|
scale = 1,
|
|
spread = {x=256, y=256, z=256},
|
|
seed = 188,
|
|
octaves = 2,
|
|
persist = 0.5
|
|
}
|
|
|
|
-- 3D noise for cloud noise
|
|
|
|
local np_cloud = {
|
|
offset = 0,
|
|
scale = 1,
|
|
spread = {x=26, y=26, z=26},
|
|
seed = 1313131313,
|
|
octaves = 2,
|
|
persist = 0.67
|
|
}
|
|
|
|
-- Stuff
|
|
|
|
fracture = {}
|
|
|
|
dofile(minetest.get_modpath("fracture").."/functions.lua")
|
|
|
|
-- Nodes
|
|
|
|
minetest.register_node("fracture:stone", {
|
|
description = "FR Stone",
|
|
tiles = {"default_stone.png"},
|
|
groups = {cracky=3},
|
|
drop = "default:stone",
|
|
sounds = default.node_sound_stone_defaults(),
|
|
})
|
|
|
|
minetest.register_node("fracture:desertstone", {
|
|
description = "FR Desert Stone",
|
|
tiles = {"default_desert_stone.png"},
|
|
groups = {cracky=3},
|
|
drop = "default:desert_stone",
|
|
sounds = default.node_sound_stone_defaults(),
|
|
})
|
|
|
|
minetest.register_node("fracture:dirt", {
|
|
description = "Dirt",
|
|
tiles = {"default_dirt.png"},
|
|
is_ground_content = false,
|
|
groups = {crumbly=3,soil=1},
|
|
drop = "default:dirt",
|
|
sounds = default.node_sound_dirt_defaults(),
|
|
})
|
|
|
|
minetest.register_node("fracture:dirtsnow", {
|
|
description = "Dirt with Snow",
|
|
tiles = {"default_snow.png", "default_dirt.png", "default_snow.png"},
|
|
is_ground_content = true,
|
|
groups = {crumbly=3},
|
|
drop = "default:dirt",
|
|
sounds = default.node_sound_dirt_defaults({
|
|
footstep = {name="default_snow_footstep", gain=0.25},
|
|
}),
|
|
})
|
|
|
|
minetest.register_node("fracture:grass", {
|
|
description = "Grass",
|
|
tiles = {"default_grass.png", "default_dirt.png", "default_grass.png"},
|
|
is_ground_content = false,
|
|
groups = {crumbly=3,soil=1},
|
|
drop = "default:dirt",
|
|
sounds = default.node_sound_dirt_defaults({
|
|
footstep = {name="default_grass_footstep", gain=0.25},
|
|
}),
|
|
})
|
|
|
|
minetest.register_node("fracture:appleleaf", {
|
|
description = "Appletree Leaves",
|
|
drawtype = "allfaces_optional",
|
|
visual_scale = 1.3,
|
|
tiles = {"default_leaves.png"},
|
|
paramtype = "light",
|
|
is_ground_content = false,
|
|
groups = {snappy=3, flammable=2},
|
|
sounds = default.node_sound_leaves_defaults(),
|
|
})
|
|
|
|
minetest.register_node("fracture:needles", {
|
|
description = "Pine Needles",
|
|
drawtype = "allfaces_optional",
|
|
visual_scale = 1.3,
|
|
tiles = {"fracture_needles.png"},
|
|
paramtype = "light",
|
|
is_ground_content = false,
|
|
groups = {snappy=3},
|
|
sounds = default.node_sound_leaves_defaults(),
|
|
})
|
|
|
|
minetest.register_node("fracture:cactus", {
|
|
description = "Cactus",
|
|
tiles = {"default_cactus_top.png", "default_cactus_top.png", "default_cactus_side.png"},
|
|
paramtype2 = "facedir",
|
|
is_ground_content = false,
|
|
groups = {snappy=1, choppy=3, flammable=2},
|
|
drop = "default:cactus",
|
|
sounds = default.node_sound_wood_defaults(),
|
|
on_place = minetest.rotate_node
|
|
})
|
|
|
|
minetest.register_node("fracture:cloud", {
|
|
description = "Cloud",
|
|
drawtype = "glasslike",
|
|
tiles = {"fracture_cloud.png"},
|
|
paramtype = "light",
|
|
is_ground_content = false,
|
|
sunlight_propagates = true,
|
|
walkable = false,
|
|
pointable = false,
|
|
diggable = false,
|
|
buildable_to = true,
|
|
post_effect_color = {a=63, r=241, g=248, b=255},
|
|
})
|
|
|
|
-- On generated function
|
|
|
|
minetest.register_on_generated(function(minp, maxp, seed)
|
|
if minp.y < YMIN or maxp.y > YMAX then
|
|
return
|
|
end
|
|
|
|
local t1 = os.clock()
|
|
local x1 = maxp.x
|
|
local y1 = maxp.y
|
|
local z1 = maxp.z
|
|
local x0 = minp.x
|
|
local y0 = minp.y
|
|
local z0 = minp.z
|
|
local chuy = math.floor((y0 + 32) / 80)
|
|
print ("[fracture] chunk minp ("..x0.." "..y0.." "..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_stone = minetest.get_content_id("fracture:stone")
|
|
local c_destone = minetest.get_content_id("fracture:desertstone")
|
|
local c_cloud = minetest.get_content_id("fracture:cloud")
|
|
local c_dirt = minetest.get_content_id("fracture:dirt")
|
|
local c_grass = minetest.get_content_id("fracture:grass")
|
|
local c_dirtsnow = minetest.get_content_id("fracture:dirtsnow")
|
|
|
|
local c_desand = minetest.get_content_id("default:desert_sand")
|
|
local c_snowblock = minetest.get_content_id("default:snowblock")
|
|
local c_stodiam = minetest.get_content_id("default:stone_with_diamond")
|
|
local c_stomese = minetest.get_content_id("default:stone_with_mese")
|
|
local c_stogold = minetest.get_content_id("default:stone_with_gold")
|
|
local c_stocopp = minetest.get_content_id("default:stone_with_copper")
|
|
local c_stoiron = minetest.get_content_id("default:stone_with_iron")
|
|
local c_stocoal = minetest.get_content_id("default:stone_with_coal")
|
|
|
|
local sidelen = x1 - x0 + 1
|
|
local chulens = {x=sidelen, y=sidelen+2, z=sidelen}
|
|
local minposxyz = {x=x0, y=y0-1, z=z0}
|
|
|
|
local nvals_terrain = minetest.get_perlin_map(np_terrain, chulens):get3dMap_flat(minposxyz)
|
|
local nvals_terralt = minetest.get_perlin_map(np_terralt, chulens):get3dMap_flat(minposxyz)
|
|
local nvals_fissure = minetest.get_perlin_map(np_fissure, chulens):get3dMap_flat(minposxyz)
|
|
local nvals_biome = minetest.get_perlin_map(np_biome, chulens):get3dMap_flat(minposxyz)
|
|
local nvals_flora = minetest.get_perlin_map(np_flora, chulens):get3dMap_flat(minposxyz)
|
|
local nvals_cloud = minetest.get_perlin_map(np_cloud, chulens):get3dMap_flat(minposxyz)
|
|
|
|
local ungen = false
|
|
if minetest.get_node({x=x0, y=y0-1, z=z0}).name == "ignore" then
|
|
ungen = true
|
|
end
|
|
|
|
local nixyz = 1
|
|
local stable = {}
|
|
local under = {}
|
|
for z = z0, z1 do
|
|
for y = y0 - 1, y1 + 1 do
|
|
local vi = area:index(x0, y, z)
|
|
local viu = area:index(x0, y-1, z)
|
|
for x = x0, x1 do
|
|
local si = x - x0 + 1
|
|
local n_flora = math.abs(nvals_flora[nixyz])
|
|
|
|
local n_terrain = nvals_terrain[nixyz]
|
|
local n_terralt = nvals_terralt[nixyz]
|
|
local density = (n_terrain + n_terralt) * 0.5 + DENOFF
|
|
|
|
local n_biome = nvals_biome[nixyz]
|
|
local biome = false
|
|
if n_biome > 0.4 + (math.random() - 0.5) * BLEND then
|
|
biome = 3 -- desert
|
|
elseif n_biome < -0.4 + (math.random() - 0.5) * BLEND then
|
|
biome = 1 -- taiga
|
|
else
|
|
biome = 2 -- forest / grassland
|
|
end
|
|
|
|
local n_fissure = nvals_fissure[nixyz]
|
|
local nofis = false
|
|
if math.abs(n_fissure) > TFIS and density < TVOID then
|
|
nofis = true
|
|
end
|
|
|
|
if y == y0 - 1 then -- overgeneration, initialise tables
|
|
under[si] = 0
|
|
if ungen then
|
|
if density >= 0 then
|
|
stable[si] = 2
|
|
else
|
|
stable[si] = 0
|
|
end
|
|
else
|
|
local nodename = minetest.get_node({x=x,y=y,z=z}).name
|
|
if nodename == "fracture:stone"
|
|
or nodename == "fracture:desertstone"
|
|
or nodename == "fracture:dirt"
|
|
or nodename == "fracture:grass"
|
|
or nodename == "fracture:dirtsnow"
|
|
or nodename == "default:snowblock"
|
|
or nodename == "default:desert_sand"
|
|
or nodename == "default:stone_with_diamond"
|
|
or nodename == "default:stone_with_mese"
|
|
or nodename == "default:stone_with_gold"
|
|
or nodename == "default:stone_with_copper"
|
|
or nodename == "default:stone_with_iron"
|
|
or nodename == "default:stone_with_coal" then
|
|
stable[si] = 2
|
|
else
|
|
stable[si] = 0
|
|
end
|
|
end
|
|
elseif y >= y0 and y <= y1 then -- stone, ores
|
|
if nofis and density >= TSTONE then
|
|
if biome == 3 then
|
|
data[vi] = c_destone
|
|
elseif math.random() < ORECHA then
|
|
local osel = math.random(24)
|
|
if osel == 24 then
|
|
data[vi] = c_stodiam
|
|
elseif osel == 23 then
|
|
data[vi] = c_stomese
|
|
elseif osel == 22 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_stone
|
|
end
|
|
stable[si] = stable[si] + 1
|
|
under[si] = 0
|
|
elseif density >= 0 and density < TSTONE and stable[si] >= 2 then -- fine materials
|
|
if biome == 3 then
|
|
data[vi] = c_desand
|
|
under[si] = 3
|
|
elseif biome == 1 then
|
|
data[vi] = c_dirt
|
|
under[si] = 1
|
|
else
|
|
data[vi] = c_dirt
|
|
under[si] = 2
|
|
end
|
|
elseif density < 0 and under[si] ~= 0 then -- air above surface node
|
|
if under[si] == 1 then
|
|
if math.random(PINCHA) == 2 and n_flora > TFOR then
|
|
fracture_snowypine(x, y, z, area, data)
|
|
else
|
|
data[viu] = c_dirtsnow
|
|
data[vi] = c_snowblock
|
|
end
|
|
elseif under[si] == 2 then
|
|
if math.random(APPCHA) == 2 and n_flora > TFOR then
|
|
fracture_appletree(x, y, z, area, data)
|
|
else
|
|
data[viu] = c_grass
|
|
end
|
|
elseif under[si] == 3 then
|
|
if math.random(CACCHA) == 2 and n_flora < TCAC then
|
|
fracture_cactus(x, y, z, area, data)
|
|
end
|
|
end
|
|
stable[si] = 0
|
|
under[si] = 0
|
|
elseif density < 0 and y == y1 - 1 and chuy ~= 1 -- clouds, not underground, not at y = 126
|
|
and chuy / 2 ~= math.floor(chuy / 2) then -- every odd chunk layer
|
|
local xrq = 16 * math.floor((x - x0) / 16)
|
|
local zrq = 16 * math.floor((z - z0) / 16)
|
|
local yrq = 79
|
|
local qixyz = zrq * 6400 + yrq * 80 + xrq + 1
|
|
if math.abs(nvals_flora[qixyz]) < 0.2
|
|
and nvals_cloud[qixyz] >= 0 then
|
|
data[vi] = c_cloud
|
|
end
|
|
stable[si] = 0
|
|
under[si] = 0
|
|
else -- air
|
|
stable[si] = 0
|
|
under[si] = 0
|
|
end
|
|
elseif y == y1 + 1 then -- overgeneration, detect surface, add surface nodes
|
|
if density < 0 and under[si] ~= 0 then
|
|
if under[si] == 1 then
|
|
data[viu] = c_dirtsnow
|
|
data[vi] = c_snowblock -- added in chunk above
|
|
elseif under[si] == 2 then
|
|
data[viu] = c_grass
|
|
end
|
|
end
|
|
end
|
|
nixyz = nixyz + 1
|
|
vi = vi + 1
|
|
viu = viu + 1
|
|
end
|
|
end
|
|
end
|
|
|
|
vm:set_data(data)
|
|
vm:set_lighting({day=0, night=0})
|
|
vm:calc_lighting()
|
|
vm:write_to_map(data)
|
|
local chugent = math.ceil((os.clock() - t1) * 1000)
|
|
print ("[fracture] "..chugent.." ms")
|
|
end) |