summaryrefslogtreecommitdiff
path: root/compat.lua
blob: 6113815899a0440248a2a1ac292550e5f51a5fdd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124


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.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.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.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.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.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.get_meta(pos)
		local inv=meta:get_inventory()
		return inv:room_for_item("main",stack)
	end,
	input_inventory="main"}
	chest.after_place_node = function(pos)
		tube_scanforobjects(pos)
	end
	chest.after_dig_node = function(pos)
		tube_scanforobjects(pos)
	end

minetest.register_node(":default:chest",chest)


chest_locked=clone_node("default:chest_locked")
	chest_locked.groups.tubedevice=1
	chest_locked.groups.tubedevice_receiver=1
	chest_locked.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}
  local old_after_place = minetest.registered_nodes["default:chest_locked"].after_place_node;
	chest_locked.after_place_node = function(pos, placer)
		tube_scanforobjects(pos)
    old_after_place(pos, placer)
	end
	chest_locked.after_dig_node = function(pos)
		tube_scanforobjects(pos)
	end

minetest.register_node(":default:chest_locked",chest_locked)