add mesecons mods

mods/mesecons/mesecons_pistons/doc/piston/description.html

@@ -0,0 +1,3 @@
+Pistons are effectors, they push up to 20 blocks in front of them. The push direction can be set by placing them from different angles.
+A piston pointing into an unloaded block won't extend.
+A piston retracting from an unloaded block works, but gravity-sensitive nodes above the empty space may not fall.

mods/mesecons/mesecons_pistons/doc/piston_sticky/description.html

@@ -0,0 +1,4 @@
+Sticky pistons are effectors, they push up to 20 blocks in front of them. The push direction can be set by placing them from different angles. Sticky ones also pull 1 block.
+A sticky piston pointing into an unloaded block won't extend.
+A sticky piston retracting from within an unloaded block works and pulls a node, but if it doesn't pull anything, then gravity-sensitive nodes above the empty space may not fall.
+An extended sticky piston that touches the surface of an unloaded block and loses signal retracts but doesn't pull anything.

mods/mesecons/mesecons_pistons/init.lua

@@ -0,0 +1,470 @@
+local S = minetest.get_translator(minetest.get_current_modname())
+
+local specs = {
+	normal = {
+		offname = "mesecons_pistons:piston_normal_off",
+		onname = "mesecons_pistons:piston_normal_on",
+		pusher = "mesecons_pistons:piston_pusher_normal",
+	},
+	sticky = {
+		offname = "mesecons_pistons:piston_sticky_off",
+		onname = "mesecons_pistons:piston_sticky_on",
+		pusher = "mesecons_pistons:piston_pusher_sticky",
+		sticky = true,
+	},
+}
+
+local function get_pistonspec_name(name, part)
+	if part then
+		for spec_name, spec in pairs(specs) do
+			if name == spec[part] then
+				return spec_name, part
+			end
+		end
+		return
+	end
+	for spec_name, spec in pairs(specs) do
+		for part, value in pairs(spec)  do
+			if name == value then
+				return spec_name, part
+			end
+		end
+	end
+end
+
+local function get_pistonspec(name, part)
+	return specs[get_pistonspec_name(name, part)]
+end
+
+local max_push = mesecon.setting("piston_max_push", 15)
+local max_pull = mesecon.setting("piston_max_pull", 15)
+
+-- Get mesecon rules of pistons
+local function piston_get_rules(node)
+	local dir = minetest.facedir_to_dir(node.param2)
+	for k, v in pairs(dir) do
+		if v ~= 0 then
+			dir = {k, -v}
+			break
+		end
+	end
+	local rules = table.copy(mesecon.rules.default)
+	for i, rule in ipairs(rules) do
+		if rule[dir[1]] == dir[2] then
+			table.remove(rules, i)
+		end
+	end
+	return rules
+end
+
+local function piston_remove_pusher(pos, node, check_falling)
+	local pistonspec = get_pistonspec(node.name, "onname")
+	local dir = vector.multiply(minetest.facedir_to_dir(node.param2), -1)
+	local pusherpos = vector.add(pos, dir)
+	local pushername = minetest.get_node(pusherpos).name
+
+	-- make sure there actually is a pusher (for compatibility reasons mainly)
+	if pushername ~= pistonspec.pusher then
+		return
+	end
+
+	minetest.remove_node(pusherpos)
+	minetest.sound_play("piston_retract", { pos = pos, max_hear_distance = 20, gain = 0.3 }, true)
+
+	if check_falling then
+		minetest.check_for_falling(pusherpos)
+	end
+end
+
+local function piston_after_dig(pos, node)
+	piston_remove_pusher(pos, node, true)
+end
+
+local piston_on = function(pos, node)
+	local pistonspec = get_pistonspec(node.name, "offname")
+	local dir = vector.multiply(minetest.facedir_to_dir(node.param2), -1)
+	local pusher_pos = vector.add(pos, dir)
+	local meta = minetest.get_meta(pos)
+	local success, stack, oldstack = mesecon.mvps_push(pusher_pos, dir, max_push, meta:get_string("owner"))
+	if not success then
+		if stack == "protected" then
+			meta:set_string("infotext", "Can't extend: protected area on the way")
+		end
+		return
+	end
+	minetest.swap_node(pos, {param2 = node.param2, name = pistonspec.onname})
+	minetest.set_node(pusher_pos, {param2 = node.param2, name = pistonspec.pusher})
+	minetest.sound_play("piston_extend", { pos = pos, max_hear_distance = 20, gain = 0.3 }, true)
+	mesecon.mvps_move_objects(pusher_pos, dir, oldstack)
+end
+
+local function piston_off(pos, node)
+	local pistonspec = get_pistonspec(node.name, "onname")
+	minetest.swap_node(pos, {param2 = node.param2, name = pistonspec.offname})
+	piston_remove_pusher(pos, node, not pistonspec.sticky) -- allow that even in protected area
+
+	if not pistonspec.sticky then
+		return
+	end
+	local dir = minetest.facedir_to_dir(node.param2)
+	local pullpos = vector.add(pos, vector.multiply(dir, -2))
+	local meta = minetest.get_meta(pos)
+	local success, _, oldstack = mesecon.mvps_pull_single(pullpos, dir, max_pull, meta:get_string("owner"))
+	if success then
+		mesecon.mvps_move_objects(pullpos, vector.multiply(dir, -1), oldstack, -1)
+	end
+end
+
+local function piston_orientate(pos, placer)
+	mesecon.mvps_set_owner(pos, placer)
+	if not placer then
+		return
+	end
+	local node = minetest.get_node(pos)
+	node.param2 = core.dir_to_facedir(placer:get_look_dir(), true)
+	minetest.swap_node(pos, node)
+	-- minetest.after, because on_placenode for unoriented piston must be processed first
+	minetest.after(0, mesecon.on_placenode, pos, node)
+end
+
+local rotations = {
+	{0, 16, 20, 12},
+	{2, 14, 22, 18},
+	{1,  5, 23,  9},
+	{3, 11, 21,  7},
+	{4, 13, 10, 19},
+	{6, 15,  8, 17},
+}
+
+local function get_rotation(param2)
+	for a = 1, #rotations do
+		for f = 1, #rotations[a] do
+			if rotations[a][f] == param2 then
+				return a, f
+			end
+		end
+	end
+end
+
+local function rotate(param2, mode)
+	local axis, face = get_rotation(param2)
+	if mode == screwdriver.ROTATE_FACE then
+		face = face + 1
+		if face > 4 then
+			face = 1
+		end
+	elseif mode == screwdriver.ROTATE_AXIS then
+		axis = axis + 1
+		if axis > 6 then
+			axis = 1
+		end
+		face = 1
+	else
+		return param2
+	end
+	return rotations[axis][face]
+end
+
+local function piston_rotate(pos, node, _, mode)
+	node.param2 = rotate(node.param2, mode)
+	minetest.swap_node(pos, node)
+	mesecon.execute_autoconnect_hooks_now(pos, node)
+	return true
+end
+
+local function piston_rotate_on(pos, node, player, mode)
+	local pistonspec = get_pistonspec(node.name, "onname")
+	local dir = vector.multiply(minetest.facedir_to_dir(node.param2), -1)
+	local pusher_pos = vector.add(dir, pos)
+	local pusher_node = minetest.get_node(pusher_pos)
+	if pusher_node.name ~= pistonspec.pusher then
+		return piston_rotate(pos, node, nil, mode)
+	end
+	if mode == screwdriver.ROTATE_FACE then
+		piston_rotate(pusher_pos, pusher_node, nil, mode)
+		return piston_rotate(pos, node, nil, mode)
+	elseif mode ~= screwdriver.ROTATE_AXIS then
+		return false
+	end
+	local player_name = player and player:is_player() and player:get_player_name() or ""
+	local ok, dir_after, pusher_pos_after
+	for i = 1, 5 do
+		node.param2 = rotate(node.param2, mode)
+		dir_after = vector.multiply(minetest.facedir_to_dir(node.param2), -1)
+		pusher_pos_after = vector.add(dir_after, pos)
+		local pusher_pos_after_node_name = minetest.get_node(pusher_pos_after).name
+		local pusher_pos_after_node_def = minetest.registered_nodes[pusher_pos_after_node_name]
+		if pusher_pos_after_node_def and pusher_pos_after_node_def.buildable_to and
+				not minetest.is_protected(pusher_pos_after, player_name) then
+			ok = true
+			break
+		end
+	end
+	if not ok then
+		return false
+	end
+	pusher_node.param2 = node.param2
+	minetest.remove_node(pusher_pos)
+	minetest.set_node(pusher_pos_after, pusher_node)
+	minetest.swap_node(pos, node)
+	mesecon.execute_autoconnect_hooks_now(pos, node)
+	return true
+end
+
+local function piston_rotate_pusher(pos, node, player, mode)
+	local pistonspec = get_pistonspec(node.name, "pusher")
+	local piston_pos = vector.add(pos, minetest.facedir_to_dir(node.param2))
+	local piston_node = minetest.get_node(piston_pos)
+	if piston_node.name ~= pistonspec.onname then
+		minetest.remove_node(pos) -- Make it possible to remove alone pushers.
+		return false
+	end
+	return piston_rotate_on(piston_pos, piston_node, player, mode)
+end
+
+local function piston_punch(pos, _, player)
+	local player_name = player and player.get_player_name and player:get_player_name()
+	if mesecon.mvps_claim(pos, player_name) then
+		minetest.chat_send_player(player_name, "Reclaimed piston")
+	end
+end
+
+
+-- Boxes:
+
+local pt = 3/16 -- pusher thickness
+
+local piston_pusher_box = {
+	type = "fixed",
+	fixed = {
+		{-2/16, -2/16, -.5 + pt, 2/16, 2/16,  .5 + pt},
+		{-.5  , -.5  , -.5     , .5  , .5  , -.5 + pt},
+	},
+}
+
+local piston_on_box = {
+	type = "fixed",
+	fixed = {
+		{-.5, -.5, -.5 + pt, .5, .5, .5}
+	},
+}
+
+
+-- Normal (non-sticky) Pistons:
+-- offstate
+minetest.register_node("mesecons_pistons:piston_normal_off", {
+	description = S("Piston"),
+	tiles = {
+		"mesecons_piston_top.png",
+		"mesecons_piston_top.png^[transform2",
+		"mesecons_piston_top.png^[transform3",
+		"mesecons_piston_top.png^[transform1",
+		"mesecons_piston_back.png",
+		"mesecons_piston_pusher_front.png"
+	},
+	groups = {cracky = 3},
+	paramtype2 = "facedir",
+	is_ground_content = false,
+	after_place_node = piston_orientate,
+	sounds = mesecon.node_sound.wood,
+	mesecons = {effector={
+		action_on = piston_on,
+		rules = piston_get_rules,
+	}},
+	on_punch = piston_punch,
+	on_rotate = piston_rotate,
+	on_blast = mesecon.on_blastnode,
+})
+
+-- onstate
+minetest.register_node("mesecons_pistons:piston_normal_on", {
+	description = S("Activated Piston Base"),
+	drawtype = "nodebox",
+	tiles = {
+		"mesecons_piston_top.png",
+		"mesecons_piston_top.png^[transform2",
+		"mesecons_piston_top.png^[transform3",
+		"mesecons_piston_top.png^[transform1",
+		"mesecons_piston_back.png",
+		"mesecons_piston_on_front.png"
+	},
+	groups = {cracky = 3, not_in_creative_inventory = 1},
+	paramtype = "light",
+	paramtype2 = "facedir",
+	is_ground_content = false,
+	drop = "mesecons_pistons:piston_normal_off",
+	after_dig_node = piston_after_dig,
+	node_box = piston_on_box,
+	selection_box = piston_on_box,
+	sounds = mesecon.node_sound.wood,
+	mesecons = {effector={
+		action_off = piston_off,
+		rules = piston_get_rules,
+	}},
+	on_rotate = piston_rotate_on,
+	on_blast = mesecon.on_blastnode,
+})
+
+-- pusher
+minetest.register_node("mesecons_pistons:piston_pusher_normal", {
+	description = S("Piston Pusher"),
+	drawtype = "nodebox",
+	tiles = {
+		"mesecons_piston_pusher_top.png",
+		"mesecons_piston_pusher_top.png^[transform2",
+		"mesecons_piston_pusher_top.png^[transform3",
+		"mesecons_piston_pusher_top.png^[transform1",
+		"mesecons_piston_pusher_back.png",
+		"mesecons_piston_pusher_front.png"
+	},
+	groups = {not_in_creative_inventory = 1},
+	paramtype = "light",
+	paramtype2 = "facedir",
+	is_ground_content = false,
+	diggable = false,
+	selection_box = piston_pusher_box,
+	node_box = piston_pusher_box,
+	on_rotate = piston_rotate_pusher,
+	drop = "",
+	sounds = mesecon.node_sound.wood,
+})
+
+-- Sticky ones
+-- offstate
+minetest.register_node("mesecons_pistons:piston_sticky_off", {
+	description = S("Sticky Piston"),
+	tiles = {
+		"mesecons_piston_top.png",
+		"mesecons_piston_top.png^[transform2",
+		"mesecons_piston_top.png^[transform3",
+		"mesecons_piston_top.png^[transform1",
+		"mesecons_piston_back.png",
+		"mesecons_piston_pusher_front_sticky.png"
+	},
+	groups = {cracky = 3},
+	paramtype2 = "facedir",
+	is_ground_content = false,
+	after_place_node = piston_orientate,
+	sounds = mesecon.node_sound.wood,
+	mesecons = {effector={
+		action_on = piston_on,
+		rules = piston_get_rules,
+	}},
+	on_punch = piston_punch,
+	on_rotate = piston_rotate,
+	on_blast = mesecon.on_blastnode,
+})
+
+-- onstate
+minetest.register_node("mesecons_pistons:piston_sticky_on", {
+	description = S("Activated Sticky Piston Base"),
+	drawtype = "nodebox",
+	tiles = {
+		"mesecons_piston_top.png",
+		"mesecons_piston_top.png^[transform2",
+		"mesecons_piston_top.png^[transform3",
+		"mesecons_piston_top.png^[transform1",
+		"mesecons_piston_back.png",
+		"mesecons_piston_on_front.png"
+	},
+	groups = {cracky = 3, not_in_creative_inventory = 1},
+	paramtype = "light",
+	paramtype2 = "facedir",
+	is_ground_content = false,
+	drop = "mesecons_pistons:piston_sticky_off",
+	after_dig_node = piston_after_dig,
+	node_box = piston_on_box,
+	selection_box = piston_on_box,
+	sounds = mesecon.node_sound.wood,
+	mesecons = {effector={
+		action_off = piston_off,
+		rules = piston_get_rules,
+	}},
+	on_rotate = piston_rotate_on,
+	on_blast = mesecon.on_blastnode,
+})
+
+-- pusher
+minetest.register_node("mesecons_pistons:piston_pusher_sticky", {
+	description = S("Sticky Piston Pusher"),
+	drawtype = "nodebox",
+	tiles = {
+		"mesecons_piston_pusher_top.png",
+		"mesecons_piston_pusher_top.png^[transform2",
+		"mesecons_piston_pusher_top.png^[transform3",
+		"mesecons_piston_pusher_top.png^[transform1",
+		"mesecons_piston_pusher_back.png",
+		"mesecons_piston_pusher_front_sticky.png"
+	},
+	groups = {not_in_creative_inventory = 1},
+	paramtype = "light",
+	paramtype2 = "facedir",
+	is_ground_content = false,
+	diggable = false,
+	selection_box = piston_pusher_box,
+	node_box = piston_pusher_box,
+	on_rotate = piston_rotate_pusher,
+	drop = "",
+	sounds = mesecon.node_sound.wood,
+})
+
+
+-- Register pushers as stoppers if they would be seperated from the piston
+local function piston_pusher_get_stopper(node, _, stack, stackid)
+	if (stack[stackid + 1]
+	and stack[stackid + 1].node.name   == get_pistonspec(node.name, "pusher").onname
+	and stack[stackid + 1].node.param2 == node.param2)
+	or (stack[stackid - 1]
+	and stack[stackid - 1].node.name   == get_pistonspec(node.name, "pusher").onname
+	and stack[stackid - 1].node.param2 == node.param2) then
+		return false
+	end
+	return true
+end
+
+mesecon.register_mvps_stopper("mesecons_pistons:piston_pusher_normal", piston_pusher_get_stopper)
+mesecon.register_mvps_stopper("mesecons_pistons:piston_pusher_sticky", piston_pusher_get_stopper)
+
+
+-- Register pistons as stoppers if they would be seperated from the stopper
+local function piston_get_stopper(node, _, stack, stackid)
+	local pistonspec = get_pistonspec(node.name, "onname")
+	local dir = vector.multiply(minetest.facedir_to_dir(node.param2), -1)
+	local pusherpos = vector.add(stack[stackid].pos, dir)
+	local pushernode = minetest.get_node(pusherpos)
+	if pistonspec.pusher == pushernode.name then
+		for _, s in ipairs(stack) do
+			if  vector.equals(s.pos, pusherpos) -- pusher is also to be pushed
+			and s.node.param2 == node.param2 then
+				return false
+			end
+		end
+	end
+	return true
+end
+
+mesecon.register_mvps_stopper("mesecons_pistons:piston_normal_on", piston_get_stopper)
+mesecon.register_mvps_stopper("mesecons_pistons:piston_sticky_on", piston_get_stopper)
+
+
+--craft recipes
+minetest.register_craft({
+	output = "mesecons_pistons:piston_normal_off 2",
+	recipe = {
+		{"group:wood",             "group:wood",                        "group:wood"},
+		{"mesecons_gamecompat:cobble", "mesecons_gamecompat:steel_ingot",       "mesecons_gamecompat:cobble"},
+		{"mesecons_gamecompat:cobble", "group:mesecon_conductor_craftable", "mesecons_gamecompat:cobble"},
+	}
+})
+
+minetest.register_craft({
+	output = "mesecons_pistons:piston_sticky_off",
+	recipe = {
+		{"mesecons_materials:glue"},
+		{"mesecons_pistons:piston_normal_off"},
+	}
+})
+
+
+-- load legacy code
+dofile(minetest.get_modpath("mesecons_pistons").."/legacy.lua")

