moved pipes out of init.lua and into a separate file.
some minor formatting changes
--- /dev/null
+-- Various settings
+
+enable_pipes = true
+enable_autocrafter = true
+enable_deployer = true
+enable_node_breaker = true
+enable_teleport_tube = true
+enable_pipe_devices = true
+enable_redefines = true
+enable_mese_tube = true
+enable_detector_tube = true
+enable_conductor_tube = true
+enable_accelerator_tube = true
+enable_crossing_tube = true
+enable_sand_tube = true
+enable_mese_sand_tube = true
+
end
local pumpboxes = {}
- pipe_addbox(pumpboxes, pipe_pumpbody)
- pipe_addbox(pumpboxes, pipe_topstub)
+ pipeworks_add_pipebox(pumpboxes, pipe_pumpbody)
+ pipeworks_add_pipebox(pumpboxes, pipe_topstub)
minetest.register_node("pipeworks:pump_"..states[s], {
description = "Pump/Intake Module",
})
local valveboxes = {}
- pipe_addbox(valveboxes, pipe_leftstub)
- pipe_addbox(valveboxes, pipe_valvebody)
+ pipeworks_add_pipebox(valveboxes, pipe_leftstub)
+ pipeworks_add_pipebox(valveboxes, pipe_valvebody)
if states[s] == "off" then
- pipe_addbox(valveboxes, pipe_valvehandle_off)
+ pipeworks_add_pipebox(valveboxes, pipe_valvehandle_off)
else
- pipe_addbox(valveboxes, pipe_valvehandle_on)
+ pipeworks_add_pipebox(valveboxes, pipe_valvehandle_on)
end
- pipe_addbox(valveboxes, pipe_rightstub)
+ pipeworks_add_pipebox(valveboxes, pipe_rightstub)
local tilex = "pipeworks_valvebody_ends.png"
local tilez = "pipeworks_valvebody_sides.png"
end
local valveboxes = {}
-pipe_addbox(valveboxes, pipe_leftstub)
-pipe_addbox(valveboxes, pipe_valvebody)
-pipe_addbox(valveboxes, pipe_rightstub)
-pipe_addbox(valveboxes, pipe_valvehandle_on)
+pipeworks_add_pipebox(valveboxes, pipe_leftstub)
+pipeworks_add_pipebox(valveboxes, pipe_valvebody)
+pipeworks_add_pipebox(valveboxes, pipe_rightstub)
+pipeworks_add_pipebox(valveboxes, pipe_valvehandle_on)
minetest.register_node("pipeworks:valve_on_loaded", {
description = "Valve",
-- outlet spigot
local spigotboxes = {}
- pipe_addbox(spigotboxes, pipe_backstub)
- pipe_addbox(spigotboxes, spigot_bottomstub)
- pipe_addbox(spigotboxes, pipe_bendsphere)
+ pipeworks_add_pipebox(spigotboxes, pipe_backstub)
+ pipeworks_add_pipebox(spigotboxes, spigot_bottomstub)
+ pipeworks_add_pipebox(spigotboxes, pipe_bendsphere)
local spigotboxes_pouring = {}
- pipe_addbox(spigotboxes_pouring, spigot_stream)
- pipe_addbox(spigotboxes_pouring, pipe_backstub)
- pipe_addbox(spigotboxes_pouring, spigot_bottomstub)
- pipe_addbox(spigotboxes_pouring, pipe_bendsphere)
+ pipeworks_add_pipebox(spigotboxes_pouring, spigot_stream)
+ pipeworks_add_pipebox(spigotboxes_pouring, pipe_backstub)
+ pipeworks_add_pipebox(spigotboxes_pouring, spigot_bottomstub)
+ pipeworks_add_pipebox(spigotboxes_pouring, pipe_bendsphere)
minetest.register_node("pipeworks:spigot", {
description = "Spigot outlet",
-- wall, for use in places where walls should look like they're airtight)
local airtightboxes = {}
-pipe_addbox(airtightboxes, pipe_frontstub)
-pipe_addbox(airtightboxes, pipe_backstub)
-pipe_addbox(airtightboxes, entry_panel)
+pipeworks_add_pipebox(airtightboxes, pipe_frontstub)
+pipeworks_add_pipebox(airtightboxes, pipe_backstub)
+pipeworks_add_pipebox(airtightboxes, entry_panel)
minetest.register_node("pipeworks:entry_panel_empty", {
description = "Airtight Pipe entry/exit",
})
local sensorboxes = {}
-pipe_addbox(sensorboxes, pipe_leftstub)
-pipe_addbox(sensorboxes, pipe_sensorbody)
-pipe_addbox(sensorboxes, pipe_rightstub)
+pipeworks_add_pipebox(sensorboxes, pipe_leftstub)
+pipeworks_add_pipebox(sensorboxes, pipe_sensorbody)
+pipeworks_add_pipebox(sensorboxes, pipe_rightstub)
minetest.register_node("pipeworks:flow_sensor_empty", {
description = "Flow Sensor",
-- This file provides the actual flow and pathfinding logic that makes water
-- move through the pipes.
--
--- Contributed by mauvebic, 2013-01-03, with tweaks by Vanessa Ezekowitz
+-- Contributed by mauvebic, 2013-01-03, rewritten a bit by Vanessa Ezekowitz
--
local finitewater = minetest.setting_getbool("liquid_finite")
-local check4liquids = function(pos)
+pipeworks_check_for_liquids = function(pos)
local coords = {
{x=pos.x,y=pos.y-1,z=pos.z},
{x=pos.x,y=pos.y+1,z=pos.z},
return false
end
-local check4inflows = function(pos,node)
+pipeworks_check_for_inflows = function(pos,node)
local coords = {
{x=pos.x,y=pos.y-1,z=pos.z},
{x=pos.x,y=pos.y+1,z=pos.z},
for i =1,6 do
if newnode then break end
local name = minetest.get_node(coords[i]).name
- if (name == "pipeworks:pump_on" and check4liquids(coords[i])) or string.find(name,"_loaded") then
+ if (name == "pipeworks:pump_on" and pipeworks_check_for_liquids(coords[i])) or string.find(name,"_loaded") then
if string.find(name,"_loaded") then
local source = minetest.get_meta(coords[i]):get_string("source")
if source == minetest.pos_to_string(pos) then break end
end
end
-local checksources = function(pos,node)
+pipeworks_check_sources = function(pos,node)
local sourcepos = minetest.string_to_pos(minetest.get_meta(pos):get_string("source"))
if not sourcepos then return end
local source = minetest.get_node(sourcepos).name
local newnode = false
- if not ((source == "pipeworks:pump_on" and check4liquids(sourcepos)) or string.find(source,"_loaded") or source == "ignore" ) then
+ if not ((source == "pipeworks:pump_on" and pipeworks_check_for_liquids(sourcepos)) or string.find(source,"_loaded") or source == "ignore" ) then
newnode = string.gsub(node.name,"loaded","empty")
end
end
end
-local spigot_check = function(pos, node)
+pipeworks_spigot_check = function(pos, node)
local belowname = minetest.get_node({x=pos.x,y=pos.y-1,z=pos.z}).name
if belowname == "air" or belowname == "default:water_flowing" or belowname == "default:water_source" then
local spigotname = minetest.get_node(pos).name
end
end
-table.insert(pipes_empty_nodenames,"pipeworks:valve_on_empty")
-table.insert(pipes_empty_nodenames,"pipeworks:valve_off_empty")
-table.insert(pipes_empty_nodenames,"pipeworks:entry_panel_empty")
-table.insert(pipes_empty_nodenames,"pipeworks:flow_sensor_empty")
-
-table.insert(pipes_full_nodenames,"pipeworks:valve_on_loaded")
-table.insert(pipes_full_nodenames,"pipeworks:entry_panel_loaded")
-table.insert(pipes_full_nodenames,"pipeworks:flow_sensor_loaded")
-
-minetest.register_abm({
- nodenames = pipes_empty_nodenames,
- interval = 1,
- chance = 1,
- action = function(pos, node, active_object_count, active_object_count_wider) check4inflows(pos,node) end
-})
-
-minetest.register_abm({
- nodenames = pipes_full_nodenames,
- interval = 1,
- chance = 1,
- action = function(pos, node, active_object_count, active_object_count_wider) checksources(pos,node) end
-})
-
-minetest.register_abm({
- nodenames = {"pipeworks:spigot","pipeworks:spigot_pouring"},
- interval = 1,
- chance = 1,
- action = function(pos, node, active_object_count, active_object_count_wider)
- spigot_check(pos,node)
- end
-})
--- Pipeworks mod by Vanessa Ezekowitz - 2012-08-05
+-- Pipeworks mod by Vanessa Ezekowitz - 2013-07-13
--
--- Entirely my own code. This mod supplies various shapes of pipes
--- and devices that they can connect to such as pumps, valves, etc.
--- All pipes autoconnect as you lay them out, and devices will auto-
--- connect to them.
+-- This mod supplies various steel pipes and plastic pneumatic tubes
+-- and devices that they can connect to.
--
-- License: WTFPL
--
-minetest.register_alias("pipeworks:pipe", "pipeworks:pipe_110000_empty")
-local DEBUG = false
-local CYCLIC = true
-
-pipeworks_liquid_texture = "default_water.png"
-
-pipe_leftstub = {
- { -32/64, -2/64, -6/64, 1/64, 2/64, 6/64 }, -- pipe segment against -X face
- { -32/64, -4/64, -5/64, 1/64, 4/64, 5/64 },
- { -32/64, -5/64, -4/64, 1/64, 5/64, 4/64 },
- { -32/64, -6/64, -2/64, 1/64, 6/64, 2/64 },
-
- { -32/64, -3/64, -8/64, -30/64, 3/64, 8/64 }, -- (the flange for it)
- { -32/64, -5/64, -7/64, -30/64, 5/64, 7/64 },
- { -32/64, -6/64, -6/64, -30/64, 6/64, 6/64 },
- { -32/64, -7/64, -5/64, -30/64, 7/64, 5/64 },
- { -32/64, -8/64, -3/64, -30/64, 8/64, 3/64 }
-}
-
-pipe_rightstub = {
- { -1/64, -2/64, -6/64, 32/64, 2/64, 6/64 }, -- pipe segment against +X face
- { -1/64, -4/64, -5/64, 32/64, 4/64, 5/64 },
- { -1/64, -5/64, -4/64, 32/64, 5/64, 4/64 },
- { -1/64, -6/64, -2/64, 32/64, 6/64, 2/64 },
-
- { 30/64, -3/64, -8/64, 32/64, 3/64, 8/64 }, -- (the flange for it)
- { 30/64, -5/64, -7/64, 32/64, 5/64, 7/64 },
- { 30/64, -6/64, -6/64, 32/64, 6/64, 6/64 },
- { 30/64, -7/64, -5/64, 32/64, 7/64, 5/64 },
- { 30/64, -8/64, -3/64, 32/64, 8/64, 3/64 }
-}
-
-pipe_bottomstub = {
- { -2/64, -32/64, -6/64, 2/64, 1/64, 6/64 }, -- pipe segment against -Y face
- { -4/64, -32/64, -5/64, 4/64, 1/64, 5/64 },
- { -5/64, -32/64, -4/64, 5/64, 1/64, 4/64 },
- { -6/64, -32/64, -2/64, 6/64, 1/64, 2/64 },
-
- { -3/64, -32/64, -8/64, 3/64, -30/64, 8/64 }, -- (the flange for it)
- { -5/64, -32/64, -7/64, 5/64, -30/64, 7/64 },
- { -6/64, -32/64, -6/64, 6/64, -30/64, 6/64 },
- { -7/64, -32/64, -5/64, 7/64, -30/64, 5/64 },
- { -8/64, -32/64, -3/64, 8/64, -30/64, 3/64 }
-}
+-- Copy and/or read the config file
+local worldpath = minetest.get_worldpath()
+local modpath = minetest.get_modpath("pipeworks")
-pipe_topstub = {
- { -2/64, -1/64, -6/64, 2/64, 32/64, 6/64 }, -- pipe segment against +Y face
- { -4/64, -1/64, -5/64, 4/64, 32/64, 5/64 },
- { -5/64, -1/64, -4/64, 5/64, 32/64, 4/64 },
- { -6/64, -1/64, -2/64, 6/64, 32/64, 2/64 },
-
- { -3/64, 30/64, -8/64, 3/64, 32/64, 8/64 }, -- (the flange for it)
- { -5/64, 30/64, -7/64, 5/64, 32/64, 7/64 },
- { -6/64, 30/64, -6/64, 6/64, 32/64, 6/64 },
- { -7/64, 30/64, -5/64, 7/64, 32/64, 5/64 },
- { -8/64, 30/64, -3/64, 8/64, 32/64, 3/64 }
-}
-
-pipe_frontstub = {
- { -6/64, -2/64, -32/64, 6/64, 2/64, 1/64 }, -- pipe segment against -Z face
- { -5/64, -4/64, -32/64, 5/64, 4/64, 1/64 },
- { -4/64, -5/64, -32/64, 4/64, 5/64, 1/64 },
- { -2/64, -6/64, -32/64, 2/64, 6/64, 1/64 },
-
- { -8/64, -3/64, -32/64, 8/64, 3/64, -30/64 }, -- (the flange for it)
- { -7/64, -5/64, -32/64, 7/64, 5/64, -30/64 },
- { -6/64, -6/64, -32/64, 6/64, 6/64, -30/64 },
- { -5/64, -7/64, -32/64, 5/64, 7/64, -30/64 },
- { -3/64, -8/64, -32/64, 3/64, 8/64, -30/64 }
-}
+if io.open(worldpath.."/pipeworks_settings.txt","r") == nil then
-pipe_backstub = {
- { -6/64, -2/64, -1/64, 6/64, 2/64, 32/64 }, -- pipe segment against -Z face
- { -5/64, -4/64, -1/64, 5/64, 4/64, 32/64 },
- { -4/64, -5/64, -1/64, 4/64, 5/64, 32/64 },
- { -2/64, -6/64, -1/64, 2/64, 6/64, 32/64 },
+ dofile(modpath.."/default_settings.txt")
- { -8/64, -3/64, 30/64, 8/64, 3/64, 32/64 }, -- (the flange for it)
- { -7/64, -5/64, 30/64, 7/64, 5/64, 32/64 },
- { -6/64, -6/64, 30/64, 6/64, 6/64, 32/64 },
- { -5/64, -7/64, 30/64, 5/64, 7/64, 32/64 },
- { -3/64, -8/64, 30/64, 3/64, 8/64, 32/64 }
-}
+ io.input(modpath.."/default_settings.txt")
+ io.output(worldpath.."/pipeworks_settings.txt")
-pipe_selectboxes = {
- { -32/64, -8/64, -8/64, 8/64, 8/64, 8/64 },
- { -8/64 , -8/64, -8/64, 32/64, 8/64, 8/64 },
- { -8/64 , -32/64, -8/64, 8/64, 8/64, 8/64 },
- { -8/64 , -8/64, -8/64, 8/64, 32/64, 8/64 },
- { -8/64 , -8/64, -32/64, 8/64, 8/64, 8/64 },
- { -8/64 , -8/64, -8/64, 8/64, 8/64, 32/64 }
-}
+ local size = 2^13 -- good buffer size (8K)
+ while true do
+ local block = io.read(size)
+ if not block then break end
+ io.write(block)
+ end
-pipe_bendsphere = {
- { -4/64, -4/64, -4/64, 4/64, 4/64, 4/64 },
- { -5/64, -3/64, -3/64, 5/64, 3/64, 3/64 },
- { -3/64, -5/64, -3/64, 3/64, 5/64, 3/64 },
- { -3/64, -3/64, -5/64, 3/64, 3/64, 5/64 }
-}
+else
+ dofile(worldpath.."/pipeworks_settings.txt")
+end
--- Functions
+-- Helper functions
if minetest.get_modpath("unified_inventory") or not minetest.setting_getbool("creative_mode") then
pipeworks_expect_infinite_stacks = false
pipeworks_expect_infinite_stacks = true
end
-dbg = function(s)
- if DEBUG then
- print('[PIPEWORKS] ' .. s)
- end
-end
-
-function pipes_fix_image_names(table, replacement)
+function pipeworks_fix_image_names(table, replacement)
outtable={}
for i in ipairs(table) do
outtable[i]=string.gsub(table[i], "_XXXXX", replacement)
return outtable
end
-function pipe_addbox(t, b)
+function pipeworks_add_pipebox(t, b)
for i in ipairs(b)
do table.insert(t, b[i])
end
end
end
--- now define the nodes!
-
-pipes_empty_nodenames = {}
-pipes_full_nodenames = {}
-
-for xm = 0, 1 do
-for xp = 0, 1 do
-for ym = 0, 1 do
-for yp = 0, 1 do
-for zm = 0, 1 do
-for zp = 0, 1 do
- local outboxes = {}
- local outsel = {}
- local outimgs = {}
-
- if yp==1 then
- pipe_addbox(outboxes, pipe_topstub)
- table.insert(outsel, pipe_selectboxes[4])
- table.insert(outimgs, "pipeworks_pipe_end.png")
- else
- table.insert(outimgs, "pipeworks_plain.png")
- end
- if ym==1 then
- pipe_addbox(outboxes, pipe_bottomstub)
- table.insert(outsel, pipe_selectboxes[3])
- table.insert(outimgs, "pipeworks_pipe_end.png")
- else
- table.insert(outimgs, "pipeworks_plain.png")
- end
- if xp==1 then
- pipe_addbox(outboxes, pipe_rightstub)
- table.insert(outsel, pipe_selectboxes[2])
- table.insert(outimgs, "pipeworks_pipe_end.png")
- else
- table.insert(outimgs, "pipeworks_plain.png")
- end
- if xm==1 then
- pipe_addbox(outboxes, pipe_leftstub)
- table.insert(outsel, pipe_selectboxes[1])
- table.insert(outimgs, "pipeworks_pipe_end.png")
- else
- table.insert(outimgs, "pipeworks_plain.png")
- end
- if zp==1 then
- pipe_addbox(outboxes, pipe_backstub)
- table.insert(outsel, pipe_selectboxes[6])
- table.insert(outimgs, "pipeworks_pipe_end.png")
- else
- table.insert(outimgs, "pipeworks_plain.png")
- end
- if zm==1 then
- pipe_addbox(outboxes, pipe_frontstub)
- table.insert(outsel, pipe_selectboxes[5])
- table.insert(outimgs, "pipeworks_pipe_end.png")
- else
- table.insert(outimgs, "pipeworks_plain.png")
- end
-
- local jx = xp+xm
- local jy = yp+ym
- local jz = zp+zm
-
- if (jx+jy+jz) == 1 then
- if xm == 1 then
- table.remove(outimgs, 3)
- table.insert(outimgs, 3, "^pipeworks_plain.png")
+function pipeworks_replace_name(tbl,tr,name)
+ local ntbl={}
+ for key,i in pairs(tbl) do
+ if type(i)=="string" then
+ ntbl[key]=string.gsub(i,tr,name)
+ elseif type(i)=="table" then
+ ntbl[key]=pipeworks_replace_name(i,tr,name)
+ else
+ ntbl[key]=i
end
- if xp == 1 then
- table.remove(outimgs, 4)
- table.insert(outimgs, 4, "^pipeworks_plain.png")
- end
- if ym == 1 then
- table.remove(outimgs, 1)
- table.insert(outimgs, 1, "^pipeworks_plain.png")
- end
- if xp == 1 then
- table.remove(outimgs, 2)
- table.insert(outimgs, 2, "^pipeworks_plain.png")
- end
- if zm == 1 then
- table.remove(outimgs, 5)
- table.insert(outimgs, 5, "^pipeworks_plain.png")
- end
- if zp == 1 then
- table.remove(outimgs, 6)
- table.insert(outimgs, 6, "^pipeworks_plain.png")
- end
- end
-
- if jx+jy+jz >= 2 then
- pipe_addbox(outboxes, pipe_bendsphere)
- end
-
- if (jx==2 and jy~=2 and jz~=2) then
- table.remove(outimgs, 5)
- table.remove(outimgs, 5)
- table.insert(outimgs, 5, pipeworks_liquid_texture.."^pipeworks_windowed_XXXXX.png")
- table.insert(outimgs, 5, pipeworks_liquid_texture.."^pipeworks_windowed_XXXXX.png")
end
-
- if (jx~=2 and jy~=2 and jz==2) or (jx~=2 and jy==2 and jz~=2) then
- table.remove(outimgs, 3)
- table.remove(outimgs, 3)
- table.insert(outimgs, 3, pipeworks_liquid_texture.."^pipeworks_windowed_XXXXX.png")
- table.insert(outimgs, 3, pipeworks_liquid_texture.."^pipeworks_windowed_XXXXX.png")
- end
-
- local pname = xm..xp..ym..yp..zm..zp
- local pgroups = ""
-
- if pname ~= "110000" then
- pgroups = {snappy=3, pipe=1, not_in_creative_inventory=1}
- pipedesc = "Pipe segment (empty, "..pname..")... You hacker, you."
- image = "pipeworks_plain.png"
- else
- pgroups = {snappy=3, pipe=1}
- pipedesc = "Pipe segment"
- image = nil
- end
-
- minetest.register_node("pipeworks:pipe_"..pname.."_empty", {
- description = pipedesc,
- drawtype = "nodebox",
- tiles = pipes_fix_image_names(outimgs, "_empty"),
- inventory_image = image,
- sunlight_propagates=true,
- paramtype = "light",
- selection_box = {
- type = "fixed",
- fixed = outsel
- },
- node_box = {
- type = "fixed",
- fixed = outboxes
- },
- groups = pgroups,
- sounds = default.node_sound_wood_defaults(),
- walkable = true,
- drop = "pipeworks:pipe_110000_empty",
- after_place_node = function(pos)
- pipe_scanforobjects(pos)
- end,
- after_dig_node = function(pos)
- pipe_scanforobjects(pos)
- end,
- })
-
- minetest.register_node("pipeworks:pipe_"..pname.."_loaded", {
- description = "Pipe segment (loaded, "..pname..")... You hacker, you.",
- drawtype = "nodebox",
- tiles = pipes_fix_image_names(outimgs, "_loaded"),
- inventory_image = image,
- sunlight_propagates = true,
- paramtype = "light",
- selection_box = {
- type = "fixed",
- fixed = outsel
- },
- node_box = {
- type = "fixed",
- fixed = outboxes
- },
- groups = {snappy=3, pipe=1, not_in_creative_inventory=1},
- sounds = default.node_sound_wood_defaults(),
- walkable = true,
- drop = "pipeworks:pipe_110000_empty",
- after_place_node = function(pos)
- pipe_scanforobjects(pos)
- end,
- after_dig_node = function(pos)
- pipe_scanforobjects(pos)
- end
- })
- table.insert(pipes_empty_nodenames,"pipeworks:pipe_"..pname.."_empty") -- for the abms
- table.insert(pipes_full_nodenames,"pipeworks:pipe_"..pname.."_loaded") -- for bacon
-end
-end
-end
-end
-end
+ return ntbl
end
-local modpath = minetest.get_modpath("pipeworks")
+-- Load the various parts of the mod
-dofile(modpath.."/tubes.lua")
-dofile(modpath.."/teleport_tube.lua")
-dofile(modpath.."/devices.lua")
dofile(modpath.."/autoplace.lua")
-dofile(modpath.."/crafts.lua")
-dofile(modpath.."/flowing_logic.lua")
-dofile(modpath.."/compat.lua")
dofile(modpath.."/item_transport.lua")
-dofile(modpath.."/autocrafter.lua")
-dofile(modpath.."/deployer.lua")
-dofile(modpath.."/node_breaker.lua")
+dofile(modpath.."/flowing_logic.lua")
+dofile(modpath.."/crafts.lua")
+
+dofile(modpath.."/tubes.lua")
+
+if enable_pipes then dofile(modpath.."/pipes.lua") end
+if enable_teleport_tube then dofile(modpath.."/teleport_tube.lua") end
+if enable_pipe_devices then dofile(modpath.."/devices.lua") end
+if enable_redefines then dofile(modpath.."/compat.lua") end
+if enable_autocrafter then dofile(modpath.."/autocrafter.lua") end
+if enable_deployer then dofile(modpath.."/deployer.lua") end
+if enable_node_breaker then dofile(modpath.."/node_breaker.lua") end
+
+minetest.register_alias("pipeworks:pipe", "pipeworks:pipe_110000_empty")
+local DEBUG = false
+local CYCLIC = true
print("Pipeworks loaded!")
--- /dev/null
+pipeworks_liquid_texture = "default_water.png"
+
+pipe_leftstub = {
+ { -32/64, -2/64, -6/64, 1/64, 2/64, 6/64 }, -- pipe segment against -X face
+ { -32/64, -4/64, -5/64, 1/64, 4/64, 5/64 },
+ { -32/64, -5/64, -4/64, 1/64, 5/64, 4/64 },
+ { -32/64, -6/64, -2/64, 1/64, 6/64, 2/64 },
+
+ { -32/64, -3/64, -8/64, -30/64, 3/64, 8/64 }, -- (the flange for it)
+ { -32/64, -5/64, -7/64, -30/64, 5/64, 7/64 },
+ { -32/64, -6/64, -6/64, -30/64, 6/64, 6/64 },
+ { -32/64, -7/64, -5/64, -30/64, 7/64, 5/64 },
+ { -32/64, -8/64, -3/64, -30/64, 8/64, 3/64 }
+}
+
+pipe_rightstub = {
+ { -1/64, -2/64, -6/64, 32/64, 2/64, 6/64 }, -- pipe segment against +X face
+ { -1/64, -4/64, -5/64, 32/64, 4/64, 5/64 },
+ { -1/64, -5/64, -4/64, 32/64, 5/64, 4/64 },
+ { -1/64, -6/64, -2/64, 32/64, 6/64, 2/64 },
+
+ { 30/64, -3/64, -8/64, 32/64, 3/64, 8/64 }, -- (the flange for it)
+ { 30/64, -5/64, -7/64, 32/64, 5/64, 7/64 },
+ { 30/64, -6/64, -6/64, 32/64, 6/64, 6/64 },
+ { 30/64, -7/64, -5/64, 32/64, 7/64, 5/64 },
+ { 30/64, -8/64, -3/64, 32/64, 8/64, 3/64 }
+}
+
+pipe_bottomstub = {
+ { -2/64, -32/64, -6/64, 2/64, 1/64, 6/64 }, -- pipe segment against -Y face
+ { -4/64, -32/64, -5/64, 4/64, 1/64, 5/64 },
+ { -5/64, -32/64, -4/64, 5/64, 1/64, 4/64 },
+ { -6/64, -32/64, -2/64, 6/64, 1/64, 2/64 },
+
+ { -3/64, -32/64, -8/64, 3/64, -30/64, 8/64 }, -- (the flange for it)
+ { -5/64, -32/64, -7/64, 5/64, -30/64, 7/64 },
+ { -6/64, -32/64, -6/64, 6/64, -30/64, 6/64 },
+ { -7/64, -32/64, -5/64, 7/64, -30/64, 5/64 },
+ { -8/64, -32/64, -3/64, 8/64, -30/64, 3/64 }
+}
+
+
+pipe_topstub = {
+ { -2/64, -1/64, -6/64, 2/64, 32/64, 6/64 }, -- pipe segment against +Y face
+ { -4/64, -1/64, -5/64, 4/64, 32/64, 5/64 },
+ { -5/64, -1/64, -4/64, 5/64, 32/64, 4/64 },
+ { -6/64, -1/64, -2/64, 6/64, 32/64, 2/64 },
+
+ { -3/64, 30/64, -8/64, 3/64, 32/64, 8/64 }, -- (the flange for it)
+ { -5/64, 30/64, -7/64, 5/64, 32/64, 7/64 },
+ { -6/64, 30/64, -6/64, 6/64, 32/64, 6/64 },
+ { -7/64, 30/64, -5/64, 7/64, 32/64, 5/64 },
+ { -8/64, 30/64, -3/64, 8/64, 32/64, 3/64 }
+}
+
+pipe_frontstub = {
+ { -6/64, -2/64, -32/64, 6/64, 2/64, 1/64 }, -- pipe segment against -Z face
+ { -5/64, -4/64, -32/64, 5/64, 4/64, 1/64 },
+ { -4/64, -5/64, -32/64, 4/64, 5/64, 1/64 },
+ { -2/64, -6/64, -32/64, 2/64, 6/64, 1/64 },
+
+ { -8/64, -3/64, -32/64, 8/64, 3/64, -30/64 }, -- (the flange for it)
+ { -7/64, -5/64, -32/64, 7/64, 5/64, -30/64 },
+ { -6/64, -6/64, -32/64, 6/64, 6/64, -30/64 },
+ { -5/64, -7/64, -32/64, 5/64, 7/64, -30/64 },
+ { -3/64, -8/64, -32/64, 3/64, 8/64, -30/64 }
+}
+
+pipe_backstub = {
+ { -6/64, -2/64, -1/64, 6/64, 2/64, 32/64 }, -- pipe segment against -Z face
+ { -5/64, -4/64, -1/64, 5/64, 4/64, 32/64 },
+ { -4/64, -5/64, -1/64, 4/64, 5/64, 32/64 },
+ { -2/64, -6/64, -1/64, 2/64, 6/64, 32/64 },
+
+ { -8/64, -3/64, 30/64, 8/64, 3/64, 32/64 }, -- (the flange for it)
+ { -7/64, -5/64, 30/64, 7/64, 5/64, 32/64 },
+ { -6/64, -6/64, 30/64, 6/64, 6/64, 32/64 },
+ { -5/64, -7/64, 30/64, 5/64, 7/64, 32/64 },
+ { -3/64, -8/64, 30/64, 3/64, 8/64, 32/64 }
+}
+
+pipe_selectboxes = {
+ { -32/64, -8/64, -8/64, 8/64, 8/64, 8/64 },
+ { -8/64 , -8/64, -8/64, 32/64, 8/64, 8/64 },
+ { -8/64 , -32/64, -8/64, 8/64, 8/64, 8/64 },
+ { -8/64 , -8/64, -8/64, 8/64, 32/64, 8/64 },
+ { -8/64 , -8/64, -32/64, 8/64, 8/64, 8/64 },
+ { -8/64 , -8/64, -8/64, 8/64, 8/64, 32/64 }
+}
+
+pipe_bendsphere = {
+ { -4/64, -4/64, -4/64, 4/64, 4/64, 4/64 },
+ { -5/64, -3/64, -3/64, 5/64, 3/64, 3/64 },
+ { -3/64, -5/64, -3/64, 3/64, 5/64, 3/64 },
+ { -3/64, -3/64, -5/64, 3/64, 3/64, 5/64 }
+}
+
+-- now define the nodes!
+
+pipes_empty_nodenames = {}
+pipes_full_nodenames = {}
+
+for xm = 0, 1 do
+for xp = 0, 1 do
+for ym = 0, 1 do
+for yp = 0, 1 do
+for zm = 0, 1 do
+for zp = 0, 1 do
+ local outboxes = {}
+ local outsel = {}
+ local outimgs = {}
+
+ if yp==1 then
+ pipeworks_add_pipebox(outboxes, pipe_topstub)
+ table.insert(outsel, pipe_selectboxes[4])
+ table.insert(outimgs, "pipeworks_pipe_end.png")
+ else
+ table.insert(outimgs, "pipeworks_plain.png")
+ end
+ if ym==1 then
+ pipeworks_add_pipebox(outboxes, pipe_bottomstub)
+ table.insert(outsel, pipe_selectboxes[3])
+ table.insert(outimgs, "pipeworks_pipe_end.png")
+ else
+ table.insert(outimgs, "pipeworks_plain.png")
+ end
+ if xp==1 then
+ pipeworks_add_pipebox(outboxes, pipe_rightstub)
+ table.insert(outsel, pipe_selectboxes[2])
+ table.insert(outimgs, "pipeworks_pipe_end.png")
+ else
+ table.insert(outimgs, "pipeworks_plain.png")
+ end
+ if xm==1 then
+ pipeworks_add_pipebox(outboxes, pipe_leftstub)
+ table.insert(outsel, pipe_selectboxes[1])
+ table.insert(outimgs, "pipeworks_pipe_end.png")
+ else
+ table.insert(outimgs, "pipeworks_plain.png")
+ end
+ if zp==1 then
+ pipeworks_add_pipebox(outboxes, pipe_backstub)
+ table.insert(outsel, pipe_selectboxes[6])
+ table.insert(outimgs, "pipeworks_pipe_end.png")
+ else
+ table.insert(outimgs, "pipeworks_plain.png")
+ end
+ if zm==1 then
+ pipeworks_add_pipebox(outboxes, pipe_frontstub)
+ table.insert(outsel, pipe_selectboxes[5])
+ table.insert(outimgs, "pipeworks_pipe_end.png")
+ else
+ table.insert(outimgs, "pipeworks_plain.png")
+ end
+
+ local jx = xp+xm
+ local jy = yp+ym
+ local jz = zp+zm
+
+ if (jx+jy+jz) == 1 then
+ if xm == 1 then
+ table.remove(outimgs, 3)
+ table.insert(outimgs, 3, "^pipeworks_plain.png")
+ end
+ if xp == 1 then
+ table.remove(outimgs, 4)
+ table.insert(outimgs, 4, "^pipeworks_plain.png")
+ end
+ if ym == 1 then
+ table.remove(outimgs, 1)
+ table.insert(outimgs, 1, "^pipeworks_plain.png")
+ end
+ if xp == 1 then
+ table.remove(outimgs, 2)
+ table.insert(outimgs, 2, "^pipeworks_plain.png")
+ end
+ if zm == 1 then
+ table.remove(outimgs, 5)
+ table.insert(outimgs, 5, "^pipeworks_plain.png")
+ end
+ if zp == 1 then
+ table.remove(outimgs, 6)
+ table.insert(outimgs, 6, "^pipeworks_plain.png")
+ end
+ end
+
+ if jx+jy+jz >= 2 then
+ pipeworks_add_pipebox(outboxes, pipe_bendsphere)
+ end
+
+ if (jx==2 and jy~=2 and jz~=2) then
+ table.remove(outimgs, 5)
+ table.remove(outimgs, 5)
+ table.insert(outimgs, 5, pipeworks_liquid_texture.."^pipeworks_windowed_XXXXX.png")
+ table.insert(outimgs, 5, pipeworks_liquid_texture.."^pipeworks_windowed_XXXXX.png")
+ end
+
+ if (jx~=2 and jy~=2 and jz==2) or (jx~=2 and jy==2 and jz~=2) then
+ table.remove(outimgs, 3)
+ table.remove(outimgs, 3)
+ table.insert(outimgs, 3, pipeworks_liquid_texture.."^pipeworks_windowed_XXXXX.png")
+ table.insert(outimgs, 3, pipeworks_liquid_texture.."^pipeworks_windowed_XXXXX.png")
+ end
+
+ local pname = xm..xp..ym..yp..zm..zp
+ local pgroups = ""
+
+ if pname ~= "110000" then
+ pgroups = {snappy=3, pipe=1, not_in_creative_inventory=1}
+ pipedesc = "Pipe segment (empty, "..pname..")... You hacker, you."
+ image = "pipeworks_plain.png"
+ else
+ pgroups = {snappy=3, pipe=1}
+ pipedesc = "Pipe segment"
+ image = nil
+ end
+
+ minetest.register_node("pipeworks:pipe_"..pname.."_empty", {
+ description = pipedesc,
+ drawtype = "nodebox",
+ tiles = pipeworks_fix_image_names(outimgs, "_empty"),
+ inventory_image = image,
+ sunlight_propagates=true,
+ paramtype = "light",
+ selection_box = {
+ type = "fixed",
+ fixed = outsel
+ },
+ node_box = {
+ type = "fixed",
+ fixed = outboxes
+ },
+ groups = pgroups,
+ sounds = default.node_sound_wood_defaults(),
+ walkable = true,
+ drop = "pipeworks:pipe_110000_empty",
+ after_place_node = function(pos)
+ pipe_scanforobjects(pos)
+ end,
+ after_dig_node = function(pos)
+ pipe_scanforobjects(pos)
+ end,
+ })
+
+ minetest.register_node("pipeworks:pipe_"..pname.."_loaded", {
+ description = "Pipe segment (loaded, "..pname..")... You hacker, you.",
+ drawtype = "nodebox",
+ tiles = pipeworks_fix_image_names(outimgs, "_loaded"),
+ inventory_image = image,
+ sunlight_propagates = true,
+ paramtype = "light",
+ selection_box = {
+ type = "fixed",
+ fixed = outsel
+ },
+ node_box = {
+ type = "fixed",
+ fixed = outboxes
+ },
+ groups = {snappy=3, pipe=1, not_in_creative_inventory=1},
+ sounds = default.node_sound_wood_defaults(),
+ walkable = true,
+ drop = "pipeworks:pipe_110000_empty",
+ after_place_node = function(pos)
+ pipe_scanforobjects(pos)
+ end,
+ after_dig_node = function(pos)
+ pipe_scanforobjects(pos)
+ end
+ })
+ table.insert(pipes_empty_nodenames,"pipeworks:pipe_"..pname.."_empty") -- for the abms
+ table.insert(pipes_full_nodenames,"pipeworks:pipe_"..pname.."_loaded") -- for bacon
+end
+end
+end
+end
+end
+end
+
+table.insert(pipes_empty_nodenames,"pipeworks:valve_on_empty")
+table.insert(pipes_empty_nodenames,"pipeworks:valve_off_empty")
+table.insert(pipes_empty_nodenames,"pipeworks:entry_panel_empty")
+table.insert(pipes_empty_nodenames,"pipeworks:flow_sensor_empty")
+
+table.insert(pipes_full_nodenames,"pipeworks:valve_on_loaded")
+table.insert(pipes_full_nodenames,"pipeworks:entry_panel_loaded")
+table.insert(pipes_full_nodenames,"pipeworks:flow_sensor_loaded")
+
+minetest.register_abm({
+ nodenames = pipes_empty_nodenames,
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ pipeworks_check_for_inflows(pos,node)
+ end
+})
+
+minetest.register_abm({
+ nodenames = pipes_full_nodenames,
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ pipeworks_check_sources(pos,node)
+ end
+})
+
+minetest.register_abm({
+ nodenames = {"pipeworks:spigot","pipeworks:spigot_pouring"},
+ interval = 1,
+ chance = 1,
+ action = function(pos, node, active_object_count, active_object_count_wider)
+ pipeworks_spigot_check(pos,node)
+ end
+})
--- This file supplies pneumatic tubes and a 'test' device
-
-minetest.register_node("pipeworks:testobject", {
- description = "Pneumatic tube test object",
- tiles = {
- "pipeworks_testobject.png",
- },
- paramtype = "light",
- groups = {snappy=3, tubedevice=1},
- sounds = default.node_sound_wood_defaults(),
- walkable = true,
- after_place_node = function(pos)
- tube_scanforobjects(pos)
- end,
- after_dig_node = function(pos)
- tube_scanforobjects(pos)
- end,
-})
-
-function replace_name(tbl,tr,name)
- local ntbl={}
- for key,i in pairs(tbl) do
- if type(i)=="string" then
- ntbl[key]=string.gsub(i,tr,name)
- elseif type(i)=="table" then
- ntbl[key]=replace_name(i,tr,name)
- else
- ntbl[key]=i
- end
- end
- return ntbl
-end
+-- This file supplies the various kinds of pneumatic tubes
tubenodes={}
nodedef.groups[group]=val
end
elseif type(value)=="table" then
- nodedef[key]=replace_name(value,"#id",tname)
+ nodedef[key]=pipeworks_replace_name(value,"#id",tname)
elseif type(value)=="string" then
nodedef[key]=string.gsub(value,"#id",tname)
else
end
end
+
noctr_textures={"pipeworks_tube_noctr.png","pipeworks_tube_noctr.png","pipeworks_tube_noctr.png",
"pipeworks_tube_noctr.png","pipeworks_tube_noctr.png","pipeworks_tube_noctr.png"}
plain_textures={"pipeworks_tube_plain.png","pipeworks_tube_plain.png","pipeworks_tube_plain.png",
register_tube("pipeworks:tube","Pneumatic tube segment",plain_textures,noctr_textures,end_textures,short_texture,inv_texture)
-mese_noctr_textures={"pipeworks_mese_tube_noctr_1.png","pipeworks_mese_tube_noctr_2.png","pipeworks_mese_tube_noctr_3.png",
- "pipeworks_mese_tube_noctr_4.png","pipeworks_mese_tube_noctr_5.png","pipeworks_mese_tube_noctr_6.png"}
-
-mese_plain_textures={"pipeworks_mese_tube_plain_1.png","pipeworks_mese_tube_plain_2.png","pipeworks_mese_tube_plain_3.png",
- "pipeworks_mese_tube_plain_4.png","pipeworks_mese_tube_plain_5.png","pipeworks_mese_tube_plain_6.png"}
-mese_end_textures={"pipeworks_mese_tube_end.png","pipeworks_mese_tube_end.png","pipeworks_mese_tube_end.png",
- "pipeworks_mese_tube_end.png","pipeworks_mese_tube_end.png","pipeworks_mese_tube_end.png"}
-mese_short_texture="pipeworks_mese_tube_short.png"
-mese_inv_texture="pipeworks_mese_tube_inv.png"
-
-detector_plain_textures={"pipeworks_detector_tube_plain.png","pipeworks_detector_tube_plain.png","pipeworks_detector_tube_plain.png",
- "pipeworks_detector_tube_plain.png","pipeworks_detector_tube_plain.png","pipeworks_detector_tube_plain.png"}
-detector_inv_texture="pipeworks_detector_tube_inv.png"
-
-meseadjlist={{x=0,y=0,z=1},{x=0,y=0,z=-1},{x=0,y=1,z=0},{x=0,y=-1,z=0},{x=1,y=0,z=0},{x=-1,y=0,z=0}}
-
-register_tube("pipeworks:mese_tube","Mese pneumatic tube segment",mese_plain_textures,mese_noctr_textures,
- mese_end_textures,mese_short_texture,mese_inv_texture,
- {tube={can_go=function(pos,node,velocity,stack)
- tbl={}
- local meta=minetest.get_meta(pos)
- local inv=meta:get_inventory()
- local found=false
- local name=stack:get_name()
- for i,vect in ipairs(meseadjlist) do
- if meta:get_int("l"..tostring(i).."s")==1 then
- for _,st in ipairs(inv:get_list("line"..tostring(i))) do
- if st:get_name()==name then
- found=true
- table.insert(tbl,vect)
+
+
+if enable_mese_tube then
+
+ mese_noctr_textures={"pipeworks_mese_tube_noctr_1.png","pipeworks_mese_tube_noctr_2.png","pipeworks_mese_tube_noctr_3.png",
+ "pipeworks_mese_tube_noctr_4.png","pipeworks_mese_tube_noctr_5.png","pipeworks_mese_tube_noctr_6.png"}
+ mese_plain_textures={"pipeworks_mese_tube_plain_1.png","pipeworks_mese_tube_plain_2.png","pipeworks_mese_tube_plain_3.png",
+ "pipeworks_mese_tube_plain_4.png","pipeworks_mese_tube_plain_5.png","pipeworks_mese_tube_plain_6.png"}
+ mese_end_textures={"pipeworks_mese_tube_end.png","pipeworks_mese_tube_end.png","pipeworks_mese_tube_end.png",
+ "pipeworks_mese_tube_end.png","pipeworks_mese_tube_end.png","pipeworks_mese_tube_end.png"}
+ mese_short_texture="pipeworks_mese_tube_short.png"
+ mese_inv_texture="pipeworks_mese_tube_inv.png"
+
+ meseadjlist={{x=0,y=0,z=1},{x=0,y=0,z=-1},{x=0,y=1,z=0},{x=0,y=-1,z=0},{x=1,y=0,z=0},{x=-1,y=0,z=0}}
+
+ register_tube("pipeworks:mese_tube","Mese pneumatic tube segment",mese_plain_textures,mese_noctr_textures,
+ mese_end_textures,mese_short_texture,mese_inv_texture,
+ {tube={can_go=function(pos,node,velocity,stack)
+ tbl={}
+ local meta=minetest.get_meta(pos)
+ local inv=meta:get_inventory()
+ local found=false
+ local name=stack:get_name()
+ for i,vect in ipairs(meseadjlist) do
+ if meta:get_int("l"..tostring(i).."s")==1 then
+ for _,st in ipairs(inv:get_list("line"..tostring(i))) do
+ if st:get_name()==name then
+ found=true
+ table.insert(tbl,vect)
+ end
end
end
end
- end
- if found==false then
- for i,vect in ipairs(meseadjlist) do
- if meta:get_int("l"..tostring(i).."s")==1 then
- if inv:is_empty("line"..tostring(i)) then
- table.insert(tbl,vect)
+ if found==false then
+ for i,vect in ipairs(meseadjlist) do
+ if meta:get_int("l"..tostring(i).."s")==1 then
+ if inv:is_empty("line"..tostring(i)) then
+ table.insert(tbl,vect)
+ end
end
end
end
- end
- return tbl
- end},
- on_construct = function(pos)
- local meta = minetest.get_meta(pos)
- local inv = meta:get_inventory()
- for i=1,6 do
- meta:set_int("l"..tostring(i).."s",1)
- inv:set_size("line"..tostring(i), 6*1)
- end
- meta:set_string("formspec",
- "size[8,11]"..
- "list[current_name;line1;1,0;6,1;]"..
- "list[current_name;line2;1,1;6,1;]"..
- "list[current_name;line3;1,2;6,1;]"..
- "list[current_name;line4;1,3;6,1;]"..
- "list[current_name;line5;1,4;6,1;]"..
- "list[current_name;line6;1,5;6,1;]"..
- "image[0,0;1,1;pipeworks_white.png]"..
- "image[0,1;1,1;pipeworks_black.png]"..
- "image[0,2;1,1;pipeworks_green.png]"..
- "image[0,3;1,1;pipeworks_yellow.png]"..
- "image[0,4;1,1;pipeworks_blue.png]"..
- "image[0,5;1,1;pipeworks_red.png]"..
- "button[7,0;1,1;button1;On]"..
- "button[7,1;1,1;button2;On]"..
- "button[7,2;1,1;button3;On]"..
- "button[7,3;1,1;button4;On]"..
- "button[7,4;1,1;button5;On]"..
- "button[7,5;1,1;button6;On]"..
- "list[current_player;main;0,7;8,4;]")
- meta:set_string("infotext", "Mese pneumatic tube")
- end,
- on_receive_fields=function(pos,formname,fields,sender)
- local meta=minetest.get_meta(pos)
- local i
- for key,_ in pairs(fields) do i=key end
- if i==nil then return end
- i=string.sub(i,-1)
- newstate=1-meta:get_int("l"..i.."s")
- meta:set_int("l"..i.."s",newstate)
- local frm="size[8,11]"..
- "list[current_name;line1;1,0;6,1;]"..
- "list[current_name;line2;1,1;6,1;]"..
- "list[current_name;line3;1,2;6,1;]"..
- "list[current_name;line4;1,3;6,1;]"..
- "list[current_name;line5;1,4;6,1;]"..
- "list[current_name;line6;1,5;6,1;]"..
- "image[0,0;1,1;pipeworks_white.png]"..
- "image[0,1;1,1;pipeworks_black.png]"..
- "image[0,2;1,1;pipeworks_green.png]"..
- "image[0,3;1,1;pipeworks_yellow.png]"..
- "image[0,4;1,1;pipeworks_blue.png]"..
- "image[0,5;1,1;pipeworks_red.png]"
- for i=1,6 do
- local st=meta:get_int("l"..tostring(i).."s")
- if st==0 then
- frm=frm.."button[7,"..tostring(i-1)..";1,1;button"..tostring(i)..";Off]"
- else
- frm=frm.."button[7,"..tostring(i-1)..";1,1;button"..tostring(i)..";On]"
+ return tbl
+ end},
+ on_construct = function(pos)
+ local meta = minetest.get_meta(pos)
+ local inv = meta:get_inventory()
+ for i=1,6 do
+ meta:set_int("l"..tostring(i).."s",1)
+ inv:set_size("line"..tostring(i), 6*1)
end
+ meta:set_string("formspec",
+ "size[8,11]"..
+ "list[current_name;line1;1,0;6,1;]"..
+ "list[current_name;line2;1,1;6,1;]"..
+ "list[current_name;line3;1,2;6,1;]"..
+ "list[current_name;line4;1,3;6,1;]"..
+ "list[current_name;line5;1,4;6,1;]"..
+ "list[current_name;line6;1,5;6,1;]"..
+ "image[0,0;1,1;pipeworks_white.png]"..
+ "image[0,1;1,1;pipeworks_black.png]"..
+ "image[0,2;1,1;pipeworks_green.png]"..
+ "image[0,3;1,1;pipeworks_yellow.png]"..
+ "image[0,4;1,1;pipeworks_blue.png]"..
+ "image[0,5;1,1;pipeworks_red.png]"..
+ "button[7,0;1,1;button1;On]"..
+ "button[7,1;1,1;button2;On]"..
+ "button[7,2;1,1;button3;On]"..
+ "button[7,3;1,1;button4;On]"..
+ "button[7,4;1,1;button5;On]"..
+ "button[7,5;1,1;button6;On]"..
+ "list[current_player;main;0,7;8,4;]")
+ meta:set_string("infotext", "Mese pneumatic tube")
+ end,
+ on_receive_fields=function(pos,formname,fields,sender)
+ local meta=minetest.get_meta(pos)
+ local i
+ for key,_ in pairs(fields) do i=key end
+ if i==nil then return end
+ i=string.sub(i,-1)
+ newstate=1-meta:get_int("l"..i.."s")
+ meta:set_int("l"..i.."s",newstate)
+ local frm="size[8,11]"..
+ "list[current_name;line1;1,0;6,1;]"..
+ "list[current_name;line2;1,1;6,1;]"..
+ "list[current_name;line3;1,2;6,1;]"..
+ "list[current_name;line4;1,3;6,1;]"..
+ "list[current_name;line5;1,4;6,1;]"..
+ "list[current_name;line6;1,5;6,1;]"..
+ "image[0,0;1,1;pipeworks_white.png]"..
+ "image[0,1;1,1;pipeworks_black.png]"..
+ "image[0,2;1,1;pipeworks_green.png]"..
+ "image[0,3;1,1;pipeworks_yellow.png]"..
+ "image[0,4;1,1;pipeworks_blue.png]"..
+ "image[0,5;1,1;pipeworks_red.png]"
+ for i=1,6 do
+ local st=meta:get_int("l"..tostring(i).."s")
+ if st==0 then
+ frm=frm.."button[7,"..tostring(i-1)..";1,1;button"..tostring(i)..";Off]"
+ else
+ frm=frm.."button[7,"..tostring(i-1)..";1,1;button"..tostring(i)..";On]"
+ end
+ end
+ frm=frm.."list[current_player;main;0,7;8,4;]"
+ meta:set_string("formspec",frm)
+ end,
+ can_dig = function(pos,player)
+ local meta = minetest.get_meta(pos);
+ local inv = meta:get_inventory()
+ return (inv:is_empty("line1") and inv:is_empty("line2") and inv:is_empty("line3") and
+ inv:is_empty("line4") and inv:is_empty("line5") and inv:is_empty("line6"))
end
- frm=frm.."list[current_player;main;0,7;8,4;]"
- meta:set_string("formspec",frm)
- end,
- can_dig = function(pos,player)
- local meta = minetest.get_meta(pos);
- local inv = meta:get_inventory()
- return (inv:is_empty("line1") and inv:is_empty("line2") and inv:is_empty("line3") and
- inv:is_empty("line4") and inv:is_empty("line5") and inv:is_empty("line6"))
- end})
-
-
-mesecons_rules={{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},{x=0,y=-1,z=0}}
-
-register_tube("pipeworks:detector_tube_on","Detector tube segment on (you hacker you)",detector_plain_textures,noctr_textures,
- end_textures,short_texture,detector_inv_texture,
- {tube={can_go=function(pos,node,velocity,stack)
- local meta = minetest.get_meta(pos)
- local name = minetest.get_node(pos).name
- local nitems=meta:get_int("nitems")+1
- meta:set_int("nitems", nitems)
- minetest.after(0.1,minetest.registered_nodes[name].item_exit,pos)
- return notvel(meseadjlist,velocity)
- end},
- groups={mesecon=2,not_in_creative_inventory=1},
- drop="pipeworks:detector_tube_off_000000",
- mesecons={receptor={state="on",
- rules=mesecons_rules}},
- item_exit = function(pos)
- local meta = minetest.get_meta(pos)
- local nitems=meta:get_int("nitems")-1
- local name = minetest.get_node(pos).name
- if nitems==0 then
- minetest.set_node(pos,{name=string.gsub(name,"on","off")})
- mesecon:receptor_off(pos,mesecons_rules)
- else
- meta:set_int("nitems", nitems)
- end
- end,
- on_construct = function(pos)
- local meta = minetest.get_meta(pos)
- meta:set_int("nitems", 1)
- local name = minetest.get_node(pos).name
- minetest.after(0.1,minetest.registered_nodes[name].item_exit,pos)
- end})
-
-register_tube("pipeworks:detector_tube_off","Detector tube segment",detector_plain_textures,noctr_textures,
- end_textures,short_texture,detector_inv_texture,
- {tube={can_go=function(pos,node,velocity,stack)
- local name = minetest.get_node(pos).name
- minetest.set_node(pos,{name=string.gsub(name,"off","on")})
- mesecon:receptor_on(pos,mesecons_rules)
- return notvel(meseadjlist,velocity)
- end},
- groups={mesecon=2},
- mesecons={receptor={state="off",
- rules=mesecons_rules}}})
-
-conductor_plain_textures={"pipeworks_conductor_tube_plain.png","pipeworks_conductor_tube_plain.png","pipeworks_conductor_tube_plain.png",
- "pipeworks_conductor_tube_plain.png","pipeworks_conductor_tube_plain.png","pipeworks_conductor_tube_plain.png"}
-conductor_noctr_textures={"pipeworks_conductor_tube_noctr.png","pipeworks_conductor_tube_noctr.png","pipeworks_conductor_tube_noctr.png",
- "pipeworks_conductor_tube_noctr.png","pipeworks_conductor_tube_noctr.png","pipeworks_conductor_tube_noctr.png"}
-conductor_end_textures={"pipeworks_conductor_tube_end.png","pipeworks_conductor_tube_end.png","pipeworks_conductor_tube_end.png",
- "pipeworks_conductor_tube_end.png","pipeworks_conductor_tube_end.png","pipeworks_conductor_tube_end.png"}
-conductor_short_texture="pipeworks_conductor_tube_short.png"
-conductor_inv_texture="pipeworks_conductor_tube_inv.png"
-
-register_tube("pipeworks:conductor_tube_off","Conductor tube segment",conductor_plain_textures,conductor_noctr_textures,
- conductor_end_textures,conductor_short_texture,conductor_inv_texture,
- {groups={mesecon=2},
- mesecons={conductor={state="off",
- rules=mesecons_rules,
- onstate="pipeworks:conductor_tube_on_#id"}}})
-
-conductor_on_plain_textures={"pipeworks_conductor_tube_on_plain.png","pipeworks_conductor_tube_on_plain.png","pipeworks_conductor_tube_on_plain.png",
- "pipeworks_conductor_tube_on_plain.png","pipeworks_conductor_tube_on_plain.png","pipeworks_conductor_tube_on_plain.png"}
-conductor_on_noctr_textures={"pipeworks_conductor_tube_on_noctr.png","pipeworks_conductor_tube_on_noctr.png","pipeworks_conductor_tube_on_noctr.png",
- "pipeworks_conductor_tube_on_noctr.png","pipeworks_conductor_tube_on_noctr.png","pipeworks_conductor_tube_on_noctr.png"}
-conductor_on_end_textures={"pipeworks_conductor_tube_on_end.png","pipeworks_conductor_tube_on_end.png","pipeworks_conductor_tube_on_end.png",
- "pipeworks_conductor_tube_on_end.png","pipeworks_conductor_tube_on_end.png","pipeworks_conductor_tube_on_end.png"}
-
-register_tube("pipeworks:conductor_tube_on","Conductor tube segment on (you hacker you)",conductor_on_plain_textures,conductor_on_noctr_textures,
- conductor_on_end_textures,conductor_short_texture,conductor_inv_texture,
- {groups={mesecon=2,not_in_creative_inventory=1},
- drop="pipeworks:conductor_tube_off_000000",
- mesecons={conductor={state="on",
- rules=mesecons_rules,
- offstate="pipeworks:conductor_tube_off_#id"}}})
-
-accelerator_noctr_textures={"pipeworks_accelerator_tube_noctr.png","pipeworks_accelerator_tube_noctr.png","pipeworks_accelerator_tube_noctr.png",
- "pipeworks_accelerator_tube_noctr.png","pipeworks_accelerator_tube_noctr.png","pipeworks_accelerator_tube_noctr.png"}
-accelerator_plain_textures={"pipeworks_accelerator_tube_plain.png","pipeworks_accelerator_tube_plain.png","pipeworks_accelerator_tube_plain.png",
- "pipeworks_accelerator_tube_plain.png","pipeworks_accelerator_tube_plain.png","pipeworks_accelerator_tube_plain.png"}
-accelerator_end_textures={"pipeworks_accelerator_tube_end.png","pipeworks_accelerator_tube_end.png","pipeworks_accelerator_tube_end.png",
- "pipeworks_accelerator_tube_end.png","pipeworks_accelerator_tube_end.png","pipeworks_accelerator_tube_end.png"}
-accelerator_short_texture="pipeworks_accelerator_tube_short.png"
-accelerator_inv_texture="pipeworks_accelerator_tube_inv.png"
-
-register_tube("pipeworks:accelerator_tube","Accelerator pneumatic tube segment",accelerator_plain_textures,
- accelerator_noctr_textures,accelerator_end_textures,accelerator_short_texture,accelerator_inv_texture,
+ })
+end
+
+ mesecons_rules={{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},{x=0,y=-1,z=0}}
+
+
+if enable_detector_tube then
+
+ detector_plain_textures={"pipeworks_detector_tube_plain.png","pipeworks_detector_tube_plain.png","pipeworks_detector_tube_plain.png",
+ "pipeworks_detector_tube_plain.png","pipeworks_detector_tube_plain.png","pipeworks_detector_tube_plain.png"}
+ detector_inv_texture="pipeworks_detector_tube_inv.png"
+
+ register_tube("pipeworks:detector_tube_on","Detector tube segment on (you hacker you)",detector_plain_textures,noctr_textures,
+ end_textures,short_texture,detector_inv_texture,
{tube={can_go=function(pos,node,velocity,stack)
- velocity.speed=velocity.speed+1
+ local meta = minetest.get_meta(pos)
+ local name = minetest.get_node(pos).name
+ local nitems=meta:get_int("nitems")+1
+ meta:set_int("nitems", nitems)
+ minetest.after(0.1,minetest.registered_nodes[name].item_exit,pos)
return notvel(meseadjlist,velocity)
- end}})
+ end},
+ groups={mesecon=2,not_in_creative_inventory=1},
+ drop="pipeworks:detector_tube_off_000000",
+ mesecons={receptor={state="on",
+ rules=mesecons_rules}},
+ item_exit = function(pos)
+ local meta = minetest.get_meta(pos)
+ local nitems=meta:get_int("nitems")-1
+ local name = minetest.get_node(pos).name
+ if nitems==0 then
+ minetest.set_node(pos,{name=string.gsub(name,"on","off")})
+ mesecon:receptor_off(pos,mesecons_rules)
+ else
+ meta:set_int("nitems", nitems)
+ end
+ end,
+ on_construct = function(pos)
+ local meta = minetest.get_meta(pos)
+ meta:set_int("nitems", 1)
+ local name = minetest.get_node(pos).name
+ minetest.after(0.1,minetest.registered_nodes[name].item_exit,pos)
+ end})
-register_tube("pipeworks:crossing_tube","Crossing tube segment",accelerator_plain_textures,
- accelerator_noctr_textures,accelerator_end_textures,accelerator_short_texture,accelerator_inv_texture,
+ register_tube("pipeworks:detector_tube_off","Detector tube segment",detector_plain_textures,noctr_textures,
+ end_textures,short_texture,detector_inv_texture,
{tube={can_go=function(pos,node,velocity,stack)
- return velocity
- end}})
-
-sand_noctr_textures={"pipeworks_sand_tube_noctr.png","pipeworks_sand_tube_noctr.png","pipeworks_sand_tube_noctr.png",
- "pipeworks_sand_tube_noctr.png","pipeworks_sand_tube_noctr.png","pipeworks_sand_tube_noctr.png"}
-sand_plain_textures={"pipeworks_sand_tube_plain.png","pipeworks_sand_tube_plain.png","pipeworks_sand_tube_plain.png",
- "pipeworks_sand_tube_plain.png","pipeworks_sand_tube_plain.png","pipeworks_sand_tube_plain.png"}
-sand_end_textures={"pipeworks_sand_tube_end.png","pipeworks_sand_tube_end.png","pipeworks_sand_tube_end.png",
- "pipeworks_sand_tube_end.png","pipeworks_sand_tube_end.png","pipeworks_sand_tube_end.png"}
-sand_short_texture="pipeworks_sand_tube_short.png"
-sand_inv_texture="pipeworks_sand_tube_inv.png"
-
-register_tube("pipeworks:sand_tube","Sand pneumatic tube segment",sand_plain_textures,sand_noctr_textures,sand_end_textures,
- sand_short_texture,sand_inv_texture,
- {groups={sand_tube=1}})
-
-minetest.register_abm({nodenames={"group:sand_tube"},interval=1,chance=1,
- action=function(pos, node, active_object_count, active_object_count_wider)
- for _,object in ipairs(minetest.get_objects_inside_radius(pos, 2)) do
- if not object:is_player() and object:get_luaentity() and object:get_luaentity().name == "__builtin:item" then
- if object:get_luaentity().itemstring ~= "" then
- local titem=tube_item(pos,object:get_luaentity().itemstring)
- titem:get_luaentity().start_pos = {x=pos.x,y=pos.y-1,z=pos.z}
- titem:setvelocity({x=0.01,y=1,z=-0.01})
- titem:setacceleration({x=0, y=0, z=0})
+ local name = minetest.get_node(pos).name
+ minetest.set_node(pos,{name=string.gsub(name,"off","on")})
+ mesecon:receptor_on(pos,mesecons_rules)
+ return notvel(meseadjlist,velocity)
+ end},
+ groups={mesecon=2},
+ mesecons={receptor={state="off",
+ rules=mesecons_rules}}
+ })
+end
+
+if enable_conductor_tube then
+
+ conductor_plain_textures={"pipeworks_conductor_tube_plain.png","pipeworks_conductor_tube_plain.png","pipeworks_conductor_tube_plain.png",
+ "pipeworks_conductor_tube_plain.png","pipeworks_conductor_tube_plain.png","pipeworks_conductor_tube_plain.png"}
+ conductor_noctr_textures={"pipeworks_conductor_tube_noctr.png","pipeworks_conductor_tube_noctr.png","pipeworks_conductor_tube_noctr.png",
+ "pipeworks_conductor_tube_noctr.png","pipeworks_conductor_tube_noctr.png","pipeworks_conductor_tube_noctr.png"}
+ conductor_end_textures={"pipeworks_conductor_tube_end.png","pipeworks_conductor_tube_end.png","pipeworks_conductor_tube_end.png",
+ "pipeworks_conductor_tube_end.png","pipeworks_conductor_tube_end.png","pipeworks_conductor_tube_end.png"}
+ conductor_short_texture="pipeworks_conductor_tube_short.png"
+ conductor_inv_texture="pipeworks_conductor_tube_inv.png"
+
+ conductor_on_plain_textures={"pipeworks_conductor_tube_on_plain.png","pipeworks_conductor_tube_on_plain.png","pipeworks_conductor_tube_on_plain.png",
+ "pipeworks_conductor_tube_on_plain.png","pipeworks_conductor_tube_on_plain.png","pipeworks_conductor_tube_on_plain.png"}
+ conductor_on_noctr_textures={"pipeworks_conductor_tube_on_noctr.png","pipeworks_conductor_tube_on_noctr.png","pipeworks_conductor_tube_on_noctr.png",
+ "pipeworks_conductor_tube_on_noctr.png","pipeworks_conductor_tube_on_noctr.png","pipeworks_conductor_tube_on_noctr.png"}
+ conductor_on_end_textures={"pipeworks_conductor_tube_on_end.png","pipeworks_conductor_tube_on_end.png","pipeworks_conductor_tube_on_end.png",
+ "pipeworks_conductor_tube_on_end.png","pipeworks_conductor_tube_on_end.png","pipeworks_conductor_tube_on_end.png"}
+
+ register_tube("pipeworks:conductor_tube_off","Conductor tube segment",conductor_plain_textures,conductor_noctr_textures,
+ conductor_end_textures,conductor_short_texture,conductor_inv_texture,
+ {groups={mesecon=2},
+ mesecons={conductor={state="off",
+ rules=mesecons_rules,
+ onstate="pipeworks:conductor_tube_on_#id"}}
+ })
+
+ register_tube("pipeworks:conductor_tube_on","Conductor tube segment on (you hacker you)",conductor_on_plain_textures,conductor_on_noctr_textures,
+ conductor_on_end_textures,conductor_short_texture,conductor_inv_texture,
+ {groups={mesecon=2,not_in_creative_inventory=1},
+ drop="pipeworks:conductor_tube_off_000000",
+ mesecons={conductor={state="on",
+ rules=mesecons_rules,
+ offstate="pipeworks:conductor_tube_off_#id"}}
+ })
+end
+
+if enable_accelerator_tube then
+
+ accelerator_noctr_textures={"pipeworks_accelerator_tube_noctr.png","pipeworks_accelerator_tube_noctr.png","pipeworks_accelerator_tube_noctr.png",
+ "pipeworks_accelerator_tube_noctr.png","pipeworks_accelerator_tube_noctr.png","pipeworks_accelerator_tube_noctr.png"}
+ accelerator_plain_textures={"pipeworks_accelerator_tube_plain.png","pipeworks_accelerator_tube_plain.png","pipeworks_accelerator_tube_plain.png",
+ "pipeworks_accelerator_tube_plain.png","pipeworks_accelerator_tube_plain.png","pipeworks_accelerator_tube_plain.png"}
+ accelerator_end_textures={"pipeworks_accelerator_tube_end.png","pipeworks_accelerator_tube_end.png","pipeworks_accelerator_tube_end.png",
+ "pipeworks_accelerator_tube_end.png","pipeworks_accelerator_tube_end.png","pipeworks_accelerator_tube_end.png"}
+ accelerator_short_texture="pipeworks_accelerator_tube_short.png"
+ accelerator_inv_texture="pipeworks_accelerator_tube_inv.png"
+
+ register_tube("pipeworks:accelerator_tube","Accelerator pneumatic tube segment",accelerator_plain_textures,
+ accelerator_noctr_textures,accelerator_end_textures,accelerator_short_texture,accelerator_inv_texture,
+ {tube={can_go=function(pos,node,velocity,stack)
+ velocity.speed=velocity.speed+1
+ return notvel(meseadjlist,velocity)
+ end}
+ })
+end
+
+if enable_crossing_tube then
+ register_tube("pipeworks:crossing_tube","Crossing tube segment",accelerator_plain_textures,
+ accelerator_noctr_textures,accelerator_end_textures,accelerator_short_texture,accelerator_inv_texture,
+ {tube={can_go=function(pos,node,velocity,stack)
+ return velocity
+ end}
+ })
+end
+
+if enable_sand_tube then
+
+ sand_noctr_textures={"pipeworks_sand_tube_noctr.png","pipeworks_sand_tube_noctr.png","pipeworks_sand_tube_noctr.png",
+ "pipeworks_sand_tube_noctr.png","pipeworks_sand_tube_noctr.png","pipeworks_sand_tube_noctr.png"}
+ sand_plain_textures={"pipeworks_sand_tube_plain.png","pipeworks_sand_tube_plain.png","pipeworks_sand_tube_plain.png",
+ "pipeworks_sand_tube_plain.png","pipeworks_sand_tube_plain.png","pipeworks_sand_tube_plain.png"}
+ sand_end_textures={"pipeworks_sand_tube_end.png","pipeworks_sand_tube_end.png","pipeworks_sand_tube_end.png",
+ "pipeworks_sand_tube_end.png","pipeworks_sand_tube_end.png","pipeworks_sand_tube_end.png"}
+ sand_short_texture="pipeworks_sand_tube_short.png"
+ sand_inv_texture="pipeworks_sand_tube_inv.png"
+
+ register_tube("pipeworks:sand_tube","Sand pneumatic tube segment",sand_plain_textures,sand_noctr_textures,sand_end_textures,
+ sand_short_texture,sand_inv_texture,
+ {groups={sand_tube=1}})
+
+ minetest.register_abm({nodenames={"group:sand_tube"},interval=1,chance=1,
+ action=function(pos, node, active_object_count, active_object_count_wider)
+ for _,object in ipairs(minetest.get_objects_inside_radius(pos, 2)) do
+ if not object:is_player() and object:get_luaentity() and object:get_luaentity().name == "__builtin:item" then
+ if object:get_luaentity().itemstring ~= "" then
+ local titem=tube_item(pos,object:get_luaentity().itemstring)
+ titem:get_luaentity().start_pos = {x=pos.x,y=pos.y-1,z=pos.z}
+ titem:setvelocity({x=0.01,y=1,z=-0.01})
+ titem:setacceleration({x=0, y=0, z=0})
+ end
+ object:get_luaentity().itemstring = ""
+ object:remove()
end
- object:get_luaentity().itemstring = ""
- object:remove()
end
end
- end
-})
-
-mese_sand_noctr_textures={"pipeworks_mese_sand_tube_noctr.png","pipeworks_mese_sand_tube_noctr.png","pipeworks_mese_sand_tube_noctr.png",
- "pipeworks_mese_sand_tube_noctr.png","pipeworks_mese_sand_tube_noctr.png","pipeworks_mese_sand_tube_noctr.png"}
-mese_sand_plain_textures={"pipeworks_mese_sand_tube_plain.png","pipeworks_mese_sand_tube_plain.png","pipeworks_mese_sand_tube_plain.png",
- "pipeworks_mese_sand_tube_plain.png","pipeworks_mese_sand_tube_plain.png","pipeworks_mese_sand_tube_plain.png"}
-mese_sand_end_textures={"pipeworks_mese_sand_tube_end.png","pipeworks_mese_sand_tube_end.png","pipeworks_mese_sand_tube_end.png",
- "pipeworks_mese_sand_tube_end.png","pipeworks_mese_sand_tube_end.png","pipeworks_mese_sand_tube_end.png"}
-mese_sand_short_texture="pipeworks_mese_sand_tube_short.png"
-mese_sand_inv_texture="pipeworks_mese_sand_tube_inv.png"
-
-register_tube("pipeworks:mese_sand_tube","Mese sand pneumatic tube segment",mese_sand_plain_textures,mese_sand_noctr_textures,mese_sand_end_textures,
- mese_sand_short_texture,mese_sand_inv_texture,
- {groups={mese_sand_tube=1},
- on_construct = function(pos)
- local meta = minetest.env:get_meta(pos)
- meta:set_int("dist", 0)
- meta:set_string("formspec",
- "size[2,1]"..
- "field[.5,.5;1.5,1;dist;distance;${dist}]")
- meta:set_string("infotext", "Mese sand pneumatic tube")
- end,
- on_receive_fields=function(pos,formname,fields,sender)
- local meta=minetest.env:get_meta(pos)
- local dist
- _, dist = pcall(tonumber, fields.dist)
- if dist and 0 <= dist and dist <= 8 then meta:set_int("dist", dist) end
- end,
-})
-
-local function get_objects_with_square_radius(pos, rad)
- rad = rad + .5;
- local objs = {}
- for _,object in ipairs(minetest.env:get_objects_inside_radius(pos, math.sqrt(3)*rad)) do
- if not object:is_player() and object:get_luaentity() and object:get_luaentity().name == "__builtin:item" then
- local opos = object:getpos()
- if pos.x - rad <= opos.x and opos.x <= pos.x + rad and pos.y - rad <= opos.y and opos.y <= pos.y + rad and pos.z - rad <= opos.z and opos.z <= pos.z + rad then
- objs[#objs + 1] = object
- end
- end
- end
- return objs
+ })
end
-minetest.register_abm({nodenames={"group:mese_sand_tube"},interval=1,chance=1,
- action=function(pos, node, active_object_count, active_object_count_wider)
- for _,object in ipairs(get_objects_with_square_radius(pos, minetest.env:get_meta(pos):get_int("dist"))) do
- if not object:is_player() and object:get_luaentity() and object:get_luaentity().name == "__builtin:item" then
- if object:get_luaentity().itemstring ~= "" then
- local titem=tube_item(pos,object:get_luaentity().itemstring)
- titem:get_luaentity().start_pos = {x=pos.x,y=pos.y-1,z=pos.z}
- titem:setvelocity({x=0.01,y=1,z=-0.01})
- titem:setacceleration({x=0, y=0, z=0})
+if enable_mese_sand_tube then
+
+ mese_sand_noctr_textures={"pipeworks_mese_sand_tube_noctr.png","pipeworks_mese_sand_tube_noctr.png","pipeworks_mese_sand_tube_noctr.png",
+ "pipeworks_mese_sand_tube_noctr.png","pipeworks_mese_sand_tube_noctr.png","pipeworks_mese_sand_tube_noctr.png"}
+ mese_sand_plain_textures={"pipeworks_mese_sand_tube_plain.png","pipeworks_mese_sand_tube_plain.png","pipeworks_mese_sand_tube_plain.png",
+ "pipeworks_mese_sand_tube_plain.png","pipeworks_mese_sand_tube_plain.png","pipeworks_mese_sand_tube_plain.png"}
+ mese_sand_end_textures={"pipeworks_mese_sand_tube_end.png","pipeworks_mese_sand_tube_end.png","pipeworks_mese_sand_tube_end.png",
+ "pipeworks_mese_sand_tube_end.png","pipeworks_mese_sand_tube_end.png","pipeworks_mese_sand_tube_end.png"}
+ mese_sand_short_texture="pipeworks_mese_sand_tube_short.png"
+ mese_sand_inv_texture="pipeworks_mese_sand_tube_inv.png"
+
+ register_tube("pipeworks:mese_sand_tube","Mese sand pneumatic tube segment",mese_sand_plain_textures,mese_sand_noctr_textures,mese_sand_end_textures,
+ mese_sand_short_texture,mese_sand_inv_texture,
+ {groups={mese_sand_tube=1},
+ on_construct = function(pos)
+ local meta = minetest.env:get_meta(pos)
+ meta:set_int("dist", 0)
+ meta:set_string("formspec",
+ "size[2,1]"..
+ "field[.5,.5;1.5,1;dist;distance;${dist}]")
+ meta:set_string("infotext", "Mese sand pneumatic tube")
+ end,
+ on_receive_fields=function(pos,formname,fields,sender)
+ local meta=minetest.env:get_meta(pos)
+ local dist
+ _, dist = pcall(tonumber, fields.dist)
+ if dist and 0 <= dist and dist <= 8 then meta:set_int("dist", dist) end
+ end,
+ })
+
+ local function get_objects_with_square_radius(pos, rad)
+ rad = rad + .5;
+ local objs = {}
+ for _,object in ipairs(minetest.env:get_objects_inside_radius(pos, math.sqrt(3)*rad)) do
+ if not object:is_player() and object:get_luaentity() and object:get_luaentity().name == "__builtin:item" then
+ local opos = object:getpos()
+ if pos.x - rad <= opos.x and opos.x <= pos.x + rad and pos.y - rad <= opos.y and opos.y <= pos.y + rad and pos.z - rad <= opos.z and opos.z <= pos.z + rad then
+ objs[#objs + 1] = object
+ end
+ end
+ end
+ return objs
+ end
+
+ minetest.register_abm({nodenames={"group:mese_sand_tube"},interval=1,chance=1,
+ action=function(pos, node, active_object_count, active_object_count_wider)
+ for _,object in ipairs(get_objects_with_square_radius(pos, minetest.env:get_meta(pos):get_int("dist"))) do
+ if not object:is_player() and object:get_luaentity() and object:get_luaentity().name == "__builtin:item" then
+ if object:get_luaentity().itemstring ~= "" then
+ local titem=tube_item(pos,object:get_luaentity().itemstring)
+ titem:get_luaentity().start_pos = {x=pos.x,y=pos.y-1,z=pos.z}
+ titem:setvelocity({x=0.01,y=1,z=-0.01})
+ titem:setacceleration({x=0, y=0, z=0})
+ end
+ object:get_luaentity().itemstring = ""
+ object:remove()
end
- object:get_luaentity().itemstring = ""
- object:remove()
end
end
- end
-})
-
+ })
+end
projects / zefram / minetest / pipeworks.git / commitdiff