pipeworks/compat.lua
2013-06-23 19:52:01 -04:00

94 lines
2.5 KiB
Lua

function clone_node(name)
node2={}
node=minetest.registered_nodes[name]
for k,v in pairs(node) do
node2[k]=v
end
return node2
end
furnace=clone_node("default:furnace")
furnace.groups.tubedevice=1
furnace.groups.tubedevice_receiver=1
furnace.tube={insert_object=function(pos,node,stack,direction)
local meta=minetest.env:get_meta(pos)
local inv=meta:get_inventory()
if direction.y==1 then
return inv:add_item("fuel",stack)
else
return inv:add_item("src",stack)
end
end,
can_insert=function(pos,node,stack,direction)
local meta=minetest.env:get_meta(pos)
local inv=meta:get_inventory()
if direction.y==1 then
return inv:room_for_item("fuel",stack)
elseif direction.y==-1 then
return inv:room_for_item("src",stack)
else
return 0
end
end,
input_inventory="dst"}
furnace.after_place_node= function(pos)
tube_scanforobjects(pos)
end
furnace.after_dig_node = function(pos)
tube_scanforobjects(pos)
end
minetest.register_node(":default:furnace",furnace)
furnace=clone_node("default:furnace_active")
furnace.groups.tubedevice=1
furnace.groups.tubedevice_receiver=1
furnace.tube={insert_object=function(pos,node,stack,direction)
local meta=minetest.env:get_meta(pos)
local inv=meta:get_inventory()
if direction.y==1 then
return inv:add_item("fuel",stack)
else
return inv:add_item("src",stack)
end
end,
can_insert=function(pos,node,stack,direction)
local meta=minetest.env:get_meta(pos)
local inv=meta:get_inventory()
if direction.y==1 then
return inv:room_for_item("fuel",stack)
elseif direction.y==-1 then
return inv:room_for_item("src",stack)
else
return 0
end
end,
input_inventory="dst"}
furnace.after_place_node= function(pos)
tube_scanforobjects(pos)
end
furnace.after_dig_node = function(pos)
tube_scanforobjects(pos)
end
minetest.register_node(":default:furnace_active",furnace)
chest=clone_node("default:chest")
chest.groups.tubedevice=1
chest.groups.tubedevice_receiver=1
chest.tube={insert_object=function(pos,node,stack,direction)
local meta=minetest.env:get_meta(pos)
local inv=meta:get_inventory()
return inv:add_item("main",stack)
end,
can_insert=function(pos,node,stack,direction)
local meta=minetest.env:get_meta(pos)
local inv=meta:get_inventory()
return inv:room_for_item("main",stack)
end,
input_inventory="main"}
chest.after_place_node = tube_scanforobjects(pos)
chest.after_dig_node = tube_scanforobjects
minetest.register_node(":default:chest",chest)