436 lines
10 KiB
Lua
436 lines
10 KiB
Lua
-- Minetest 0.4 Mod: Nether
|
|
|
|
local NETHER_DEPTH = -2000
|
|
local NETHER_AMBIENT = 6
|
|
local nether_created = false
|
|
|
|
-- Craftitems
|
|
|
|
minetest.register_craftitem(":default:mese_crystal_fragment", {
|
|
description = "Mese Crystal Fragment",
|
|
inventory_image = "default_mese_crystal_fragment.png",
|
|
on_place = function(stack, _, pt)
|
|
if pt.under and minetest.get_node(pt.under).name == "default:obsidian" then
|
|
local done = make_portal(pt.under)
|
|
if done and not minetest.setting_getbool("creative_mode") then
|
|
stack:take_item()
|
|
end
|
|
end
|
|
|
|
return stack
|
|
end,
|
|
})
|
|
|
|
|
|
minetest.register_craftitem(":fire:flint_and_steel", {
|
|
description = "Flint -n- Steel",
|
|
inventory_image = "fire_flint_steel.png",
|
|
on_place = function(stack,_, pt)
|
|
if pt.under and minetest.get_node(pt.under).name == "default:obsidian" then
|
|
local done = make_portal(pt.under)
|
|
if done and not minetest.setting_getbool("creative_mode") then
|
|
stack:take_item()
|
|
end
|
|
end
|
|
return stack
|
|
end,
|
|
|
|
on_use = function(itemstack, user, pointed_thing)
|
|
local player_name = user:get_player_name()
|
|
local pt = pointed_thing
|
|
|
|
if pt.type == "node" and minetest.get_node(pt.above).name == "air" then
|
|
itemstack:add_wear(1000)
|
|
local node_under = minetest.get_node(pt.under).name
|
|
|
|
if minetest.get_item_group(node_under, "flammable") >= 0 then
|
|
if not minetest.is_protected(pt.above, player_name) then
|
|
--minetest.set_node(pt.above, {name = "fire:basic_flame"})
|
|
minetest.set_node(pt.above, {name = "fire:permanent_flame"})
|
|
else
|
|
minetest.chat_send_player(player_name, "This area is protected")
|
|
end
|
|
end
|
|
end
|
|
|
|
if not minetest.setting_getbool("creative_mode") then
|
|
return itemstack
|
|
end
|
|
end
|
|
})
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
minetest.register_node("nether:portal", {
|
|
description = "Nether Portal",
|
|
tiles = {
|
|
"nether_transparent.png",
|
|
"nether_transparent.png",
|
|
"nether_transparent.png",
|
|
"nether_transparent.png",
|
|
{
|
|
name = "nether_portal.png",
|
|
animation = {
|
|
type = "vertical_frames",
|
|
aspect_w = 32,
|
|
aspect_h = 32,
|
|
length = 2,
|
|
},
|
|
},
|
|
{
|
|
name = "nether_portal.png",
|
|
animation = {
|
|
type = "vertical_frames",
|
|
aspect_w = 32,
|
|
aspect_h = 32,
|
|
length = 2,
|
|
},
|
|
},
|
|
},
|
|
drawtype = "nodebox",
|
|
paramtype = "light",
|
|
paramtype2 = "facedir",
|
|
sunlight_propagates = true,
|
|
use_texture_alpha = true,
|
|
walkable = false,
|
|
digable = false,
|
|
pointable = false,
|
|
buildable_to = false,
|
|
drop = "",
|
|
light_source = 11,
|
|
post_effect_color = {a=180, r=145, g=50, b=230},
|
|
alpha = 192,
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
{-0.5, -0.5, -0.1, 0.5, 0.5, 0.1},
|
|
},
|
|
},
|
|
groups = {not_in_creative_inventory=1}
|
|
})
|
|
|
|
|
|
local function build_portal(pos, target)
|
|
local p = {x=pos.x-1, y=pos.y-1, z=pos.z}
|
|
local p1 = {x=pos.x-1, y=pos.y-1, z=pos.z}
|
|
local p2 = {x=p1.x+3, y=p1.y+4, z=p1.z}
|
|
local emin = {x=pos.x-100, y=pos.y-100, z=pos.z-100}
|
|
local emax = {x=p1.x+100, y=p1.y+100, z=p1.z+100}
|
|
local perlin1 = minetest.get_perlin(11,3, 0.5, 100)
|
|
local perlin2 = minetest.get_perlin(23,3, 0.5, 50)
|
|
local perlin3 = minetest.get_perlin(17,3, 0.5, 100)
|
|
local vm = minetest.get_voxel_manip()
|
|
local gmin
|
|
local gmax
|
|
|
|
gmin, gmax = vm:read_from_map(emin, emax)
|
|
|
|
local data = vm:get_data()
|
|
local area = VoxelArea:new{MinEdge=gmin, MaxEdge=gmax}
|
|
local c_air = minetest.get_content_id("air")
|
|
local c_fire = minetest.get_content_id("nether:permanent_flame")
|
|
local c_lava = minetest.get_content_id("lava_source")
|
|
local c_netherrack = minetest.get_content_id("nether:rack")
|
|
|
|
--insert cavegen here
|
|
|
|
|
|
|
|
|
|
for i=1,4 do
|
|
minetest.set_node(p, {name="default:obsidian"})
|
|
p.y = p.y+1
|
|
end
|
|
for i=1,3 do
|
|
minetest.set_node(p, {name="default:obsidian"})
|
|
p.x = p.x+1
|
|
end
|
|
for i=1,4 do
|
|
minetest.set_node(p, {name="default:obsidian"})
|
|
p.y = p.y-1
|
|
end
|
|
for i=1,3 do
|
|
minetest.set_node(p, {name="default:obsidian"})
|
|
p.x = p.x-1
|
|
end
|
|
for x=p1.x,p2.x do
|
|
for y=p1.y,p2.y do
|
|
p = {x=x, y=y, z=p1.z}
|
|
if not (x == p1.x or x == p2.x or y==p1.y or y==p2.y) then
|
|
minetest.set_node(p, {name="nether:portal", param2=0})
|
|
end
|
|
local meta = minetest.get_meta(p)
|
|
meta:set_string("p1", minetest.pos_to_string(p1))
|
|
meta:set_string("p2", minetest.pos_to_string(p2))
|
|
meta:set_string("target", minetest.pos_to_string(target))
|
|
|
|
end
|
|
end
|
|
nether_created = true
|
|
end
|
|
|
|
|
|
--begin to make broken
|
|
|
|
minetest.register_abm({
|
|
nodenames = {"nether:portal"},
|
|
--interval = 1,
|
|
interval = 7,
|
|
--chance = 2,
|
|
chance = 2,
|
|
action = function(pos, node)
|
|
minetest.add_particlespawner(
|
|
32, --amount
|
|
4, --time
|
|
{x=pos.x-0.25, y=pos.y-0.25, z=pos.z-0.25}, --minpos
|
|
{x=pos.x+0.25, y=pos.y+0.25, z=pos.z+0.25}, --maxpos
|
|
{x=-0.8, y=-0.8, z=-0.8}, --minvel
|
|
{x=0.8, y=0.8, z=0.8}, --maxvel
|
|
{x=0,y=0,z=0}, --minacc
|
|
{x=0,y=0,z=0}, --maxacc
|
|
0.5, --minexptime
|
|
1, --maxexptime
|
|
1, --minsize
|
|
2, --maxsize
|
|
false, --collisiondetection
|
|
"nether_particle.png" --texture
|
|
)
|
|
--for _,obj in ipairs(minetest.get_objects_inside_radius(pos, 1)) do
|
|
for _,obj in ipairs(minetest.get_objects_inside_radius(pos,1)) do
|
|
local lua_entity = obj:get_luaentity()
|
|
--if not obj:is_player() or lua_entity or lua_entity.itemstring ~= "" then
|
|
--local detected_obj = lua_entity.name or ""
|
|
if obj:is_player() or lua_entity then
|
|
local meta = minetest.get_meta(pos)
|
|
local target = minetest.string_to_pos(meta:get_string("target"))
|
|
if target then
|
|
minetest.after(3, function(obj, pos, target)
|
|
local objpos = obj:getpos() if objpos == nil then return end
|
|
objpos.y = objpos.y+0.5 -- Fix some glitches at -8000
|
|
if minetest.get_node(objpos).name ~= "nether:portal" then
|
|
return
|
|
end
|
|
obj:setpos(target)
|
|
minetest.sound_play("tng_transporter1", {pos=target,gain=0.5,max_hear_distance = 8,})
|
|
|
|
local function check_and_build_portal(pos, target)
|
|
local n = minetest.get_node_or_nil(target)
|
|
if n and n.name ~= "nether:portal" then
|
|
build_portal(target, pos)
|
|
minetest.after(1, check_and_build_portal, pos, target)
|
|
minetest.after(4, check_and_build_portal, pos, target)
|
|
elseif not n then
|
|
minetest.after(1, check_and_build_portal, pos, target)
|
|
end
|
|
end
|
|
|
|
minetest.after(1, check_and_build_portal, pos, target)
|
|
|
|
end, obj, pos, target)
|
|
end
|
|
--end
|
|
end
|
|
end
|
|
end,
|
|
})
|
|
--end make broken
|
|
|
|
|
|
local function move_check(p1, max, dir)
|
|
local p = {x=p1.x, y=p1.y, z=p1.z}
|
|
local d = math.abs(max-p1[dir]) / (max-p1[dir])
|
|
p[dir] = p[dir] + d
|
|
while p[dir] ~= max - d do
|
|
p[dir] = p[dir] + d
|
|
if minetest.get_node(p).name ~= "default:obsidian" then
|
|
return false
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
|
|
local function check_portal(p1, p2)
|
|
if p1.x ~= p2.x then
|
|
if not move_check(p1, p2.x, "x") then
|
|
return false
|
|
end
|
|
if not move_check(p2, p1.x, "x") then
|
|
return false
|
|
end
|
|
elseif p1.z ~= p2.z then
|
|
if not move_check(p1, p2.z, "z") then
|
|
return false
|
|
end
|
|
if not move_check(p2, p1.z, "z") then
|
|
return false
|
|
end
|
|
else
|
|
return false
|
|
end
|
|
|
|
if not move_check(p1, p2.y, "y") then
|
|
return false
|
|
end
|
|
if not move_check(p2, p1.y, "y") then
|
|
return false
|
|
end
|
|
|
|
return true
|
|
end
|
|
|
|
local function is_portal(pos)
|
|
for d=-3,3 do
|
|
for y=-4,4 do
|
|
local px = {x=pos.x+d, y=pos.y+y, z=pos.z}
|
|
local pz = {x=pos.x, y=pos.y+y, z=pos.z+d}
|
|
if check_portal(px, {x=px.x+3, y=px.y+4, z=px.z}) then
|
|
return px, {x=px.x+3, y=px.y+4, z=px.z}
|
|
end
|
|
if check_portal(pz, {x=pz.x, y=pz.y+4, z=pz.z+3}) then
|
|
return pz, {x=pz.x, y=pz.y+4, z=pz.z+3}
|
|
end
|
|
end
|
|
end
|
|
end
|
|
--[[]]
|
|
--local function make_portal(pos)
|
|
function make_portal(pos)
|
|
local p1, p2 = is_portal(pos)
|
|
if not p1 or not p2 then
|
|
return false
|
|
end
|
|
|
|
for d=1,2 do
|
|
for y=p1.y+1,p2.y-1 do
|
|
local p
|
|
if p1.z == p2.z then
|
|
p = {x=p1.x+d, y=y, z=p1.z}
|
|
else
|
|
p = {x=p1.x, y=y, z=p1.z+d}
|
|
end
|
|
if minetest.get_node(p).name ~= "air" then
|
|
return false
|
|
end
|
|
end
|
|
end
|
|
|
|
local param2
|
|
if p1.z == p2.z then param2 = 0 else param2 = 1 end
|
|
|
|
local target = {x=p1.x, y=p1.y, z=p1.z}
|
|
target.x = target.x + 1
|
|
if target.y < NETHER_DEPTH then
|
|
--target.y = math.random(-230, -240) --this makes return portal
|
|
target.y = math.random(8, 32) --this makes return portal
|
|
else
|
|
target.y = NETHER_DEPTH - 1000
|
|
end
|
|
|
|
for d=0,3 do
|
|
for y=p1.y,p2.y do
|
|
local p = {}
|
|
if param2 == 0 then p = {x=p1.x+d, y=y, z=p1.z} else p = {x=p1.x, y=y, z=p1.z+d} end
|
|
if minetest.get_node(p).name == "air" then
|
|
minetest.set_node(p, {name="nether:portal", param2=param2})
|
|
end
|
|
local meta = minetest.get_meta(p)
|
|
meta:set_string("p1", minetest.pos_to_string(p1))
|
|
meta:set_string("p2", minetest.pos_to_string(p2))
|
|
meta:set_string("target", minetest.pos_to_string(target))
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
--[[]]
|
|
minetest.register_node(":default:obsidian", {
|
|
description = "Obsidian",
|
|
tiles = {"default_obsidian.png"},
|
|
is_ground_content = true,
|
|
sounds = default.node_sound_stone_defaults(),
|
|
groups = {cracky=1,level=2},
|
|
|
|
on_destruct = function(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
local p1 = minetest.string_to_pos(meta:get_string("p1"))
|
|
local p2 = minetest.string_to_pos(meta:get_string("p2"))
|
|
local target = minetest.string_to_pos(meta:get_string("target"))
|
|
if not p1 or not p2 then
|
|
return
|
|
end
|
|
for x=p1.x,p2.x do
|
|
for y=p1.y,p2.y do
|
|
for z=p1.z,p2.z do
|
|
local nn = minetest.get_node({x=x,y=y,z=z}).name
|
|
if nn == "default:obsidian" or nn == "nether:portal" then
|
|
if nn == "nether:portal" then
|
|
minetest.remove_node({x=x,y=y,z=z})
|
|
end
|
|
local m = minetest.get_meta({x=x,y=y,z=z})
|
|
m:set_string("p1", "")
|
|
m:set_string("p2", "")
|
|
m:set_string("target", "")
|
|
end
|
|
end
|
|
end
|
|
end
|
|
meta = minetest.get_meta(target)
|
|
if not meta then
|
|
return
|
|
end
|
|
p1 = minetest.string_to_pos(meta:get_string("p1"))
|
|
p2 = minetest.string_to_pos(meta:get_string("p2"))
|
|
if not p1 or not p2 then
|
|
return
|
|
end
|
|
for x=p1.x,p2.x do
|
|
for y=p1.y,p2.y do
|
|
for z=p1.z,p2.z do
|
|
local nn = minetest.get_node({x=x,y=y,z=z}).name
|
|
if nn == "default:obsidian" or nn == "nether:portal" then
|
|
if nn == "nether:portal" then
|
|
minetest.remove_node({x=x,y=y,z=z})
|
|
end
|
|
local m = minetest.get_meta({x=x,y=y,z=z})
|
|
m:set_string("p1", "")
|
|
m:set_string("p2", "")
|
|
m:set_string("target", "")
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end,
|
|
})
|
|
|
|
|
|
|
|
|
|
--paramats cavegen
|
|
--hacked by maikerumine
|
|
|
|
|
|
--params
|
|
local TCAVE = 0.6
|
|
local BLEND = 128
|
|
|
|
-- 3D noise
|
|
|
|
local np_cave = {
|
|
offset = 0,
|
|
scale = 1,
|
|
spread = {x = 384, y = 128, z = 384}, -- squashed 3:1
|
|
seed = 59033,
|
|
octaves = 5,
|
|
persist = 0.7
|
|
}
|
|
|
|
|
|
-- Stuff
|
|
|
|
local yblmax = NETHER_DEPTH - BLEND * 2
|
|
|
|
|