Use minetest.register_ore() in minimal

This commit is contained in:
PilzAdam 2013-03-24 21:20:36 +01:00
parent 0e07a7157f
commit 650d706d35

@ -27,64 +27,74 @@ minetest.register_alias("mapgen_mese", "default:mese")
-- Ore generation -- Ore generation
-- --
local function generate_ore(name, wherein, minp, maxp, seed, chunks_per_volume, ore_per_chunk, height_min, height_max, param2) minetest.register_ore({
if maxp.y < height_min or minp.y > height_max then ore_type = "scatter",
return ore = "default:stone_with_coal",
end wherein = "default:stone",
local y_min = math.max(minp.y, height_min) clust_scarcity = 8*8*8,
local y_max = math.min(maxp.y, height_max) clust_num_ores = 5,
local volume = (maxp.x-minp.x+1)*(y_max-y_min+1)*(maxp.z-minp.z+1) clust_size = 3,
local pr = PseudoRandom(seed) height_min = -31000,
local num_chunks = math.floor(chunks_per_volume * volume) height_max = 64,
local chunk_size = 3 })
if ore_per_chunk <= 4 then
chunk_size = 2 minetest.register_ore({
end ore_type = "scatter",
local inverse_chance = math.floor(chunk_size*chunk_size*chunk_size / ore_per_chunk) ore = "default:stone_with_iron",
--print("generate_ore num_chunks: "..dump(num_chunks)) wherein = "default:stone",
for i=1,num_chunks do clust_scarcity = 16*16*16,
local y0 = pr:next(y_min, y_max-chunk_size+1) clust_num_ores = 5,
if y0 >= height_min and y0 <= height_max then clust_size = 3,
local x0 = pr:next(minp.x, maxp.x-chunk_size+1) height_min = -5,
local z0 = pr:next(minp.z, maxp.z-chunk_size+1) height_max = 7,
local p0 = {x=x0, y=y0, z=z0} })
for x1=0,chunk_size-1 do
for y1=0,chunk_size-1 do minetest.register_ore({
for z1=0,chunk_size-1 do ore_type = "scatter",
if pr:next(1,inverse_chance) == 1 then ore = "default:stone_with_iron",
local x2 = x0+x1 wherein = "default:stone",
local y2 = y0+y1 clust_scarcity = 12*12*12,
local z2 = z0+z1 clust_num_ores = 5,
local p2 = {x=x2, y=y2, z=z2} clust_size = 3,
if minetest.env:get_node(p2).name == wherein then height_min = -16,
minetest.env:set_node(p2, {name=name, param2=param2}) height_max = -5,
end })
end
end minetest.register_ore({
end ore_type = "scatter",
end ore = "default:stone_with_iron",
end wherein = "default:stone",
end clust_scarcity = 9*9*9,
--print("generate_ore done") clust_num_ores = 5,
end clust_size = 3,
height_min = -31000,
height_max = -17,
})
-- for float islands and far scaled
minetest.register_ore({
ore_type = "scatter",
ore = "default:stone_with_coal",
wherein = "default:stone",
clust_scarcity = 8*8*8,
clust_num_ores = 5,
clust_size = 3,
height_min = 200,
height_max = 31000,
})
minetest.register_ore({
ore_type = "scatter",
ore = "default:stone_with_iron",
wherein = "default:stone",
clust_scarcity = 9*9*9,
clust_num_ores = 5,
clust_size = 3,
height_min = 200,
height_max = 31000,
})
minetest.register_on_generated(function(minp, maxp, seed) minetest.register_on_generated(function(minp, maxp, seed)
generate_ore("default:stone_with_coal", "default:stone", minp, maxp, seed, 1/8/8/8, 5, -31000, 64 )
generate_ore("default:stone_with_iron", "default:stone", minp, maxp, seed+1, 1/16/16/16, 5, -5, 7 )
generate_ore("default:stone_with_iron", "default:stone", minp, maxp, seed+2, 1/12/12/12, 5, -16, -5 )
generate_ore("default:stone_with_iron", "default:stone", minp, maxp, seed+3, 1/9/9/9, 5, -31000, -17 )
generate_ore("default:stone_with_coal", "default:stone", minp, maxp, seed+4, 1/8/8/8, 5, 200, 31000 ) -- for float islands and far scaled mountains
generate_ore("default:stone_with_iron", "default:stone", minp, maxp, seed+5, 1/9/9/9, 5, 200, 31000 )
if minetest.setting_getbool("underground_springs") then
generate_ore("default:water_source", "default:stone", minp, maxp, seed+4, 1/24/24/24, 12, -100, -11, 128)
generate_ore("default:water_source", "default:stone", minp, maxp, seed+5, 1/28/28/28, 8, -10000, -101, 128)
generate_ore("default:lava_source", "default:stone", minp, maxp, seed+6, 1/38/38/38, 6, -500, -101, 128)
generate_ore("default:lava_source", "default:stone", minp, maxp, seed+7, 1/30/30/30, 16, -5000, -501, 128)
generate_ore("default:lava_source", "default:stone", minp, maxp, seed+8, 1/24/24/24, 20, -31000, -5001, 128)
end
-- Generate clay -- Generate clay
if maxp.y >= 2 and minp.y <= 0 then if maxp.y >= 2 and minp.y <= 0 then
-- Assume X and Z lengths are equal -- Assume X and Z lengths are equal