47 lines
1.5 KiB
Lua
47 lines
1.5 KiB
Lua
-- LUALOCALS < ---------------------------------------------------------
|
|
local math, minetest, nodecore, pairs, type, vector
|
|
= math, minetest, nodecore, pairs, type, vector
|
|
local math_pi
|
|
= math.pi
|
|
-- LUALOCALS > ---------------------------------------------------------
|
|
|
|
local function playercheck(player, pos, maxdist, check)
|
|
local ppos = player:get_pos()
|
|
ppos.y = ppos.y + player:get_properties().eye_height
|
|
|
|
if vector.distance(pos, ppos) > maxdist then return end
|
|
|
|
local look = player:get_look_dir()
|
|
local targ = vector.normalize(vector.subtract(pos, ppos))
|
|
if vector.angle(look, targ) > math_pi / 4 then return end
|
|
|
|
local rp = vector.round(pos)
|
|
for pt in minetest.raycast(pos, ppos, false, true) do
|
|
if pt.type ~= "node" then return end
|
|
local node = minetest.get_node(pt.under)
|
|
local def = minetest.registered_nodes[node.name]
|
|
local chk = check and check(pt.under, node, def, pt)
|
|
if chk == false then return end
|
|
if (not chk) and (not vector.equals(rp, pt.under)) then
|
|
if not def then return end
|
|
if not def.witness_transparent then
|
|
if def.witness_opaque or def.paramtype ~= "light" then
|
|
return
|
|
end
|
|
end
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
|
|
function nodecore.witness(pos, label, maxdist, check)
|
|
if not nodecore.player_stat_add then return end
|
|
for _, player in pairs(minetest.get_connected_players()) do
|
|
if playercheck(player, pos, maxdist or 32, check) then
|
|
for _, l in pairs(type(label) == "table" and label or {label}) do
|
|
nodecore.player_stat_add(1, player, "witness", l)
|
|
end
|
|
end
|
|
end
|
|
end
|