mods/mesecons/mesecons_pistons/legacy.lua

@@ -0,0 +1,48 @@
+local ground_dir = {
+	[0] = {x =  0, y = -1, z =  0},
+	      {x =  0, y =  0, z = -1},
+	      {x =  0, y =  0, z =  1},
+	      {x = -1, y =  0, z =  0},
+	      {x =  1, y =  0, z =  0},
+	      {x =  0, y =  1, z =  0},
+}
+
+minetest.register_lbm({
+	label = "Upgrade legacy pistons pointing up",
+	name = "mesecons_pistons:replace_legacy_piston_up",
+	nodenames = {
+		"mesecons_pistons:piston_up_normal_off",
+		"mesecons_pistons:piston_up_normal_on",
+		"mesecons_pistons:piston_up_pusher_normal",
+		"mesecons_pistons:piston_up_sticky_off",
+		"mesecons_pistons:piston_up_sticky_on",
+		"mesecons_pistons:piston_up_pusher_sticky",
+	},
+	run_at_every_load = false,
+	action = function(pos, node)
+		local dir = ground_dir[math.floor(node.param2/4)]
+		node.param2 = minetest.dir_to_facedir(dir, true)
+		node.name = node.name:sub(1, 24)..node.name:sub(28)
+		minetest.swap_node(pos, node)
+	end,
+})
+
+minetest.register_lbm({
+	label = "Upgrade legacy pistons pointing down",
+	name = "mesecons_pistons:replace_legacy_piston_down",
+	nodenames = {
+		"mesecons_pistons:piston_down_normal_off",
+		"mesecons_pistons:piston_down_normal_on",
+		"mesecons_pistons:piston_down_pusher_normal",
+		"mesecons_pistons:piston_down_sticky_off",
+		"mesecons_pistons:piston_down_sticky_on",
+		"mesecons_pistons:piston_down_pusher_sticky",
+	},
+	run_at_every_load = false,
+	action = function(pos, node)
+		local dir = vector.multiply(ground_dir[math.floor(node.param2/4)], -1)
+		node.param2 = minetest.dir_to_facedir(dir, true)
+		node.name = node.name:sub(1, 24)..node.name:sub(30)
+		minetest.swap_node(pos, node)
+	end,
+})

