init

README.md

@@ -0,0 +1,6 @@
+# copybooks
+A tool that copy books very fast.
+
+A rewrite of [Multi-Function Unit](https://github.com/h-v-smacker/mfu).
+
+License MIT (both mfu codes and my codes)

init.lua

@@ -0,0 +1,208 @@
+local S = minetest.get_translator("copybooks")
+local F = minetest.formspec_escape
+
+local status_idle = S("Book Copier Idle")
+local status_active = S("Book Copier Active")
+local status_full = S("Book Copier Full")
+local status_nopaper = S("Book Copier No Paper")
+
+local copybooks_formspec = function(status)
+	return "" ..
+		"size[8,9]"..
+
+		"label[0,0;"..S("Inputs").."]"..
+		"list[context;input;0,0.5;3,3;]" ..
+		"listring[current_player;main]"..
+
+		"label[2.9,0;"..S("Master").."]"..
+		"list[context;master;3,0.5;1,1;]"..
+
+		"label[0.25,4;" .. status .. "]" ..
+
+		"button_exit[3,1.5;1,1;quit;" .. S("Quit") .. "]"..
+
+		"label[6.7,0;"..S("Copies").."]"..
+		"list[context;output;4,0.5;4,4;]"..
+
+		"list[current_player;main;0,5;8,4;]" ..
+		"listring[context;input]"
+end
+
+local on_construct = function( pos )
+	local meta = minetest.get_meta(pos);
+	local inv = meta:get_inventory()
+
+	inv:set_size("input", 9)
+	inv:set_size("output", 16)
+	inv:set_size("master", 1)
+	meta:set_string('formspec', copybooks_formspec(status_idle))
+	meta:set_string('infotext', status_idle)
+end
+
+local mfu_allow_metadata_inventory_put = function(pos, listname, index, stack, player)
+	local iname = stack:get_name()
+	local meta = minetest.get_meta(pos)
+	local inv = meta:get_inventory()
+
+	if listname == "input" then
+		if iname == "default:book" or iname == "default:paper" then
+			return inv:room_for_item("input", stack) and stack:get_count() or 0
+		else
+			return 0
+		end
+	elseif listname == "output" then
+		return 0
+	elseif listname == "master" then
+		if iname == "default:book_written" and inv:room_for_item("master", stack) then
+			return 1
+		else
+			return 0
+		end
+	end
+	return 0
+end
+
+local mfu_allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+	if to_list == "input" then
+		return -1
+	else
+		return 0
+	end
+end
+
+local mfu_can_dig = function(pos, player)
+	local name = player:get_player_name()
+	if minetest.is_protected(pos, name) then
+		minetest.record_protection_violation(pos, name)
+		return false
+	end
+	local meta = minetest.get_meta(pos)
+	local inv = meta:get_inventory()
+	return (inv:is_empty("input") and inv:is_empty("output") and inv:is_empty("master"))
+end
+
+local mfu_tube = minetest.get_modpath("pipeworks") and {
+		-- using a different stack from defaut when inserting
+		insert_object = function(pos, node, stack, direction)
+			local meta = minetest.get_meta(pos)
+			local inv = meta:get_inventory()
+			return inv:add_item("input", stack)
+		end,
+		can_insert = function(pos, node, stack, direction)
+			local meta = minetest.get_meta(pos)
+			local inv = meta:get_inventory()
+			if stack:get_name() == "default:paper" or stack:get_name() == "default:book" then
+				return inv:room_for_item("input", stack)
+			else
+				return false
+			end
+		end,
+		-- the default stack, from which objects will be taken
+		input_inventory = "output",
+		connect_sides = {left = 1, right = 1, back = 1, bottom = 1,}
+	} or nil
+
+minetest.register_node("copybooks:copybooks_active", {
+	description = S("Book Copier"),
+	tiles = {	{name="mfu_top_active.png",
+				animation={type="vertical_frames",
+				aspect_w=32,
+				aspect_h=32,
+				length=3}},
+			"mfu_bottom.png",
+                  "mfu_side.png",
+                  "mfu_side.png",
+			"mfu_back.png",
+                  "mfu_front_active.png",
+			},
+	groups = {cracky = 1, not_in_creative_inventory = 1, tubedevice = 1, tubedevice_receiver = 1, copybooks = 1},
+	light_source = 3,
+	allow_metadata_inventory_put = mfu_allow_metadata_inventory_put,
+	allow_metadata_inventory_move = mfu_allow_metadata_inventory_move,
+	paramtype = "light",
+	paramtype2 = "facedir",
+	drop = "copybooks:copybooks",
+	can_dig = mfu_can_dig,
+	tube = mfu_tube,
+})
+
+minetest.register_node("copybooks:copybooks", {
+	description = S("Book Copier"),
+	tiles = {	"mfu_top.png",
+			"mfu_bottom.png",
+                  "mfu_side.png",
+                  "mfu_side.png",
+			"mfu_back.png",
+                  "mfu_front.png",
+			},
+	groups = {cracky = 1, tubedevice = 1, tubedevice_receiver = 1, copybooks = 1},
+	allow_metadata_inventory_put = mfu_allow_metadata_inventory_put,
+	allow_metadata_inventory_move = mfu_allow_metadata_inventory_move,
+	paramtype = "light",
+	paramtype2 = "facedir",
+	drop = "copybooks:copybooks",
+	can_dig = mfu_can_dig,
+	tube = mfu_tube,
+	on_construct = on_construct,
+})
+
+local function inactive_state(pos,meta,state)
+	minetest.swap_node(pos,{name="copybooks:copybooks"})
+	meta:set_string("infotext",state or status_idle)
+	meta:set_string("formspec",copybooks_formspec(state or status_idle))
+end
+
+local function active_state(pos,meta)
+	minetest.swap_node(pos,{name="copybooks:copybooks_active"})
+	meta:set_string("infotext",status_active)
+	meta:set_string("formspec",copybooks_formspec(status_active))
+end
+
+minetest.register_abm({
+	label = "copybooks:copy",
+	nodenames = {"group:copybooks"},
+	interval = 1.0,
+	chance = 1,
+	catch_up = true,
+	action = function(pos, node, active_object_count, active_object_count_wider)
+		local meta = minetest.get_meta(pos)
+		local inv = meta:get_inventory()
+		if inv:is_empty("master") then
+			inactive_state(pos,meta)
+			return
+		elseif inv:is_empty("input") then
+			inactive_state(pos,meta,status_nopaper)
+			return
+		end
+
+		local input = inv:get_list("input")
+		local output = inv:get_list("output")
+		local master = inv:get_list("master")
+
+		local master_copy = inv:get_stack("master", 1)
+		local master_contents = master_copy:get_meta():to_table()
+
+		master_contents.fields.owner = S("@1 (copy)",master_contents.fields.owner or "???")
+
+		local copy = ItemStack({name = "default:book_written", count = 1})
+		copy:get_meta():from_table(master_contents)
+
+		if inv:room_for_item("output", copy) then
+			if inv:contains_item("input", {name = "default:book", count = 1}) then
+				inv:remove_item("input", {name = "default:book", count = 1})
+				inv:add_item("output", copy)
+			elseif inv:contains_item("input", {name = "default:paper", count = 3}) then
+				inv:remove_item("input", {name = "default:paper", count = 3})
+				inv:add_item("output", copy)
+			else
+				inactive_state(pos,meta,status_nopaper)
+				return
+			end
+			active_state(pos,meta)
+		else
+			inactive_state(pos,meta,status_full)
+		end
+	end,
+})
+
+

mod.conf

@@ -0,0 +1,3 @@
+name = copybooks
+depends = default
+optional_depends = technic, pipeworks

textures/mfu.LICENSE

@@ -0,0 +1,21 @@
+MIT License
+
+Copyright (c) 2018 Hans von Smacker
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in all
+copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+SOFTWARE.