From 3eefa2f18134ab59139f73f4bbf918024c494d7f Mon Sep 17 00:00:00 2001
From: Novatux <nathanael.courant@laposte.net>
Date: Sun, 22 Feb 2015 12:42:46 +0100
Subject: [PATCH] Add sulfur and lead, and make them generate
---
technic_worldgen/oregen.lua | 85 ++++++++++++++++++++++++++++++++++++++++++
1 files changed, 85 insertions(+), 0 deletions(-)
diff --git a/technic_worldgen/oregen.lua b/technic_worldgen/oregen.lua
index ec9386d..4aca7f1 100644
--- a/technic_worldgen/oregen.lua
+++ b/technic_worldgen/oregen.lua
@@ -7,6 +7,9 @@
local zinc_params = {offset = 0, scale = 1, spread = {x = 100, y = 100, z = 100}, seed = 422, octaves = 3, persist = 0.7}
local zinc_threshhold = 0.5
+local lead_params = {offset = 0, scale = 1, spread = {x = 100, y = 100, z = 100}, seed = 423, octaves = 3, persist = 0.7}
+local lead_threshhold = 0.3
+
minetest.register_ore({
ore_type = "scatter",
ore = "technic:mineral_uranium",
@@ -74,6 +77,88 @@
noise_threshhold = zinc_threshhold,
})
+minetest.register_ore({
+ ore_type = "scatter",
+ ore = "technic:mineral_lead",
+ wherein = "default:stone",
+ clust_scarcity = 9*9*9,
+ clust_num_ores = 5,
+ clust_size = 3,
+ height_min = -16,
+ height_max = 16,
+ noise_params = lead_params,
+ noise_threshhold = lead_threshhold,
+})
+
+minetest.register_ore({
+ ore_type = "scatter",
+ ore = "technic:mineral_lead",
+ wherein = "default:stone",
+ clust_scarcity = 8*8*8,
+ clust_num_ores = 5,
+ clust_size = 3,
+ height_min = -128,
+ height_max = -16,
+ noise_params = lead_params,
+ noise_threshhold = lead_threshhold,
+})
+
+minetest.register_ore({
+ ore_type = "scatter",
+ ore = "technic:mineral_lead",
+ wherein = "default:stone",
+ clust_scarcity = 6*6*6,
+ clust_num_ores = 5,
+ clust_size = 3,
+ height_min = -31000,
+ height_max = -128,
+ flags = "absheight",
+ noise_params = lead_params,
+ noise_threshhold = lead_threshhold,
+})
+
+-- Sulfur
+minetest.register_on_generated(function(minp, maxp, seed)
+ local vm, emin, emax = minetest.get_mapgen_object("voxelmanip")
+ local a = VoxelArea:new{
+ MinEdge = {x = emin.x, y = emin.y, z = emin.z},
+ MaxEdge = {x = emax.x, y = emax.y, z = emax.z},
+ }
+ local data = vm:get_data()
+ local pr = PseudoRandom(17 * minp.x + 42 * minp.y + 101 * minp.z)
+ local noise = minetest.get_perlin(9876, 3, 0.5, 100)
+
+ local c_lava = minetest.get_content_id("default:lava_source")
+ local c_lava_flowing = minetest.get_content_id("default:lava_flowing")
+ local c_stone = minetest.get_content_id("default:stone")
+ local c_sulfur = minetest.get_content_id("technic:mineral_sulfur")
+
+ local grid_size = 5
+ for x = minp.x + math.floor(grid_size / 2), maxp.x, grid_size do
+ for y = minp.y + math.floor(grid_size / 2), maxp.y, grid_size do
+ for z = minp.z + math.floor(grid_size / 2), maxp.z, grid_size do
+ local c = data[a:index(x, y, z)]
+ if (c == c_lava or c == c_lava_flowing) and noise:get3d({x = x, y = z, z = z}) >= 0.4 then
+ for xx = math.max(minp.x, x - grid_size), math.min(maxp.x, x + grid_size) do
+ for yy = math.max(minp.y, y - grid_size), math.min(maxp.y, y + grid_size) do
+ for zz = math.max(minp.z, z - grid_size), math.min(maxp.z, z + grid_size) do
+ local i = a:index(xx, yy, zz)
+ if data[i] == c_stone and pr:next(1, 10) <= 7 then
+ data[i] = c_sulfur
+ end
+ end
+ end
+ end
+ end
+ end
+ end
+ end
+
+ vm:set_data(data)
+ vm:write_to_map(data)
+end)
+
+
if technic.config:get_bool("enable_marble_generation") then
minetest.register_ore({
ore_type = "sheet",
--
Gitblit v1.8.0