pipeworks/attic/node_breaker.lua

minetest.register_craft({
	output = 'pipeworks:nodebreaker_off 1',
	recipe = {
		{'default:wood', 'default:pick_mese','default:wood'},
		{'default:stone', 'mesecons:piston','default:stone'},
		{'default:stone', 'mesecons:mesecon','default:stone'},

	}
})


function hacky_swap_node(pos,name)
	local node=minetest.env:get_node(pos)
	local meta=minetest.env:get_meta(pos)
	local meta0=meta:to_table()
	node.name=name
	minetest.env:add_node(pos, node)
	local meta=minetest.env:get_meta(pos)
	meta:from_table(meta0)
end


node_breaker_on = function(pos, node)
	if node.name == "pipeworks:nodebreaker_off" then
		hacky_swap_node(pos,"pipeworks:nodebreaker_on")
		break_node (pos,node.param2)
		nodeupdate(pos)
	end
end

node_breaker_off = function(pos, node)
	if node.name == "pipeworks:nodebreaker_on" then
		hacky_swap_node(pos,"pipeworks:nodebreaker_off")
		nodeupdate(pos)
	end
end

minetest.register_node("pipeworks:nodebreaker_off", {
	description = "Node Breaker",
	tile_images = {"pipeworks_nodebreaker_top_off.png","pipeworks_nodebreaker_bottom_off.png","pipeworks_nodebreaker_side2_off.png","pipeworks_nodebreaker_side1_off.png",
			"pipeworks_nodebreaker_back.png","pipeworks_nodebreaker_front_off.png"},
	is_ground_content = true,
	paramtype2 = "facedir",
	groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, mesecon = 2,tubedevice=1},
	mesecons= {effector={action_on=node_breaker_on, action_off=node_breaker_off}},
	sounds = default.node_sound_stone_defaults(),
	on_construct = function(pos)
	local meta = minetest.env:get_meta(pos)
	end,
	
})

minetest.register_node("pipeworks:nodebreaker_on", {
	description = "Node Breaker",
	tile_images = {"pipeworks_nodebreaker_top_on.png","pipeworks_nodebreaker_bottom_on.png","pipeworks_nodebreaker_side2_on.png","pipeworks_nodebreaker_side1_on.png",
			"pipeworks_nodebreaker_back.png","pipeworks_nodebreaker_front_on.png"},
	mesecons= {effector={action_on=node_breaker_on, action_off=node_breaker_off}},
	is_ground_content = true,
	paramtype2 = "facedir",
	groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2, mesecon = 2,tubedevice=1,not_in_creative_inventory=1},
	sounds = default.node_sound_stone_defaults(),
})

function break_node (pos,n_param)		
	local pos1={}
	local pos2={}
	pos1.x=pos.x
	pos1.y=pos.y
	pos1.z=pos.z
	pos2.x=pos.x
	pos2.y=pos.y
	pos2.z=pos.z

	--param2 3=x+ 1=x- 2=z+ 0=z-
	local x_velocity=0
	local z_velocity=0

	if n_param==3 then pos2.x=pos2.x+1 pos1.x=pos1.x-1 x_velocity=-1 end
	if n_param==2 then pos2.z=pos2.z+1 pos1.z=pos1.z-1 z_velocity=-1 end
	if n_param==1 then pos2.x=pos2.x-1 pos1.x=pos1.x+1 x_velocity=1 end
	if n_param==0 then pos2.z=pos2.z-1 pos1.x=pos1.z+1 z_velocity=1 end

	local node=minetest.env:get_node(pos2)
	if node.name == "air" then return nil end
	if node.name == "default:lava_source" then return nil end
	if node.name == "default:lava_flowing" then return nil end
	if node.name == "default:water_source" then minetest.env:remove_node(pos2) return nil end
	if node.name == "default:water_flowing" then minetest.env:remove_node(pos2) return nil end
	if node.name == "ignore" then minetest.env:remove_node(pos2) return nil end
	local drops = minetest.get_node_drops(node.name, "default:pick_mese")
		local _, dropped_item
		for _, dropped_item in ipairs(drops) do
			local item1=tube_item({x=pos.x,y=pos.y,z=pos.z},dropped_item)
			item1:get_luaentity().start_pos = {x=pos.x,y=pos.y,z=pos.z}
			item1:setvelocity({x=x_velocity, y=0, z=z_velocity})
			item1:setacceleration({x=0, y=0, z=0})
		end
	minetest.env:remove_node(pos2)
end