mirror of
https://github.com/sys4-fr/server-nalc.git
synced 2024-11-18 08:10:38 +01:00
255 lines
7.8 KiB
Lua
Executable File
255 lines
7.8 KiB
Lua
Executable File
global_timer=0
|
|
minetest.after(15,function(dtime)
|
|
global_timer=20
|
|
end)
|
|
|
|
minetest.register_on_player_receive_fields(function(player, formname, fields, pos)
|
|
if fields.quit then
|
|
if formname:find('3dchest:3dchest') then
|
|
local pos = minetest.deserialize(string.split(formname,'_')[2])
|
|
if not pos then return end
|
|
local objs = minetest.get_objects_inside_radius(pos, 0.1)
|
|
for i,obj in ipairs(objs) do
|
|
if not obj:is_player() then
|
|
local self = obj:get_luaentity()
|
|
if self.name == '3dchest:3dchest' then
|
|
self.object:set_animation({x=25,y=40}, 60, 0)
|
|
minetest.sound_play('chestclosed', {pos = pos, gain = 0.3, max_hear_distance = 5})
|
|
minetest.after(0.1, function(dtime)
|
|
self.object:set_animation({x=1,y=1}, 1, 0)
|
|
end)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end)
|
|
|
|
|
|
-- 3d chest!
|
|
local tdc = {
|
|
physical = true,
|
|
visual = "mesh",
|
|
visual_size = {x=4.95, y=4.95, z=4.95},
|
|
mesh = "chest_proto.x",
|
|
textures = {"default_chest3d.png"},
|
|
makes_footstep_sound = true,
|
|
groups = {choppy=2, punch_operable = 1, immortal = 1},
|
|
|
|
on_activate = function(self, staticdata, dtime_s)
|
|
if staticdata then
|
|
local tmp = minetest.deserialize(staticdata)
|
|
if tmp and tmp.textures then
|
|
self.textures = tmp.textures
|
|
self.object:set_properties({textures=self.textures})
|
|
end
|
|
if tmp and tmp.visual then
|
|
self.visual = tmp.visual
|
|
self.object:set_properties({visual=self.visual})
|
|
end
|
|
if tmp and tmp.mesh then
|
|
self.mesh = tmp.mesh
|
|
self.object:set_properties({mesh=self.mesh})
|
|
end
|
|
end
|
|
self.object:set_armor_groups({immortal = 1})
|
|
end,
|
|
|
|
get_staticdata = function(self)
|
|
local tmp = {
|
|
textures = self.textures,
|
|
visual = self.visual,
|
|
mesh = self.mesh,
|
|
}
|
|
return minetest.serialize(tmp)
|
|
end,
|
|
on_step = function(self, dtime)
|
|
local pos = self.object:getpos()
|
|
local nn = minetest.get_node(pos).name
|
|
if nn~='3dchest:chest' then
|
|
self.object:remove()
|
|
return
|
|
end
|
|
end,
|
|
}
|
|
|
|
|
|
minetest.register_entity('3dchest:3dchest', tdc) -- normal
|
|
|
|
minetest.register_node("3dchest:chest", {
|
|
description = "Chest",
|
|
tiles = {"default_chest_top.png", "default_chest_top.png", "default_chest_side.png",
|
|
"default_chest_side.png", "default_chest_side.png", "default_chest_front.png"},
|
|
paramtype2 = "facedir",
|
|
wield_image = minetest.inventorycube("default_chest_top.png", "default_chest_front.png", "default_chest_side.png"),
|
|
inventory_image = minetest.inventorycube("default_chest_top.png", "default_chest_front.png", "default_chest_side.png"),
|
|
drawtype = "nodebox",
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = {-0.01, -0.01, -0.01, 0.01, 0.01, 0.01},
|
|
},
|
|
selection_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
{-0.501, -0.501, -0.501, 0.501, 0.501, 0.501},
|
|
}
|
|
},
|
|
paramtype = "light",
|
|
walkable = false,
|
|
groups = {choppy=2, dig_immediate = 2},
|
|
legacy_facedir_simple = true,
|
|
|
|
on_construct = function(pos)
|
|
local param2 = minetest.get_node(pos).param2
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_string("formspect",
|
|
"size[8,8.2]"..
|
|
"bgcolor[#bbbbbb;false]"..
|
|
"listcolors[#777777;#cccccc;#333333;#555555;#dddddd]"..
|
|
"list[nodemeta:"..pos.x..","..pos.y..","..pos.z..";main;0,0;8,4;]"..
|
|
"list[current_player;main;0,4.2;8,3;8]"..
|
|
"list[current_player;main;0,7.4;8,1;]")
|
|
meta:set_string("infotext", "Chest")
|
|
local inv = meta:get_inventory()
|
|
inv:set_size("main", 4*8)
|
|
end,
|
|
can_dig = function(pos)
|
|
return minetest.get_meta(pos):get_inventory():is_empty("main")
|
|
end,
|
|
after_place_node = function(pos, placer, itemstack, pointed_thing)
|
|
local m = minetest.get_meta(pos)
|
|
local ent = minetest.add_entity(pos,'3dchest:3dchest')
|
|
if ent then
|
|
local ent2 = ent:get_luaentity()
|
|
ent:set_animation({x=1,y=1}, 20, 0)
|
|
local dir = placer:get_look_dir()
|
|
local absx, absy, absz = math.abs(dir.x), math.abs(dir.y), math.abs(dir.z)
|
|
local maxd = math.max(math.max(absx,absy),absz)
|
|
if maxd == absx then
|
|
if dir.x>0 then
|
|
ent:setyaw(math.pi/2)
|
|
m:set_int('dir',1)
|
|
else
|
|
ent:setyaw(3*math.pi/2)
|
|
m:set_int('dir',3)
|
|
end
|
|
elseif maxd == absy then
|
|
if dir.x>dir.z then
|
|
ent:setyaw(math.pi)
|
|
m:set_int('dir',2)
|
|
else
|
|
ent:setyaw(3*math.pi/2)
|
|
m:set_int('dir',3)
|
|
end
|
|
elseif maxd == absz then
|
|
if dir.z>0 then
|
|
ent:setyaw(math.pi)
|
|
m:set_int('dir',2)
|
|
else
|
|
ent:setyaw(0)
|
|
m:set_int('dir',0)
|
|
end
|
|
end
|
|
m:set_int('3d',1)
|
|
end
|
|
local timer = minetest.get_node_timer(pos)
|
|
timer:start(1)
|
|
end,
|
|
on_timer = function(pos,el)
|
|
if global_timer<15 then return true end
|
|
local meta = minetest.get_meta(pos)
|
|
local cover = false
|
|
local node = minetest.get_node(pos)
|
|
local objs = minetest.get_objects_inside_radius(pos, 0.1)
|
|
for i,obj in ipairs(objs) do
|
|
if not obj:is_player() then
|
|
local self = obj:get_luaentity()
|
|
if self.name == '3dchest:3dchest' and node.name == '3dchest:chest' then
|
|
cover = true
|
|
break
|
|
else
|
|
self.object:remove()
|
|
end
|
|
end
|
|
end
|
|
if not cover then
|
|
if node.name == '3dchest:chest' then
|
|
local ent = minetest.env:add_entity(pos,'3dchest:3dchest')
|
|
if ent then
|
|
ent:set_animation({x=1,y=1}, 20, 0)
|
|
local dir = meta:get_int('dir')
|
|
ent:setyaw(dir*(math.pi/2))
|
|
end
|
|
end
|
|
end
|
|
return true
|
|
end,
|
|
after_dig_node = function(pos, oldnode, oldmetadata, digger)
|
|
local meta = minetest.get_meta(pos)
|
|
local meta2 = meta
|
|
meta:from_table(oldmetadata)
|
|
local inv = meta:get_inventory()
|
|
for i=1,inv:get_size("main") do
|
|
local stack = inv:get_stack("main", i)
|
|
if not stack:is_empty() then
|
|
local p = {x=pos.x+math.random(0, 10)/10-0.5, y=pos.y, z=pos.z+math.random(0, 10)/10-0.5}
|
|
minetest.add_item(p, stack)
|
|
end
|
|
end
|
|
meta:from_table(meta2:to_table())
|
|
end,
|
|
on_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
|
|
minetest.log("action", player:get_player_name()..
|
|
" moves stuff in chest at "..minetest.pos_to_string(pos))
|
|
end,
|
|
on_metadata_inventory_put = function(pos, listname, index, stack, player)
|
|
minetest.log("action", player:get_player_name()..
|
|
" moves stuff to chest at "..minetest.pos_to_string(pos))
|
|
end,
|
|
on_metadata_inventory_take = function(pos, listname, index, stack, player)
|
|
minetest.log("action", player:get_player_name()..
|
|
" takes stuff from chest at "..minetest.pos_to_string(pos))
|
|
end,
|
|
|
|
on_rightclick = function(pos, node, clicker, itemstack, pointed_thing)
|
|
local selves = minetest.get_objects_inside_radius(pos, 0.1)
|
|
local self
|
|
for _,obj in pairs(selves) do
|
|
if obj:get_luaentity() and obj:get_luaentity().name == '3dchest:3dchest' then
|
|
self = obj:get_luaentity()
|
|
break
|
|
end
|
|
end
|
|
local meta = minetest.get_meta(pos)
|
|
local name = '3dchest:3dchest'
|
|
local pll = clicker:get_player_name()
|
|
local formspec = meta:get_string('formspect')
|
|
local dir = (meta:get_int("dir")+2)%4
|
|
local directions = {
|
|
[0] = {x = pos.x, y = pos.y, z = pos.z + 1},
|
|
[1] = {x = pos.x - 1, y = pos.y, z = pos.z},
|
|
[2] = {x = pos.x, y = pos.y, z = pos.z - 1},
|
|
[3] = {x = pos.x + 1, y = pos.y, z = pos.z}
|
|
}
|
|
local backnode = minetest.get_node(directions[dir])
|
|
local upnode = minetest.get_node({x = directions[dir].x, y = directions[dir].y + 1, z = directions[dir].z})
|
|
if (not backnode or (backnode and backnode.name ~= "air"))
|
|
or (not upnode or (upnode and upnode.name ~= "air")) then
|
|
minetest.chat_send_player(clicker:get_player_name(), "Cannot open chest's lid, move it.")
|
|
return
|
|
end
|
|
|
|
if not self then
|
|
minetest.show_formspec(pll, name..'_'..minetest.serialize(pos), formspec)
|
|
return
|
|
else
|
|
self.object:set_animation({x=10,y=25}, 60, 0)
|
|
minetest.after(0.1,function(dtime)
|
|
self.object:set_animation({x=25,y=25}, 20, 0)
|
|
end)
|
|
minetest.sound_play('chestopen', {pos = pos, gain = 0.3, max_hear_distance = 5})
|
|
minetest.show_formspec(pll, name..'_'..minetest.serialize(pos), formspec)
|
|
end
|
|
end,
|
|
})
|