1 files changed, 156 insertions, 0 deletions
diff --git a/mesecons_movestones/init.lua b/mesecons_movestones/init.lua
new file mode 100644
index 0000000..52a5605
--- /dev/null
+++ b/mesecons_movestones/init.lua
@@ -0,0 +1,156 @@
+-- MOVESTONE
+-- Non-sticky:
+-- Moves along mesecon lines
+-- Pushes all blocks in front of it
+--
+-- Sticky one
+-- Moves along mesecon lines
+-- Pushes all block in front of it
+-- Pull all blocks in its back
+
+function mesecon.get_movestone_direction(pos)
+	local lpos
+	local rules = {
+		{x=0,  y=1,  z=-1},
+		{x=0,  y=0,  z=-1},
+		{x=0,  y=-1, z=-1},
+		{x=0,  y=1,  z=1},
+		{x=0,  y=-1, z=1},
+		{x=0,  y=0,  z=1},
+		{x=1,  y=0,  z=0},
+		{x=1,  y=1,  z=0},
+		{x=1,  y=-1, z=0},
+		{x=-1, y=1,  z=0},
+		{x=-1, y=-1, z=0},
+		{x=-1, y=0,  z=0}}
+
+	lpos = {x=pos.x+1, y=pos.y, z=pos.z}
+	for n = 1, 3 do
+		if mesecon.is_power_on(lpos, rules[n].x, rules[n].y, rules[n].z) then
+			return {x=0, y=0, z=-1}
+		end
+	end
+
+	lpos = {x = pos.x-1, y = pos.y, z = pos.z}
+	for n=4, 6 do
+		if mesecon.is_power_on(lpos, rules[n].x, rules[n].y, rules[n].z) then
+			return {x=0, y=0, z=1}
+		end
+	end
+
+	lpos = {x = pos.x, y = pos.y, z = pos.z+1}
+	for n=7, 9 do
+		if mesecon.is_power_on(lpos, rules[n].x, rules[n].y, rules[n].z) then
+			return {x=-1, y=0, z=0}
+		end
+	end
+
+	lpos = {x = pos.x, y = pos.y, z = pos.z-1}
+	for n=10, 12 do
+		if mesecon.is_power_on(lpos, rules[n].x, rules[n].y, rules[n].z) then
+			return {x=1, y=0, z=0}
+		end
+	end
+end
+
+function mesecon.register_movestone(name, def, is_sticky)
+	local timer_interval = 1 / mesecon.setting("movestone_speed", 3)
+	local name_active = name.."_active"
+
+	local function movestone_move (pos)
+		if minetest.get_node(pos).name ~= name_active then
+			return
+		end
+
+		local direction = mesecon.get_movestone_direction(pos)
+		if not direction then
+			minetest.set_node(pos, {name = name})
+			return
+		end
+		local frontpos = vector.add(pos, direction)
+		local backpos = vector.subtract(pos, direction)
+
+		-- ### Step 1: Push nodes in front ###
+		local maxpush = mesecon.setting("movestone_max_push", 50)
+		local maxpull = mesecon.setting("movestone_max_pull", 50)
+		local success, stack, oldstack = mesecon.mvps_push(frontpos, direction, maxpush)
+		if success then
+			mesecon.mvps_process_stack(stack)
+			mesecon.mvps_move_objects(frontpos, direction, oldstack)
+		-- Too large stack/stopper in the way: try again very soon
+		else
+			minetest.after(0.05, movestone_move, pos)
+			return
+		end
+
+		-- ### Step 2: Move the movestone ###
+		local node = minetest.get_node(pos)
+		minetest.set_node(frontpos, node)
+		minetest.remove_node(pos)
+		mesecon.on_dignode(pos, node)
+		mesecon.on_placenode(frontpos, node)
+		minetest.after(timer_interval, movestone_move, frontpos)
+
+		-- ### Step 3: If sticky, pull stack behind ###
+		if is_sticky then
+			mesecon.mvps_pull_all(backpos, direction, maxpull)
+		end
+	end
+
+	def.mesecons = {effector = {
+		action_on = function (pos)
+			if minetest.get_node(pos).name ~= name_active then
+				minetest.set_node(pos, {name = name_active})
+				movestone_move(pos)
+			end
+		end,
+		action_off = function (pos)
+			minetest.set_node(pos, {name = name})
+		end
+	}}
+
+	def.drop = name
+
+	minetest.register_node(name, def)
+
+	-- active node only
+	local def_active = table.copy(def)
+	def_active.groups.not_in_creative_inventory = 1
+	minetest.register_node(name_active, def_active)
+end
+
+mesecon.register_movestone("mesecons_movestones:movestone", {
+	tiles = {"jeija_movestone_side.png", "jeija_movestone_side.png", "jeija_movestone_side.png", "jeija_movestone_side.png", "jeija_movestone_arrows.png", "jeija_movestone_arrows.png"},
+	groups = {cracky=3},
+    	description="Movestone",
+	sounds = default.node_sound_stone_defaults()
+}, false)
+
+minetest.register_craft({
+	output = "mesecons_movestones:movestone 2",
+	recipe = {
+		{"default:stone", "default:stone", "default:stone"},
+		{"group:mesecon_conductor_craftable", "group:mesecon_conductor_craftable", "group:mesecon_conductor_craftable"},
+		{"default:stone", "default:stone", "default:stone"},
+	}
+})
+
+-- STICKY_MOVESTONE
+mesecon.register_movestone("mesecons_movestones:sticky_movestone", {
+	tiles = {"jeija_movestone_side.png", "jeija_movestone_side.png", "jeija_movestone_side.png", "jeija_movestone_side.png", "jeija_sticky_movestone.png", "jeija_sticky_movestone.png"},
+	inventory_image = minetest.inventorycube("jeija_sticky_movestone.png", "jeija_movestone_side.png", "jeija_movestone_side.png"),
+	groups = {cracky=3},
+    	description="Sticky Movestone",
+	sounds = default.node_sound_stone_defaults(),
+}, true)
+
+minetest.register_craft({
+	output = "mesecons_movestones:sticky_movestone 2",
+	recipe = {
+		{"mesecons_materials:glue", "mesecons_movestones:movestone", "mesecons_materials:glue"},
+	}
+})
+
+-- Don't allow pushing movestones while they're active
+mesecon.register_mvps_stopper("mesecons_movestones:movestone_active")
+mesecon.register_mvps_stopper("mesecons_movestones:sticky_movestone_active")