mods/mesecons/mesecons_pistons/locale/mesecons_pistons.de.tr

@@ -0,0 +1,7 @@
+# textdomain: mesecons_pistons
+Piston=Kolben
+Activated Piston Base=Aktivierter Kolbenkörper
+Piston Pusher=Kolbenschieber
+Sticky Piston=Haftender Kolben
+Activated Sticky Piston Base=Aktivierter haftender Kolbenkörper
+Sticky Piston Pusher=Haftender Kolbenschieber

mods/mesecons/mesecons_pistons/locale/mesecons_pistons.eo.tr

@@ -0,0 +1,9 @@
+# textdomain: mesecons_pistons
+
+### init.lua ###
+Piston=Piŝto
+Activated Piston Base=Aktivigita Piŝta Bazo
+Piston Pusher=Piŝta Pushero
+Sticky Piston=Glueca Piŝto
+Activated Sticky Piston Base=Aktivigita Glueca Piŝta Bazo
+Sticky Piston Pusher=Glueca Piŝta Puŝilo

mods/mesecons/mesecons_pistons/locale/mesecons_pistons.fr.tr

@@ -0,0 +1,9 @@
+# textdomain: mesecons_pistons
+
+### init.lua ###
+Piston=Piston
+Activated Piston Base=Base de piston activé
+Piston Pusher=Bras de piston
+Sticky Piston=Piston collant
+Activated Sticky Piston Base=Base de piston collant activé
+Sticky Piston Pusher=Bras de piston collant

