diff options
Diffstat (limited to 'replacer/init.lua')
| -rw-r--r-- | replacer/init.lua | 238 |
1 files changed, 238 insertions, 0 deletions
diff --git a/replacer/init.lua b/replacer/init.lua new file mode 100644 index 0000000..6b7732c --- /dev/null +++ b/replacer/init.lua @@ -0,0 +1,238 @@ + + +--[[ + Replacement tool for creative building (Mod for MineTest) + Copyright (C) 2013 Sokomine + + 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/>. +--]] + +-- Version 3.0 + +-- Changelog: +-- 02.10.2014 * Some more improvements for inspect-tool. Added craft-guide. +-- 01.10.2014 * Added inspect-tool. +-- 12.01.2013 * If digging the node was unsuccessful, then the replacement will now fail +-- (instead of destroying the old node with its metadata; i.e. chests with content) +-- 20.11.2013 * if the server version is new enough, minetest.is_protected is used +-- in order to check if the replacement is allowed +-- 24.04.2013 * param1 and param2 are now stored +-- * hold sneak + right click to store new pattern +-- * right click: place one of the itmes +-- * receipe changed +-- * inventory image added + +-- adds a function to check ownership of a node; taken from VanessaEs homedecor mod +dofile(minetest.get_modpath("replacer").."/check_owner.lua"); + +replacer = {}; + +-- adds a tool for inspecting nodes and entities +dofile(minetest.get_modpath("replacer").."/inspect.lua"); + +minetest.register_tool( "replacer:replacer", +{ + description = "Node replacement tool", + groups = {}, + inventory_image = "replacer_replacer.png", + wield_image = "", + wield_scale = {x=1,y=1,z=1}, + stack_max = 1, -- it has to store information - thus only one can be stacked + liquids_pointable = true, -- it is ok to painit in/with water + -- the tool_capabilities are of nearly no intrest here + tool_capabilities = { + full_punch_interval = 1.0, + max_drop_level=0, + groupcaps={ + -- For example: + fleshy={times={[2]=0.80, [3]=0.40}, maxwear=0.05, maxlevel=1}, + snappy={times={[2]=0.80, [3]=0.40}, maxwear=0.05, maxlevel=1}, + choppy={times={[3]=0.90}, maxwear=0.05, maxlevel=0} + } + }, + node_placement_prediction = nil, + metadata = "default:dirt", -- default replacement: common dirt + + on_place = function(itemstack, placer, pointed_thing) + + if( placer == nil or pointed_thing == nil) then + return itemstack; -- nothing consumed + end + local name = placer:get_player_name(); + --minetest.chat_send_player( name, "You PLACED this on "..minetest.serialize( pointed_thing ).."."); + + local keys=placer:get_player_control(); + + -- just place the stored node if now new one is to be selected + if( not( keys["sneak"] )) then + + return replacer.replace( itemstack, placer, pointed_thing, 0 ); end + + + if( pointed_thing.type ~= "node" ) then + minetest.chat_send_player( name, " Error: No node selected."); + return nil; + end + + local pos = minetest.get_pointed_thing_position( pointed_thing, under ); + local node = minetest.get_node_or_nil( pos ); + + --minetest.chat_send_player( name, " Target node: "..minetest.serialize( node ).." at pos "..minetest.serialize( pos ).."."); + + local item = itemstack:to_table(); + -- make sure metadata is always set + if( node ~= nil and node.name ) then + item[ "metadata" ] = node.name..' '..node.param1..' '..node.param2; + else + item[ "metadata" ] = "default:dirt 0 0"; + end + itemstack:replace( item ); + + minetest.chat_send_player( name, "Node replacement tool set to: '"..item[ "metadata" ].."'."); + + return itemstack; -- nothing consumed but data changed + end, + + +-- on_drop = func(itemstack, dropper, pos), + + on_use = function(itemstack, user, pointed_thing) + + return replacer.replace( itemstack, user, pointed_thing, above ); + end, +}) + + +replacer.replace = function( itemstack, user, pointed_thing, mode ) + + if( user == nil or pointed_thing == nil) then + return nil; + end + local name = user:get_player_name(); + --minetest.chat_send_player( name, "You USED this on "..minetest.serialize( pointed_thing ).."."); + + if( pointed_thing.type ~= "node" ) then + minetest.chat_send_player( name, " Error: No node."); + return nil; + end + + local pos = minetest.get_pointed_thing_position( pointed_thing, mode ); + local node = minetest.get_node_or_nil( pos ); + + --minetest.chat_send_player( name, " Target node: "..minetest.serialize( node ).." at pos "..minetest.serialize( pos ).."."); + + if( node == nil ) then + + minetest.chat_send_player( name, "Error: Target node not yet loaded. Please wait a moment for the server to catch up."); + return nil; + end + + + local item = itemstack:to_table(); + + -- make sure it is defined + if( not( item[ "metadata"] ) or item["metadata"]=="" ) then + item["metadata"] = "default:dirt 0 0"; + end + + -- regain information about nodename, param1 and param2 + local daten = item[ "metadata"]:split( " " ); + -- the old format stored only the node name + if( #daten < 3 ) then + daten[2] = 0; + daten[3] = 0; + end + + -- if someone else owns that node then we can not change it + if( replacer_homedecor_node_is_owned(pos, user)) then + + return nil; + end + + -- do not replace if there is nothing to be done + if( node.name == daten[1] ) then + + -- the node itshelf remains the same, but the orientation was changed + if( node.param1 ~= daten[2] or node.param2 ~= daten[3] ) then + minetest.add_node( pos, { name = node.name, param1 = daten[2], param2 = daten[3] } ); + end + + return nil; + end + + + -- in survival mode, the player has to provide the node he wants to be placed + if( not(minetest.setting_getbool("creative_mode") )) then + + -- players usually don't carry dirt_with_grass around; it's safe to assume normal dirt here + -- fortionately, dirt and dirt_with_grass does not make use of rotation + if( daten[1] == "default:dirt_with_grass" ) then + daten[1] = "default:dirt"; + item["metadata"] = "default:dirt 0 0"; + end + + -- does the player carry at least one of the desired nodes with him? + if( not( user:get_inventory():contains_item("main", daten[1]))) then + + + minetest.chat_send_player( name, "You have no further '"..( daten[1] or "?" ).."'. Replacement failed."); + return nil; + end + + + + -- give the player the item by simulating digging if possible + if( node.name ~= "air" + and node.name ~= "ignore" + and node.name ~= "default:lava_source" + and node.name ~= "default:lava_flowing" + and node.name ~= "default:water_source" + and node.name ~= "default:water_flowing" ) then + + minetest.node_dig( pos, node, user ); + + local digged_node = minetest.get_node_or_nil( pos ); + if( not( digged_node ) + or digged_node.name == node.name ) then + + minetest.chat_send_player( name, "Replacing '"..( node.name or "air" ).."' with '"..( item[ "metadata"] or "?" ).."' failed. Unable to remove old node."); + return nil; + end + + end + + -- consume the item + user:get_inventory():remove_item("main", daten[1].." 1"); + + --user:get_inventory():add_item( "main", node.name.." 1"); + end + + --minetest.chat_send_player( name, "Replacing node '"..( node.name or "air" ).."' with '"..( item[ "metadata"] or "?" ).."'."); + + --minetest.place_node( pos, { name = item[ "metadata" ] } ); + minetest.add_node( pos, { name = daten[1], param1 = daten[2], param2 = daten[3] } ); + return nil; -- no item shall be removed from inventory + end + + +minetest.register_craft({ + output = 'replacer:replacer', + recipe = { + { 'default:chest', '', '' }, + { '', 'default:stick', '' }, + { '', '', 'default:chest' }, + } +}) + + |