forked from Reload/techage_modpack
230 lines
7.2 KiB
Lua
230 lines
7.2 KiB
Lua
--[[
|
|
cldlib based on:
|
|
|
|
display_lib mod for Minetest - Library to add dynamic display
|
|
capabilities to nodes
|
|
(c) Pierre-Yves Rollo
|
|
|
|
This program is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation, either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
--]]
|
|
|
|
-- Miscelaneous values depending on wallmounted param2
|
|
local wallmounted_values = {
|
|
[0]={dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0}, -- Should never be used
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=1}, -- Should never be used
|
|
{dx=-1, dz=0, rx=0, rz=-1, yaw=-math.pi/2, rotate=5},
|
|
{dx=1, dz=0, rx=0, rz=1, yaw=math.pi/2, rotate=4},
|
|
{dx=0, dz=-1, rx=1, rz=0, yaw=0, rotate=2},
|
|
{dx=0, dz=1, rx=-1, rz=0, yaw=math.pi, rotate=3}
|
|
}
|
|
|
|
-- Miscelaneous values depending on facedir param2
|
|
local facedir_values = {
|
|
[0]={dx=0, dz=-1, rx=1, rz=0, yaw=0, rotate=1},
|
|
{dx=-1, dz=0, rx=0, rz=-1, yaw=-math.pi/2, rotate=2},
|
|
{dx=0, dz=1, rx=-1, rz=0, yaw=math.pi, rotate=3},
|
|
{dx=1, dz=0, rx=0, rz=1, yaw=math.pi/2, rotate=0},
|
|
-- Forbiden values :
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
{dx=0, dz=0, rx=0, rz=0, yaw=0, rotate=0},
|
|
}
|
|
|
|
-- dx/dy = depth vector, rx/ly = right vector, yaw = yaw of entity,
|
|
-- rotate = next facedir/wallmount on rotate
|
|
|
|
local function get_values(node)
|
|
local ndef = minetest.registered_nodes[node.name]
|
|
|
|
if ndef then
|
|
if ndef.paramtype2 == "wallmounted" then
|
|
return wallmounted_values[node.param2]
|
|
end
|
|
if ndef.paramtype2 == "facedir" then
|
|
return facedir_values[node.param2]
|
|
end
|
|
end
|
|
end
|
|
|
|
--- Gets the display entities attached with a node. Removes extra ones
|
|
local function get_entities(pos)
|
|
local objrefs = {}
|
|
local ndef = minetest.registered_nodes[minetest.get_node(pos).name]
|
|
if ndef and ndef.display_entities then
|
|
for _, objref in ipairs(minetest.get_objects_inside_radius(pos, 0.5)) do
|
|
local entity = objref:get_luaentity()
|
|
if entity and ndef.display_entities[entity.name] then
|
|
if objrefs[entity.name] then
|
|
objref:remove()
|
|
else
|
|
objrefs[entity.name] = objref
|
|
end
|
|
end
|
|
end
|
|
end
|
|
return objrefs
|
|
end
|
|
|
|
local function clip_pos_prop(posprop)
|
|
if posprop then
|
|
return math.max(-0.5, math.min(0.5, posprop))
|
|
else
|
|
return 0
|
|
end
|
|
end
|
|
|
|
--- (Create and) place display entities according to the node orientation
|
|
local function place_entities(pos)
|
|
local node = minetest.get_node(pos)
|
|
local ndef = minetest.registered_nodes[node.name]
|
|
local values = get_values(node)
|
|
local objrefs = get_entities(pos)
|
|
|
|
if values and ndef and ndef.display_entities then
|
|
|
|
for entity_name, props in pairs(ndef.display_entities) do
|
|
local depth = clip_pos_prop(props.depth)
|
|
local height = clip_pos_prop(props.height)
|
|
local right = clip_pos_prop(props.right)
|
|
if not objrefs[entity_name] then
|
|
objrefs[entity_name] = minetest.add_entity(pos, entity_name)
|
|
end
|
|
|
|
objrefs[entity_name]:set_pos({
|
|
x = pos.x - values.dx * depth + values.rx * right,
|
|
y = pos.y + height,
|
|
z = pos.z - values.dz * depth + values.rz * right})
|
|
|
|
objrefs[entity_name]:set_yaw(values.yaw)
|
|
end
|
|
end
|
|
return objrefs
|
|
end
|
|
|
|
--- Call on_display_update callback of a node for one of its display entities
|
|
local function call_node_on_display_update(pos, objref)
|
|
local ndef = minetest.registered_nodes[minetest.get_node(pos).name]
|
|
local entity = objref:get_luaentity()
|
|
if ndef and ndef.display_entities and entity and ndef.display_entities[entity.name] then
|
|
ndef.display_entities[entity.name].on_display_update(pos, objref)
|
|
end
|
|
end
|
|
|
|
--- Force entity update
|
|
function lcdlib.update_entities(pos)
|
|
local objrefs = place_entities(pos)
|
|
for _, objref in pairs(objrefs) do
|
|
call_node_on_display_update(pos, objref)
|
|
end
|
|
end
|
|
|
|
--- On_activate callback for lcdlib entities. Calls on_display_update callbacks
|
|
--- of corresponding node for each entity.
|
|
function lcdlib.on_activate(entity, staticdata)
|
|
if entity then
|
|
entity.object:set_armor_groups({immortal=1})
|
|
call_node_on_display_update(entity.object:get_pos(), entity.object)
|
|
end
|
|
end
|
|
|
|
--- On_place callback for lcdlib items. Does nothing more than preventing item
|
|
--- from being placed on ceiling or ground
|
|
function lcdlib.on_place(itemstack, placer, pointed_thing)
|
|
local ndef = itemstack:get_definition()
|
|
local above = pointed_thing.above
|
|
local under = pointed_thing.under
|
|
local dir = {x = under.x - above.x,
|
|
y = under.y - above.y,
|
|
z = under.z - above.z}
|
|
|
|
if ndef then
|
|
if ndef.paramtype2 == "wallmounted" then
|
|
|
|
local wdir = minetest.dir_to_wallmounted(dir)
|
|
|
|
if wdir == 0 or wdir == 1 then
|
|
dir = placer:get_look_dir()
|
|
dir.y = 0
|
|
wdir = minetest.dir_to_wallmounted(dir)
|
|
end
|
|
|
|
return minetest.item_place(itemstack, placer, pointed_thing, wdir)
|
|
else
|
|
return minetest.item_place(itemstack, placer, pointed_thing, minetest.dir_to_facedir(dir))
|
|
end
|
|
end
|
|
|
|
end
|
|
|
|
--- On_construct callback for lcdlib items. Creates entities and update them.
|
|
function lcdlib.on_construct(pos)
|
|
lcdlib.update_entities(pos)
|
|
end
|
|
|
|
--- On_destruct callback for lcdlib items. Removes entities.
|
|
function lcdlib.on_destruct(pos)
|
|
local objrefs = get_entities(pos)
|
|
|
|
for _, objref in pairs(objrefs) do
|
|
objref:remove()
|
|
end
|
|
end
|
|
|
|
-- On_rotate (screwdriver) callback for lcdlib items. Prevents axis rotation and reorients entities.
|
|
function lcdlib.on_rotate(pos, node, user, mode, new_param2)
|
|
if mode ~= 1 then return false end
|
|
|
|
local values = get_values(node)
|
|
|
|
if values then
|
|
minetest.swap_node(pos, {name = node.name, param1 = node.param1, param2 = values.rotate})
|
|
place_entities(pos)
|
|
return true
|
|
else
|
|
return false
|
|
end
|
|
end
|
|
|
|
--- Creates display entity with some fields and the on_activate callback
|
|
function lcdlib.register_display_entity(entity_name)
|
|
if not minetest.registered_entity then
|
|
minetest.register_entity(':'..entity_name, {
|
|
collisionbox = { 0, 0, 0, 0, 0, 0 },
|
|
visual = "upright_sprite",
|
|
textures = {},
|
|
on_activate = lcdlib.on_activate,
|
|
})
|
|
end
|
|
end
|
|
|
|
|
|
|