mods/mesecons/mesecons_pistons/locale/mesecons_pistons.ru.tr

@@ -0,0 +1,9 @@
+# textdomain: mesecons_pistons
+
+### init.lua ###
+Piston=Поршень
+Activated Piston Base=Основание активированного поршня
+Piston Pusher=Толкающая часть поршня
+Sticky Piston=Липкий поршень
+Activated Sticky Piston Base=Основание активированного липкого поршня
+Sticky Piston Pusher=Толкающая часть липкого поршня

mods/mesecons/mesecons_pistons/locale/mesecons_pistons.uk.tr

@@ -0,0 +1,9 @@
+# textdomain: mesecons_pistons
+
+### init.lua ###
+Piston=Поршень
+Activated Piston Base=Основа активованого поршня
+Piston Pusher=Штовхаюча частина поршня
+Sticky Piston=Липкий поршень
+Activated Sticky Piston Base=Основа активованого липкого поршня
+Sticky Piston Pusher=Штовхаюча частина липкого поршня

mods/mesecons/mesecons_pistons/locale/template.txt

@@ -0,0 +1,9 @@
+# textdomain: mesecons_pistons
+
+### init.lua ###
+Piston=
+Activated Piston Base=
+Piston Pusher=
+Sticky Piston=
+Activated Sticky Piston Base=
+Sticky Piston Pusher=

mods/mesecons/mesecons_pistons/mod.conf

@@ -0,0 +1,2 @@
+name = mesecons_pistons
+depends = mesecons, mesecons_gamecompat, mesecons_mvps