Add red desert temples

This commit is contained in:
kay27 2022-01-15 08:04:43 +04:00
parent 096b384676
commit e2928c4afc
2 changed files with 83 additions and 9 deletions

View File

@ -15,6 +15,8 @@ local minetest_get_item_group = minetest.get_item_group
local perlin_structures
local schematic_path = minetest.get_modpath('mcl_structures')
local function determine_ground_level(p, vm_context)
local maxp = vm_context.maxp
local maxp_y = maxp.y
@ -123,6 +125,62 @@ mcl_structures.register_structure({
mcl_structures.call_struct(temple_pos, "desert_temple", nil, PseudoRandom(vm_context.chunkseed))
end,
})
local red_temple_schematic_file = schematic_path .. "/schematics/mcl_structures_desert_temple.mts"
local red_temple_schematic_lua = minetest.serialize_schematic(red_temple_schematic_file, "lua", {lua_use_comments = false, lua_num_indent_spaces = 0}) .. " return schematic"
red_temple_schematic_lua = red_temple_schematic_lua:gsub("mcl_colorblocks:hardened_clay_orange", "mcl_colorblocks:hardened_clay_red")
red_temple_schematic_lua = red_temple_schematic_lua:gsub("mcl_core:sand_stone", "mcl_colorblocks:hardened_clay_orange")
red_temple_schematic_lua = red_temple_schematic_lua:gsub("mcl_core:redsand", "mcl_core:granit")
red_temple_schematic_lua = red_temple_schematic_lua:gsub("mcl_core:sand", "mcl_core:redsand")
red_temple_schematic_lua = red_temple_schematic_lua:gsub("mcl_stairs:stair_sandstone", "mcl_stairs:stair_redsandstone")
red_temple_schematic_lua = red_temple_schematic_lua:gsub("mcl_stairs:slab_sandstone", "mcl_stairs:slab_redsandstone")
red_temple_schematic_lua = red_temple_schematic_lua:gsub("mcl_colorblocks:hardened_clay_yellow", "mcl_colorblocks:hardened_clay_pink")
local red_temple_schematic = loadstring(red_temple_schematic_lua)()
mcl_structures.register_structure({
name = "red_desert_temple",
decoration = {
deco_type = "simple",
place_on = {"mcl_core:redsand", "mcl_colorblocks:hardened_clay_orange"},
flags = "all_floors",
fill_ratio = 0.001,
y_min = 3,
y_max = mcl_mapgen.overworld.max,
height = 1,
biomes = {
"ColdTaiga_beach",
"ColdTaiga_beach_water",
"Desert",
"Desert_ocean",
"ExtremeHills_beach",
"FlowerForest_beach",
"Forest_beach",
"MesaBryce_sandlevel",
"MesaPlateauF_sandlevel",
"MesaPlateauFM_sandlevel",
"Savanna",
"Savanna_beach",
"StoneBeach",
"StoneBeach_ocean",
"Taiga_beach",
},
},
on_generated = function(minp, maxp, seed, vm_context, pos_list)
local y = 0
local temple_pos
for _, pos in pairs(pos_list) do
if pos.y > y then
temple_pos = pos
y = pos.y
end
end
minetest.chat_send_all('here2: ' .. minetest.pos_to_string(temple_pos))
if not temple_pos then return end
-- if pr:next(1,12000) ~= 1 then return end
minetest.swap_node(temple_pos, {name="air"})
temple_pos.y = temple_pos.y - 12
mcl_structures.place_schematic({pos = temple_pos, schematic = red_temple_schematic, pr = PseudoRandom(vm_context.chunkseed)})
end,
})
local octaves = 3
local persistence = 0.6

View File

@ -17,7 +17,6 @@ local chunk_callbacks = {}
function process_mapgen_block_lvm(vm_context)
local nodes = minetest.find_nodes_in_area(vm_context.minp, vm_context.maxp, {"group:struct"}, true)
-- if #nodes == 0 then return end
for node_name, pos_list in pairs(nodes) do
local lvm_callback = lvm_callbacks[node_name]
if lvm_callback then
@ -29,13 +28,20 @@ end
function process_mapgen_chunk(minp, maxp, seed, vm_context)
local nodes = minetest.find_nodes_in_area(minp, maxp, {"group:struct"}, true)
minetest.log("warning", "found " .. tostring(#nodes))
-- if #nodes == 0 then return end
for node_name, pos_list in pairs(nodes) do
local chunk_callback = chunk_callbacks[node_name]
if chunk_callback then
chunk_callback(minp, maxp, seed, vm_context, pos_list)
end
end
for node_name, pos_list in pairs(nodes) do
for _, pos in pairs(pos_list) do
local node = minetest.get_node(pos)
if string.sub(node.name, 1, 15) == 'mcl_structures:' then
minetest.swap_node(pos, {name = 'air'})
end
end
end
end
--------------------------------------------------------------------------------------
@ -106,7 +112,6 @@ function mcl_structures.register_structure(def)
end
end
if on_generated then
minetest.log("warning", "GERISTERED!!!")
chunk_callbacks[name] = on_generated
if not use_process_mapgen_chunk then
use_process_mapgen_chunk = true
@ -137,10 +142,12 @@ local function ecb_place(blockpos, action, calls_remaining, param)
end
function mcl_structures.place_schematic(def)
local pos = def.pos
local schematic = def.schematic
local rotation = def.rotation
local pr = def.pr
local pos = def.pos
local schematic = def.schematic
local rotation = def.rotation
local pr = def.pr
local on_schematic_loaded = def.on_schematic_loaded
local emerge = def.emerge
if not pos then
minetest.log('warning', '[mcl_structures] No pos. specified to place schematic')
return
@ -156,7 +163,8 @@ function mcl_structures.place_schematic(def)
rotation = rotations[math.random(1,#rotations)]
end
end
if not def.emerge then
if not emerge and not on_schematic_loaded then
minetest.place_schematic(pos, schematic, rotation, def.replacements, def.force_placement, def.flags)
if not def.after_place then
return
@ -165,7 +173,11 @@ function mcl_structures.place_schematic(def)
return
end
local loaded_schematic = loadstring(minetest.serialize_schematic(schematic, "lua", {lua_use_comments = false, lua_num_indent_spaces = 0}) .. " return schematic")()
local serialized_schematic = minetest.serialize_schematic(schematic, "lua", {lua_use_comments = false, lua_num_indent_spaces = 0}) .. " return schematic"
if on_schematic_loaded then
serialized_schematic = on_schematic_loaded(serialized_schematic)
end
local loaded_schematic = loadstring(serialized_schematic)()
if not loaded_schematic then
minetest.log('warning', '[mcl_structures] Schematic ' .. schematic .. ' load serialized string problem at ' .. minetest.pos_to_string(pos))
return
@ -196,6 +208,10 @@ function mcl_structures.place_schematic(def)
pr = pr,
param = param,
}
if not emerge then
ecb_place(p1, nil, 0, ecb_param)
return
end
minetest.emerge_area(p1, p2, ecb_place, ecb_param)
end