commit b6ecf0fea61553bf59f3a46133f007a518b38067 Author: sys4-fr Date: Thu Sep 6 21:02:43 2018 +0200 Remplissage du dépôt. diff --git a/depends.txt b/depends.txt new file mode 100755 index 0000000..6cf00e8 --- /dev/null +++ b/depends.txt @@ -0,0 +1,2 @@ +default +bucket diff --git a/func.lua b/func.lua new file mode 100755 index 0000000..92988a5 --- /dev/null +++ b/func.lua @@ -0,0 +1,176 @@ + +function spawn_falling_node(p, node, owners) + local obj = minetest.add_entity(p, "__builtin:falling_node") + obj:get_luaentity():set_node(node) + obj:get_luaentity():set_owner(owners) +end + +function drop_attached_node(p) + local nn = minetest.get_node(p).name + minetest.remove_node(p) + for _,item in ipairs(minetest.get_node_drops(nn, "")) do + local pos = { + x = p.x + math.random()/2 - 0.25, + y = p.y + math.random()/2 - 0.25, + z = p.z + math.random()/2 - 0.25, + } + minetest.add_item(pos, item) + end +end + +function check_attached_node(p, n) + local def = minetest.registered_nodes[n.name] + local d = {x=0, y=0, z=0} + if def.paramtype2 == "wallmounted" then + if n.param2 == 0 then + d.y = 1 + elseif n.param2 == 1 then + d.y = -1 + elseif n.param2 == 2 then + d.x = 1 + elseif n.param2 == 3 then + d.x = -1 + elseif n.param2 == 4 then + d.z = 1 + elseif n.param2 == 5 then + d.z = -1 + end + else + d.y = -1 + end + local p2 = {x=p.x+d.x, y=p.y+d.y, z=p.z+d.z} + local nn = minetest.get_node(p2).name + local def2 = minetest.registered_nodes[nn] + if def2 and not def2.walkable then + return false + end + return true +end + +-- +-- Some common functions +-- + +function nodeupdate_single(p, delay) + local n = minetest.get_node(p) + if minetest.get_item_group(n.name, "falling_node") ~= 0 then + local p_bottom = {x=p.x, y=p.y-1, z=p.z} + local n_bottom = minetest.get_node(p_bottom) + -- Note: walkable is in the node definition, not in item groups + if minetest.registered_nodes[n_bottom.name] and + (minetest.get_item_group(n.name, "float") == 0 or + minetest.registered_nodes[n_bottom.name].liquidtype == "none") and + (n.name ~= n_bottom.name or (minetest.registered_nodes[n_bottom.name].leveled and + minetest.get_node_level(p_bottom) < minetest.get_node_max_level(p_bottom))) and + (not minetest.registered_nodes[n_bottom.name].walkable or + minetest.registered_nodes[n_bottom.name].buildable_to) then + if delay then + minetest.after(0.1, nodeupdate_single, {x=p.x, y=p.y, z=p.z}, false) + else + n.level = minetest.get_node_level(p) + local meta = minetest.get_meta(p) + --print('get owner '.. meta:get_string("owner")) + spawn_falling_node(p, n, meta:get_string("owner")) + minetest.remove_node(p) + nodeupdate(p) + end + end + end + + if minetest.get_item_group(n.name, "attached_node") ~= 0 then + if not check_attached_node(p, n) then + drop_attached_node(p) + nodeupdate(p) + end + end +end + +function nodeupdate(p, delay) + -- Round p to prevent falling entities to get stuck + p.x = math.floor(p.x+0.5) + p.y = math.floor(p.y+0.5) + p.z = math.floor(p.z+0.5) + + for x = -1,1 do + for y = -1,1 do + for z = -1,1 do + nodeupdate_single({x=p.x+x, y=p.y+y, z=p.z+z}, delay or not (x==0 and y==0 and z==0)) + end + end + end +end + +-- +-- Global callbacks +-- + +function on_placenode(p, node) + nodeupdate(p) +end +minetest.register_on_placenode(on_placenode) + +function on_dignode(p, node) + nodeupdate(p) +end +minetest.register_on_dignode(on_dignode) + +-- +-- Protected Area +-- + +function is_protected_area(p, zone, name) + for x= -zone, zone do + for y= -zone, zone do + for z= -zone, zone do + local pos = {x=p.x+x,y=p.y+y,z=p.z+z} + if minetest.is_protected(pos,name) then + return true + end + end + end + end + return false +end + +-- +-- rewrite of bucket +-- + +function add_protected_bukket_liquid(nameofbukket,liquidsourcename) + minetest.override_item(nameofbukket, { + on_place = function(itemstack, user, pointed_thing) + -- Must be pointing to node + if pointed_thing.type ~= "node" then + return + end + -- Check if pointing to a buildable node + local n = minetest.get_node(pointed_thing.under) + + if is_protected_area(pointed_thing.under, 4 ,user:get_player_name()) then + minetest.chat_send_player(user:get_player_name(),"You can't place here - Too short of a protected area. (less than or equal to 4 blocks)") + if minetest.is_protected(pointed_thing.under,user:get_player_name()) then + minetest.log("action", user:get_player_name().. " try use "..nameofbukket.." at protected pos ".. minetest.pos_to_string(pointed_thing.under)) + end + return itemstack + end + + if minetest.registered_nodes[n.name].buildable_to then + -- buildable; replace the node + minetest.log("action", user:get_player_name().. " use "..nameofbukket.." at ".. minetest.pos_to_string(pointed_thing.under)) + minetest.add_node(pointed_thing.under, {name=liquidsourcename}) + else + -- not buildable to; place the liquid above + -- check if the node above can be replaced + n = minetest.get_node(pointed_thing.above) + if minetest.registered_nodes[n.name].buildable_to then + minetest.log("action", user:get_player_name().. " use "..nameofbukket.." at ".. minetest.pos_to_string(pointed_thing.above)) + minetest.add_node(pointed_thing.above, {name=liquidsourcename}) + else + -- do not remove the bucket with the liquid + return + end + end + return {name="bucket:bucket_empty"} + end + }) +end diff --git a/init.lua b/init.lua new file mode 100755 index 0000000..eeaf6a6 --- /dev/null +++ b/init.lua @@ -0,0 +1,15 @@ +dofile(minetest.get_modpath("builtin_falling") .. "/func.lua") -- Not EDIT THAT +-- +-- Config +-- + +-- Protect in realtime the lava flowing (can be slow) +PROTECT_LAVA_REALTIME = 0 -- 0 for OFF , 1 for ON +-- Protect in realtime the water flowing (can be very slow, because some water in this world :p) +PROTECT_WATER_REALTIME = 0 -- 0 for OFF , 1 for ON + +add_protected_bukket_liquid("bucket:bucket_lava","default:lava_source") -- lava bukket +add_protected_bukket_liquid("bucket:bucket_water","default:water_source") -- water bukket + + -- Not EDIT AFTER +dofile(minetest.get_modpath("builtin_falling") .. "/rewirting.lua") -- Not EDIT THAT diff --git a/rewirting.lua b/rewirting.lua new file mode 100755 index 0000000..f5729ef --- /dev/null +++ b/rewirting.lua @@ -0,0 +1,234 @@ + +-- +-- Falling stuff custom for protected area +-- +minetest.register_entity(":__builtin:falling_node", { + initial_properties = { + physical = true, + collide_with_objects = false, + collisionbox = {-0.5,-0.5,-0.5, 0.5,0.5,0.5}, + visual = "wielditem", + textures = {}, + visual_size = {x=0.667, y=0.667}, + owner = "falling", + }, + + node = {}, + + set_node = function(self, node) + self.node = node + local stack = ItemStack(node.name) + local itemtable = stack:to_table() + local itemname = nil + if itemtable then + itemname = stack:to_table().name + end + local item_texture = nil + local item_type = "" + if minetest.registered_items[itemname] then + item_texture = minetest.registered_items[itemname].inventory_image + item_type = minetest.registered_items[itemname].type + end + local prop = { + is_visible = true, + textures = {node.name}, + } + self.object:set_properties(prop) + end, + + set_owner = function(self, owner) + if owner ~= nil then + self.owner = "falling" + else + self.owner = owner + end + end, + + get_staticdata = function(self) + return self.node.name + end, + + on_activate = function(self, staticdata) + self.object:set_armor_groups({immortal=1}) + self:set_node({name=staticdata}) + end, + + on_step = function(self, dtime) + -- Set gravity + self.object:setacceleration({x=0, y=-10, z=0}) + -- Turn to actual sand when collides to ground or just move + local pos = self.object:getpos() + local bcp = {x=pos.x, y=pos.y-0.7, z=pos.z} -- Position of bottom center point + local bcn = minetest.get_node(bcp) + local bcd = minetest.registered_nodes[bcn.name] + -- Note: walkable is in the node definition, not in item groups + if not bcd or + (bcd.walkable or + (minetest.get_item_group(self.node.name, "float") ~= 0 and + bcd.liquidtype ~= "none")) then + if bcd and bcd.leveled and + bcn.name == self.node.name then + local addlevel = self.node.level + if addlevel == nil or addlevel <= 0 then + addlevel = bcd.leveled + end + if minetest.add_node_level(bcp, addlevel) == 0 then + self.object:remove() + return + end + elseif bcd and bcd.buildable_to and + (minetest.get_item_group(self.node.name, "float") == 0 or + bcd.liquidtype == "none") then + minetest.remove_node(bcp) + return + end + local np = {x=bcp.x, y=bcp.y+1, z=bcp.z} + -- Check what's here + local n2 = minetest.get_node(np) + -- If it's not air or liquid, remove node and replace it with + -- it's drops + if n2.name ~= "air" and (not minetest.registered_nodes[n2.name] or + minetest.registered_nodes[n2.name].liquidtype == "none") then + minetest.remove_node(np) + if minetest.registered_nodes[n2.name].buildable_to == false then + -- Add dropped items + local drops = minetest.get_node_drops(n2.name, "") + local _, dropped_item + for _, dropped_item in ipairs(drops) do + minetest.add_item(np, dropped_item) + end + end + -- Run script hook + local _, callback + for _, callback in ipairs(minetest.registered_on_dignodes) do + callback(np, n2, nil) + end + end + -- Create node and remove entity + if self.owner == nil or self.owner == "falling" and not minetest.is_protected(pos,"") then + minetest.add_node(np, self.node) + else + if not minetest.is_protected(pos,self.owner) then + minetest.log("action", self.owner + .. " falling node " .. self.node.name + .. " at" + .. minetest.pos_to_string(pos)) + minetest.add_node(np, self.node) + else + minetest.log("action", self.owner + .. " try to falling node " .. self.node.name + .. " at protected position " + .. minetest.pos_to_string(pos)) + minetest.add_item(np, self.node) + end + end + self.object:remove() + nodeupdate(np) + return + end + local vel = self.object:getvelocity() + if vector.equals(vel, {x=0,y=0,z=0}) then + local npos = self.object:getpos() + self.object:setpos(vector.round(npos)) + end + end +}) + +minetest.override_item("default:lava_source", { + on_place = function(itemstack, placer, pointed_thing) + if not pointed_thing.type == "node" then + return itemstack + end + local pn = placer:get_player_name() + if minetest.is_protected(pointed_thing.above, pn) then + return itemstack + end + minetest.add_node(pointed_thing.above, {name=itemstack:get_name()}) + local meta = minetest.get_meta(pointed_thing.above) + meta:set_string("owner", pn) + nodeupdate(pointed_thing.above) + if not minetest.setting_getbool("creative_mode") then + itemstack:take_item() + end + return itemstack + end, +}) + +minetest.override_item("default:lava_flowing", { + on_place = function(itemstack, placer, pointed_thing) + if not pointed_thing.type == "node" then + return itemstack + end + local pn = placer:get_player_name() + if minetest.is_protected(pointed_thing.above, pn) then + return itemstack + end + minetest.add_node(pointed_thing.above, {name=itemstack:get_name()}) + local meta = minetest.get_meta(pointed_thing.above) + meta:set_string("owner", pn) + nodeupdate(pointed_thing.above) + if not minetest.setting_getbool("creative_mode") then + itemstack:take_item() + end + return itemstack + end, +}) + +if PROTECT_LAVA_REALTIME == 1 then + minetest.register_abm({ + nodenames = {"default:lava_source","default:lava_flowing"}, + neighbors = {"air"}, + interval = 1, + chance = 1, + action = function(pos, node, active_object_count, active_object_count_wider) + local meta = minetest.get_meta(pos) + if meta:get_string("owner") ~= nil and minetest.is_protected(pos, meta:get_string("owner")) then + minetest.add_node(pos,{name="air"}) + end + end + }) +end + +if PROTECT_WATER_REALTIME == 1 then + minetest.register_abm({ + nodenames = {"default:water_source","default:water_flowing"}, + neighbors = {"air"}, + interval = 1, + chance = 1, + action = function(pos, node, active_object_count, active_object_count_wider) + local meta = minetest.get_meta(pos) + if meta:get_string("owner") ~= nil and minetest.is_protected(pos, meta:get_string("owner")) then + minetest.add_node(pos,{name="air"}) + end + end + }) +end + + +-- More slow >.< + +--local c_air = minetest.get_content_id("air") +--minetest.register_abm({ +-- nodenames = {"default:lava_source","default:lava_flowing"}, +-- neighbors = {"air"}, +-- interval = 2, +-- chance = 1, +-- action = function(pos, node, active_object_count, active_object_count_wider) +-- local vm = minetest.get_voxel_manip() +-- local minp, maxp = vm:read_from_map({x = pos.x, y = pos.y , z = pos.z }, +-- {x = pos.x , y = pos.y , z = pos.z }) +-- local area = VoxelArea:new{MinEdge=minp, MaxEdge=maxp} +-- local data = vm:get_data() +-- local p_pos = area:index(pos.x, pos.y , pos.z) +-- print ("pos: , name :"..minetest.get_name_from_content_id(data[p_pos])) +-- local meta = minetest.get_meta(area:position(p_pos)) +-- if minetest.get_name_from_content_id(data[p_pos])== "default:lava_source" and meta:get_string("owner") ~= nil and minetest.is_protected(area:position(p_pos), meta:get_string("owner")) then +-- data[p_pos] = c_air +-- end +-- vm:set_data(data) +-- vm:write_to_map() +-- vm:update_map() +-- end +--}) + +