mods that hopefully work for a TechAge-based pack

This commit is contained in:
2026-09-09 06:27:51 -06:00
parent 4e6b08d194
commit c27db2a537
6234 changed files with 375578 additions and 0 deletions
@@ -0,0 +1,139 @@
--[[
Networks
========
Copyright (C) 2021 Joachim Stolberg
AGPL v3
See LICENSE.txt for more information
]]--
-- for lazy programmers
local P2S = function(pos) if pos then return minetest.pos_to_string(pos) end end
local S2P = minetest.string_to_pos
local M = minetest.get_meta
local Cable = ...
local power = networks.power
local control = networks.control
-------------------------------------------------------------------------------
-- Client (sender)
-------------------------------------------------------------------------------
minetest.register_node("networks:client", {
description = "Client",
tiles = {
-- up, down, right, left, back, front
'networks_con.png^[colorize:#F05100:60',
'networks_con.png^[colorize:#F05100:60',
'networks_con.png^[colorize:#F05100:60',
'networks_con.png^[colorize:#F05100:60',
'networks_con.png^[colorize:#F05100:60',
'networks_conn.png^[colorize:#F05100:60',
},
after_place_node = function(pos)
local outdir = networks.side_to_outdir(pos, "F")
M(pos):set_int("outdir", outdir)
M(pos):set_string("infotext", "off")
Cable:after_place_node(pos, {outdir})
tubelib2.init_mem(pos)
end,
after_dig_node = function(pos, oldnode, oldmetadata)
local outdir = tonumber(oldmetadata.fields.outdir or 0)
Cable:after_dig_node(pos, {outdir})
tubelib2.del_mem(pos)
end,
on_rightclick = function(pos, node, clicker)
local mem = tubelib2.get_mem(pos)
local outdir = M(pos):get_int("outdir")
local cnt
if mem.on then
cnt = control.send(pos, Cable, outdir, "server", "off")
M(pos):set_string("infotext", "off")
mem.on = false
else
cnt = control.send(pos, Cable, outdir, "server", "on")
M(pos):set_string("infotext", "on")
mem.on = true
end
print("Command sent to " .. cnt .. " nodes.")
end,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2},
sounds = default.node_sound_defaults(),
})
power.register_nodes({"networks:client"}, Cable, "client")
control.register_nodes({"networks:client"}, {}) -- no callbacks
-------------------------------------------------------------------------------
-- Server (receiver)
-------------------------------------------------------------------------------
local function swap_node(pos, name)
local node = tubelib2.get_node_lvm(pos)
if node.name == name then
return
end
node.name = name
minetest.swap_node(pos, node)
end
minetest.register_node("networks:server_off", {
description = "Server",
tiles = {
-- up, down, right, left, back, front
"networks_sto.png^[colorize:#F05100:60",
},
after_place_node = function(pos)
Cable:after_place_node(pos)
end,
after_dig_node = function(pos)
Cable:after_dig_node(pos)
end,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2},
sounds = default.node_sound_defaults(),
})
minetest.register_node("networks:server_on", {
description = "Server",
tiles = {
-- up, down, right, left, back, front
"networks_sto.png^[colorize:#F05100:60",
},
after_place_node = function(pos)
Cable:after_place_node(pos)
end,
after_dig_node = function(pos)
Cable:after_dig_node(pos)
end,
paramtype = "light",
light_source = 8,
paramtype2 = "facedir",
drop = "networks:server_off",
groups = {crumbly = 2, cracky = 2, snappy = 2, not_in_creative_inventory = 1},
is_ground_content = false,
sounds = default.node_sound_defaults(),
})
power.register_nodes({"networks:server_off", "networks:server_on"}, Cable, "server")
control.register_nodes({"networks:server_off", "networks:server_on"}, {
on_receive = function(pos, tlib2, topic, payload)
if topic == "on" then
swap_node(pos, "networks:server_on")
elseif topic == "off" then
swap_node(pos, "networks:server_off")
end
end,
on_request = function(pos, tlib2, topic)
return false
end,
}
)
@@ -0,0 +1,430 @@
--[[
Networks
========
Copyright (C) 2021 Joachim Stolberg
AGPL v3
See LICENSE.txt for more information
]]--
-- for lazy programmers
local P2S = function(pos) if pos then return minetest.pos_to_string(pos) end end
local S2P = minetest.string_to_pos
local M = minetest.get_meta
local CYCLE_TIME = 2
local STORAGE_CAPA = 500
local AMOUNT = 2
local liquid = networks.liquid
-------------------------------------------------------------------------------
-- Pipe
-------------------------------------------------------------------------------
local Pipe = tubelib2.Tube:new({
dirs_to_check = {1,2,3,4,5,6},
max_tube_length = 100,
tube_type = "liq",
primary_node_names = {"networks:pipeS", "networks:pipeA", "networks:valve_on"},
secondary_node_names = {}, -- Names will be added via 'liquids.register_nodes'
after_place_tube = function(pos, param2, tube_type, num_tubes, tbl)
local name = minetest.get_node(pos).name
if name == "networks:valve_on" then
minetest.swap_node(pos, {name = "networks:valve_on", param2 = param2})
elseif name == "networks:valve_off" then
minetest.swap_node(pos, {name = "networks:valve_off", param2 = param2})
else
minetest.swap_node(pos, {name = "networks:pipe"..tube_type, param2 = param2})
end
end,
})
-- Use global callback instead of node related functions
Pipe:register_on_tube_update2(function(pos, outdir, tlib2, node)
liquid.update_network(pos, outdir, tlib2, node)
end)
minetest.register_node("networks:pipeS", {
description = "Pipe",
tiles = { -- Top, base, right, left, front, back
"networks_cable.png^[colorize:#007577:60",
"networks_cable.png^[colorize:#007577:60",
"networks_cable.png^[colorize:#007577:60",
"networks_cable.png^[colorize:#007577:60",
"networks_hole.png",
"networks_hole.png",
},
after_place_node = function(pos, placer, itemstack, pointed_thing)
if not Pipe:after_place_tube(pos, placer, pointed_thing) then
minetest.remove_node(pos)
return true
end
return false
end,
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Pipe:after_dig_tube(pos, oldnode, oldmetadata)
end,
paramtype2 = "facedir",
drawtype = "nodebox",
node_box = {
type = "fixed",
fixed = {
{-3/16, -3/16, -4/8, 3/16, 3/16, 4/8},
},
},
on_rotate = screwdriver.disallow,
paramtype = "light",
use_texture_alpha = "clip",
sunlight_propagates = true,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2},
sounds = default.node_sound_defaults(),
})
minetest.register_node("networks:pipeA", {
description = "Pipe",
tiles = { -- Top, base, right, left, front, back
"networks_cable.png^[colorize:#007577:60",
"networks_hole.png^[colorize:#007577:60",
"networks_cable.png^[colorize:#007577:60",
"networks_cable.png^[colorize:#007577:60",
"networks_cable.png^[colorize:#007577:60",
"networks_hole.png^[colorize:#007577:60",
},
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Pipe:after_dig_tube(pos, oldnode, oldmetadata)
end,
paramtype2 = "facedir",
drawtype = "nodebox",
node_box = {
type = "fixed",
fixed = {
{-3/16, -4/8, -3/16, 3/16, 3/16, 3/16},
{-3/16, -3/16, -4/8, 3/16, 3/16, -3/16},
},
},
on_rotate = screwdriver.disallow,
paramtype = "light",
use_texture_alpha = "clip",
sunlight_propagates = true,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2, test_trowel = 1, not_in_creative_inventory=1},
sounds = default.node_sound_defaults(),
drop = "networks:pipeS",
})
local size = 3/16
local Boxes = {
{{-size, -size, size, size, size, 0.5 }}, -- z+
{{-size, -size, -size, 0.5, size, size}}, -- x+
{{-size, -size, -0.5, size, size, size}}, -- z-
{{-0.5, -size, -size, size, size, size}}, -- x-
{{-size, -0.5, -size, size, size, size}}, -- y-
{{-size, -size, -size, size, 0.5, size}}, -- y+
}
local names = networks.register_junction("networks:junction", size, Boxes, Pipe, {
description = "Junction",
tiles = {"networks_junction.png^[colorize:#007577:60"},
after_place_node = function(pos, placer, itemstack, pointed_thing)
local name = "networks:junction" .. networks.junction_type(pos, Pipe)
minetest.swap_node(pos, {name = name, param2 = 0})
Pipe:after_place_node(pos)
end,
-- junction needs own 'tubelib2_on_update2' to be able to call networks.junction_type
tubelib2_on_update2 = function(pos, outdir, tlib2, node)
local name = "networks:junction" .. networks.junction_type(pos, Pipe)
minetest.swap_node(pos, {name = name, param2 = 0})
liquid.update_network(pos, 0, tlib2, node)
end,
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Pipe:after_dig_node(pos)
end,
use_texture_alpha = "clip",
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2},
sounds = default.node_sound_defaults(),
}, 63)
liquid.register_nodes(names, Pipe, "junc")
-------------------------------------------------------------------------------
-- Pump
-------------------------------------------------------------------------------
local function swap_node(pos, name)
local node = tubelib2.get_node_lvm(pos)
if node.name == name then
return
end
node.name = name
minetest.swap_node(pos, node)
end
local function turn_on(pos, mem)
swap_node(pos, "networks:pump_on")
M(pos):set_string("infotext", "pumping")
mem.running = true
-- enable marker cube
mem.dbg_cycles = 5
minetest.get_node_timer(pos):start(CYCLE_TIME)
end
local function turn_off(pos, mem)
swap_node(pos, "networks:pump_off")
M(pos):set_string("infotext", "off")
mem.running = false
minetest.get_node_timer(pos):stop()
end
local function on_rightclick(pos, node, clicker)
local mem = tubelib2.get_mem(pos)
if not mem.running then
turn_on(pos, mem)
else
turn_off(pos, mem)
end
end
local function pumping(pos)
local mem = tubelib2.get_mem(pos)
local outdir = M(pos):get_int("outdir")
local taken, name = liquid.take(pos, Pipe, networks.Flip[outdir], nil, AMOUNT, mem.dbg_cycles > 0)
if taken > 0 then
print("pumping " .. name .. " " .. taken)
local leftover = liquid.put(pos, Pipe, outdir, name, taken, mem.dbg_cycles > 0)
if leftover and leftover > 0 then
liquid.untake(pos, Pipe, networks.Flip[outdir], name, leftover)
if leftover == taken then
turn_off(pos, mem)
return false
end
end
else
print("pumping -")
end
mem.dbg_cycles = mem.dbg_cycles - 1
return true
end
local function after_place_node(pos)
local outdir = networks.side_to_outdir(pos, "B")
M(pos):set_int("outdir", outdir)
Pipe:after_place_node(pos, {outdir})
M(pos):set_string("infotext", "off")
tubelib2.init_mem(pos)
end
local function after_dig_node(pos, oldnode, oldmetadata)
local outdir = tonumber(oldmetadata.fields.outdir or 0)
Pipe:after_dig_node(pos, {outdir})
tubelib2.del_mem(pos)
end
minetest.register_node("networks:pump_off", {
description = "Pump",
tiles = {
-- up, down, right, left, back, front
'networks_arrow.png^[colorize:#007577:60',
'networks_pump.png^[colorize:#007577:60',
'networks_pump.png^[colorize:#007577:60',
'networks_pump.png^[colorize:#007577:60',
'networks_conn.png^[colorize:#007577:60',
'networks_conn.png^[colorize:#007577:60',
},
after_place_node = after_place_node,
after_dig_node = after_dig_node,
on_timer = pumping,
on_rightclick = on_rightclick,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2},
sounds = default.node_sound_defaults(),
})
minetest.register_node("networks:pump_on", {
description = "Pump",
tiles = {
-- up, down, right, left, back, front
'networks_arrow.png^[colorize:#007577:60',
'networks_pump.png^[colorize:#007577:60',
'networks_pump.png^[colorize:#007577:60',
'networks_pump.png^[colorize:#007577:60',
'networks_conn.png^[colorize:#007577:60',
'networks_conn.png^[colorize:#007577:60',
},
after_place_node = after_place_node,
after_dig_node = after_dig_node,
on_timer = pumping,
on_rightclick = on_rightclick,
paramtype = "light",
light_source = 8,
paramtype2 = "facedir",
diggable = false,
drop = "",
groups = {not_in_creative_inventory = 1},
is_ground_content = false,
sounds = default.node_sound_defaults(),
})
-- Pumps have to provide one output and one input side
liquid.register_nodes({"networks:pump_off", "networks:pump_on"}, Pipe, "pump", {"F", "B"}, {})
-------------------------------------------------------------------------------
-- Tank
-------------------------------------------------------------------------------
local function register_tank(name, description, liquid_name, liquid_amount)
minetest.register_node(name, {
description = description,
tiles = {
-- up, down, right, left, back, front
"networks_tank.png^[colorize:#007577:60",
"networks_tank.png^[colorize:#007577:60",
"networks_tank.png^[colorize:#007577:60",
"networks_tank.png^[colorize:#007577:60",
"networks_tank.png^[colorize:#007577:60",
'networks_tank.png^[colorize:#007577:60',
},
after_place_node = function(pos)
Pipe:after_place_node(pos)
local mem = tubelib2.init_mem(pos)
mem.liquid = {}
mem.liquid.name = liquid_name
mem.liquid.amount = liquid_amount
M(pos):set_string("infotext", networks.liquid.get_item(mem))
minetest.get_node_timer(pos):start(CYCLE_TIME)
end,
after_dig_node = function(pos, oldnode, oldmetadata)
Pipe:after_dig_node(pos)
tubelib2.del_mem(pos)
end,
on_timer = function(pos, elapsed)
local mem = tubelib2.get_mem(pos)
M(pos):set_string("infotext", networks.liquid.get_item(mem))
return true
end,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2},
sounds = default.node_sound_defaults(),
})
end
-- 3 types of test tanks
register_tank("networks:tank1", "Water Tank", "water", STORAGE_CAPA)
register_tank("networks:tank2", "Milk Tank", "milk", STORAGE_CAPA)
register_tank("networks:tank3", "Empty Tank", nil, 0)
liquid.register_nodes({"networks:tank1", "networks:tank2", "networks:tank3"},
Pipe, "tank", nil, {
capa = STORAGE_CAPA,
peek = function(pos, indir)
local mem = tubelib2.get_mem(pos)
return liquid.srv_peek(mem)
end,
put = function(pos, indir, name, amount)
local mem = tubelib2.get_mem(pos)
return liquid.srv_put(mem, name, amount, STORAGE_CAPA)
end,
take = function(pos, indir, name, amount)
local mem = tubelib2.get_mem(pos)
return liquid.srv_take(mem, name, amount)
end,
untake = function(pos, indir, name, amount)
local mem = tubelib2.get_mem(pos)
return liquid.srv_put(mem, name, amount, STORAGE_CAPA)
end,
}
)
-------------------------------------------------------------------------------
-- Valve
-------------------------------------------------------------------------------
local node_box = {
type = "fixed",
fixed = {
{-5/16, -5/16, -4/8, 5/16, 5/16, 4/8},
},
}
-- The on-valve is a "primary node" like pipes
minetest.register_node("networks:valve_on", {
description = "Valve",
paramtype = "light",
drawtype = "nodebox",
node_box = node_box,
tiles = {
"networks_switch_on.png^[transformR90^[colorize:#007577:60",
"networks_switch_on.png^[transformR90^[colorize:#007577:60",
"networks_switch_on.png^[colorize:#007577:60",
"networks_switch_on.png^[colorize:#007577:60",
"networks_switch_hole.png^[colorize:#007577:60",
"networks_switch_hole.png^[colorize:#007577:60",
},
after_place_node = function(pos, placer, itemstack, pointed_thing)
if not Pipe:after_place_tube(pos, placer, pointed_thing) then
minetest.remove_node(pos)
return true
end
return false
end,
on_rightclick = function(pos, node, clicker)
if liquid.turn_valve_off(pos, Pipe, "networks:valve_off", "networks:valve_on") then
minetest.sound_play("doors_glass_door_open", {
pos = pos,
gain = 1,
max_hear_distance = 5})
end
end,
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Pipe:after_dig_tube(pos, oldnode, oldmetadata)
end,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
use_texture_alpha = "clip",
sunlight_propagates = true,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2},
sounds = default.node_sound_defaults(),
})
-- The off-valve is a "secondary node" without connection sides
minetest.register_node("networks:valve_off", {
description = "Valve",
paramtype = "light",
drawtype = "nodebox",
node_box = node_box,
tiles = {
"networks_switch_off.png^[transformR90^[colorize:#007577:60",
"networks_switch_off.png^[transformR90^[colorize:#007577:60",
"networks_switch_off.png^[colorize:#007577:60",
"networks_switch_off.png^[colorize:#007577:60",
"networks_switch_hole.png^[colorize:#007577:60",
"networks_switch_hole.png^[colorize:#007577:60",
},
on_rightclick = function(pos, node, clicker)
if liquid.turn_valve_on(pos, Pipe, "networks:valve_off", "networks:valve_on") then
minetest.sound_play("doors_glass_door_open", {
pos = pos,
gain = 1,
max_hear_distance = 5})
end
end,
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Pipe:after_dig_node(pos)
end,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
use_texture_alpha = "clip",
sunlight_propagates = true,
is_ground_content = false,
drop = "networks:valve_on",
groups = {crumbly = 2, cracky = 2, snappy = 2, test_trowel = 1, not_in_creative_inventory = 1},
sounds = default.node_sound_defaults(),
})
liquid.register_nodes({"networks:valve_off"}, Pipe, "tank", {}, {})
@@ -0,0 +1,585 @@
--[[
Networks
========
Copyright (C) 2021 Joachim Stolberg
AGPL v3
See LICENSE.txt for more information
]]--
-- for lazy programmers
local P2S = function(pos) if pos then return minetest.pos_to_string(pos) end end
local S2P = minetest.string_to_pos
local M = minetest.get_meta
local CYCLE_TIME = 2
local STORAGE_CAPA = 500
local GEN_MAX = 20
local CON_MAX = 5
local HIDDEN = true -- enable/disable hidden nodes
local function round(val)
if val > 100 then
return math.floor(val + 0.5)
elseif val > 10 then
return math.floor((val * 10) + 0.5) / 10
else
return math.floor((val * 100) + 0.5) / 100
end
end
local power = networks.power
-------------------------------------------------------------------------------
-- Cable
-------------------------------------------------------------------------------
local Cable = tubelib2.Tube:new({
dirs_to_check = {1,2,3,4,5,6},
max_tube_length = 100,
tube_type = "pwr",
primary_node_names = {"networks:cableS", "networks:cableA", "networks:switch_on"},
secondary_node_names = {}, -- Names will be added via 'power.register_nodes'
after_place_tube = function(pos, param2, tube_type, num_tubes, tbl)
local name = minetest.get_node(pos).name
if name == "networks:switch_on" or name == "networks:switch_off" then
minetest.swap_node(pos, {name = name, param2 = param2 % 32})
elseif not networks.hidden_name(pos) then
minetest.swap_node(pos, {name = "networks:cable"..tube_type, param2 = param2 % 32})
end
M(pos):set_int("netw_param2", param2)
end,
})
if HIDDEN then
-- Enable hidden cables
networks.use_metadata(Cable)
networks.register_hidden_message("Use the tool to remove the node.")
networks.register_filling_items({
"default:stone",
"default:stonebrick",
"default:stone_block",
"default:clay",
"default:snowblock",
"default:ice",
"default:glass",
"default:obsidian_glass",
"default:brick",
"default:tree",
"default:wood",
"default:jungletree",
"default:junglewood",
"default:pine_tree",
"default:pine_wood",
"default:acacia_tree",
"default:acacia_wood",
"default:aspen_tree",
"default:aspen_wood",
"default:steelblock",
"default:copperblock",
"default:tinblock",
"default:bronzeblock",
"default:goldblock",
"default:mese",
"default:diamondblock",
})
end
-- Use global callback instead of node related functions
Cable:register_on_tube_update2(function(pos, outdir, tlib2, node)
power.update_network(pos, outdir, tlib2, node)
end)
minetest.register_node("networks:cableS", {
description = "Cable",
tiles = { -- Top, base, right, left, front, back
"networks_cable.png",
"networks_cable.png",
"networks_cable.png",
"networks_cable.png",
"networks_hole.png",
"networks_hole.png",
},
after_place_node = function(pos, placer, itemstack, pointed_thing)
if not Cable:after_place_tube(pos, placer, pointed_thing) then
minetest.remove_node(pos)
return true
end
return false
end,
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Cable:after_dig_tube(pos, oldnode, oldmetadata)
end,
paramtype2 = "facedir",
drawtype = "nodebox",
node_box = {
type = "fixed",
fixed = {
{-3/16, -3/16, -4/8, 3/16, 3/16, 4/8},
},
},
on_rotate = screwdriver.disallow,
paramtype = "light",
use_texture_alpha = "clip",
sunlight_propagates = true,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2, test_trowel = 1},
sounds = default.node_sound_defaults(),
})
minetest.register_node("networks:cableA", {
description = "Cable",
tiles = { -- Top, base, right, left, front, back
"networks_cable.png",
"networks_hole.png",
"networks_cable.png",
"networks_cable.png",
"networks_cable.png",
"networks_hole.png",
},
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Cable:after_dig_tube(pos, oldnode, oldmetadata)
end,
paramtype2 = "facedir",
drawtype = "nodebox",
node_box = {
type = "fixed",
fixed = {
{-3/16, -4/8, -3/16, 3/16, 3/16, 3/16},
{-3/16, -3/16, -4/8, 3/16, 3/16, -3/16},
},
},
on_rotate = screwdriver.disallow,
paramtype = "light",
use_texture_alpha = "clip",
sunlight_propagates = true,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2, test_trowel = 1, not_in_creative_inventory=1},
sounds = default.node_sound_defaults(),
drop = "networks:cableS",
})
local size = 3/16
local Boxes = {
{{-size, -size, size, size, size, 0.5 }}, -- z+
{{-size, -size, -size, 0.5, size, size}}, -- x+
{{-size, -size, -0.5, size, size, size}}, -- z-
{{-0.5, -size, -size, size, size, size}}, -- x-
{{-size, -0.5, -size, size, size, size}}, -- y-
{{-size, -size, -size, size, 0.5, size}}, -- y+
}
local names = networks.register_junction("networks:junction", size, Boxes, Cable, {
description = "Junction",
tiles = {"networks_junction.png"},
after_place_node = function(pos, placer, itemstack, pointed_thing)
local name = "networks:junction"..networks.junction_type(pos, Cable)
minetest.swap_node(pos, {name = name, param2 = 0})
Cable:after_place_node(pos)
end,
-- junction needs own 'tubelib2_on_update2' to be able to call networks.junction_type
tubelib2_on_update2 = function(pos, outdir, tlib2, node)
if not networks.hidden_name(pos) then
local name = "networks:junction" .. networks.junction_type(pos, Cable)
minetest.swap_node(pos, {name = name, param2 = 0})
end
power.update_network(pos, 0, tlib2, node)
end,
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Cable:after_dig_node(pos)
end,
use_texture_alpha = "clip",
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2, test_trowel = 1},
sounds = default.node_sound_defaults(),
}, 63)
power.register_nodes(names, Cable, "junc")
-------------------------------------------------------------------------------
-- Generator
-------------------------------------------------------------------------------
minetest.register_node("networks:generator", {
description = "Generator",
tiles = {
-- up, down, right, left, back, front
'networks_gen.png',
'networks_gen.png',
'networks_gen.png',
'networks_gen.png',
'networks_gen.png',
'networks_conn.png',
},
after_place_node = function(pos)
local outdir = networks.side_to_outdir(pos, "F")
M(pos):set_int("outdir", outdir)
Cable:after_place_node(pos, {outdir})
M(pos):set_string("infotext", "off")
tubelib2.init_mem(pos)
end,
after_dig_node = function(pos, oldnode, oldmetadata)
local outdir = tonumber(oldmetadata.fields.outdir or 0)
Cable:after_dig_node(pos, {outdir})
tubelib2.del_mem(pos)
end,
on_timer = function(pos, elapsed)
local outdir = M(pos):get_int("outdir")
local mem = tubelib2.get_mem(pos)
mem.provided = power.provide_power(pos, Cable, outdir, GEN_MAX)
mem.load = power.get_storage_load(pos, Cable, outdir, GEN_MAX)
M(pos):set_string("infotext", "providing "..round(mem.provided))
return true
end,
on_rightclick = function(pos, node, clicker)
local mem = tubelib2.get_mem(pos)
if mem.running then
mem.running = false
M(pos):set_string("infotext", "off")
minetest.get_node_timer(pos):stop()
else
mem.provided = mem.provided or 0
mem.running = true
M(pos):set_string("infotext", "providing "..round(mem.provided))
minetest.get_node_timer(pos):start(CYCLE_TIME)
end
local outdir = M(pos):get_int("outdir")
power.start_storage_calc(pos, Cable, outdir)
end,
get_generator_data = function(pos, outdir, tlib2)
local mem = tubelib2.get_mem(pos)
if mem.running then
-- generator storage capa = 2 * performance
return {level = (mem.load or 0) / GEN_MAX, perf = GEN_MAX, capa = GEN_MAX * 2}
end
end,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2},
sounds = default.node_sound_defaults(),
})
-- Generators have to provide one output side
power.register_nodes({"networks:generator"}, Cable, "gen", {"F"})
-------------------------------------------------------------------------------
-- Storage
-------------------------------------------------------------------------------
minetest.register_node("networks:storage", {
description = "Storage",
tiles = {
-- up, down, right, left, back, front
"networks_sto.png",
"networks_sto.png",
"networks_sto.png",
"networks_sto.png",
"networks_sto.png",
'networks_conn.png',
},
after_place_node = function(pos)
local outdir = networks.side_to_outdir(pos, "F")
M(pos):set_int("outdir", outdir)
Cable:after_place_node(pos, {outdir})
tubelib2.init_mem(pos)
M(pos):set_string("infotext", "off")
end,
after_dig_node = function(pos, oldnode, oldmetadata)
local outdir = tonumber(oldmetadata.fields.outdir or 0)
Cable:after_dig_node(pos, {outdir})
tubelib2.del_mem(pos)
end,
on_timer = function(pos, elapsed)
local mem = tubelib2.get_mem(pos)
local outdir = M(pos):get_int("outdir")
local data = power.get_storage_data(pos, Cable, outdir)
if data then
mem.load = data.level * STORAGE_CAPA
local percent = data.level * 100
M(pos):set_string("infotext", "level = "..round(percent)..", charging = "..data.charging)
end
return true
end,
on_rightclick = function(pos, node, clicker)
local mem = tubelib2.get_mem(pos)
if mem.running then
mem.running = false
M(pos):set_string("infotext", "off")
minetest.get_node_timer(pos):stop()
else
mem.provided = mem.provided or 0
mem.running = true
local percent = (mem.load or 0) / STORAGE_CAPA * 100
M(pos):set_string("infotext", "level = "..round(percent))
minetest.get_node_timer(pos):start(CYCLE_TIME)
end
local outdir = M(pos):get_int("outdir")
power.start_storage_calc(pos, Cable, outdir)
end,
get_storage_data = function(pos, outdir, tlib2)
local mem = tubelib2.get_mem(pos)
if mem.running then
return {level = (mem.load or 0) / STORAGE_CAPA, capa = STORAGE_CAPA}
end
end,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2},
sounds = default.node_sound_defaults(),
})
-- Storage nodes have to provide one input/output side
power.register_nodes({"networks:storage"}, Cable, "sto", {"F"})
-------------------------------------------------------------------------------
-- Consumer
-------------------------------------------------------------------------------
local function swap_node(pos, name)
local node = tubelib2.get_node_lvm(pos)
if node.name == name then
return
end
node.name = name
minetest.swap_node(pos, node)
end
local function turn_on(pos)
swap_node(pos, "networks:consumer_on")
M(pos):set_string("infotext", "on")
local mem = tubelib2.get_mem(pos)
mem.running = true
minetest.get_node_timer(pos):start(CYCLE_TIME)
end
local function turn_off(pos)
swap_node(pos, "networks:consumer")
M(pos):set_string("infotext", "off")
local mem = tubelib2.get_mem(pos)
mem.running = false
minetest.get_node_timer(pos):stop()
end
local function on_rightclick(pos, node, clicker)
local mem = tubelib2.get_mem(pos)
if not mem.running and power.power_available(pos, Cable) then
turn_on(pos)
else
turn_off(pos)
end
end
local function after_place_node(pos)
M(pos):set_string("infotext", "off")
Cable:after_place_node(pos)
tubelib2.init_mem(pos)
end
local function after_dig_node(pos, oldnode)
Cable:after_dig_node(pos)
tubelib2.del_mem(pos)
end
minetest.register_node("networks:consumer", {
description = "Consumer",
tiles = {'networks_con.png^[colorize:#000000:50'},
on_timer = function(pos, elapsed)
local consumed = power.consume_power(pos, Cable, nil, CON_MAX)
if consumed == CON_MAX then
swap_node(pos, "networks:consumer_on")
M(pos):set_string("infotext", "on")
end
return true
end,
on_rightclick = on_rightclick,
after_place_node = after_place_node,
after_dig_node = after_dig_node,
paramtype2 = "facedir",
groups = {choppy = 2, cracky = 2, crumbly = 2},
is_ground_content = false,
sounds = default.node_sound_defaults(),
})
minetest.register_node("networks:consumer_on", {
description = "Consumer",
tiles = {'networks_con.png'},
on_timer = function(pos, elapsed)
local consumed = power.consume_power(pos, Cable, nil, CON_MAX)
if consumed < CON_MAX then
swap_node(pos, "networks:consumer")
M(pos):set_string("infotext", "no power")
end
return true
end,
on_rightclick = on_rightclick,
after_place_node = after_place_node,
after_dig_node = after_dig_node,
paramtype = "light",
light_source = minetest.LIGHT_MAX,
paramtype2 = "facedir",
diggable = false,
drop = "",
groups = {not_in_creative_inventory = 1},
is_ground_content = false,
sounds = default.node_sound_defaults(),
})
-- Consumer can provide dedicated input sides, otherwise all sides are used
power.register_nodes({"networks:consumer", "networks:consumer_on"}, Cable, "con")
-------------------------------------------------------------------------------
-- Switch/valve
-------------------------------------------------------------------------------
local node_box = {
type = "fixed",
fixed = {
{-5/16, -5/16, -4/8, 5/16, 5/16, 4/8},
},
}
-- The on-switch is a "primary node" like cables
minetest.register_node("networks:switch_on", {
description = "Switch",
paramtype = "light",
drawtype = "nodebox",
node_box = node_box,
tiles = {
"networks_switch_on.png^[transformR90",
"networks_switch_on.png^[transformR90",
"networks_switch_on.png",
"networks_switch_on.png",
"networks_switch_hole.png",
"networks_switch_hole.png",
},
after_place_node = function(pos, placer, itemstack, pointed_thing)
if not Cable:after_place_tube(pos, placer, pointed_thing) then
minetest.remove_node(pos)
return true
end
return false
end,
on_rightclick = function(pos, node, clicker)
if power.turn_switch_off(pos, Cable, "networks:switch_off", "networks:switch_on") then
minetest.sound_play("doors_glass_door_open", {
pos = pos,
gain = 1,
max_hear_distance = 5})
end
end,
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Cable:after_dig_tube(pos, oldnode, oldmetadata)
end,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
use_texture_alpha = "clip",
sunlight_propagates = true,
is_ground_content = false,
groups = {crumbly = 2, cracky = 2, snappy = 2, test_trowel = 1},
sounds = default.node_sound_defaults(),
})
-- The off-switch is a "secondary node" without connection sides
minetest.register_node("networks:switch_off", {
description = "Switch",
paramtype = "light",
drawtype = "nodebox",
node_box = node_box,
tiles = {
"networks_switch_off.png^[transformR90",
"networks_switch_off.png^[transformR90",
"networks_switch_off.png",
"networks_switch_off.png",
"networks_switch_hole.png",
"networks_switch_hole.png",
},
on_rightclick = function(pos, node, clicker)
if power.turn_switch_on(pos, Cable, "networks:switch_off", "networks:switch_on") then
minetest.sound_play("doors_glass_door_open", {
pos = pos,
gain = 1,
max_hear_distance = 5})
end
end,
after_dig_node = function(pos, oldnode, oldmetadata, digger)
Cable:after_dig_node(pos)
end,
paramtype2 = "facedir",
on_rotate = screwdriver.disallow,
use_texture_alpha = "clip",
sunlight_propagates = true,
is_ground_content = false,
drop = "networks:switch_on",
groups = {crumbly = 2, cracky = 2, snappy = 2, test_trowel = 1, not_in_creative_inventory = 1},
sounds = default.node_sound_defaults(),
})
power.register_nodes({"networks:switch_off"}, Cable, "con", {})
-------------------------------------------------------------------------------
-- Hide/open tool
-------------------------------------------------------------------------------
-- Hide or open a node
local function replace_node(itemstack, placer, pointed_thing)
if pointed_thing.type == "node" then
local pos = pointed_thing.under
local name = placer:get_player_name()
if minetest.is_protected(pos, name) then
return
end
local node = minetest.get_node(pos)
local res = false
if minetest.get_item_group(node.name, "test_trowel") == 1 then
res = networks.hide_node(pos, node, placer)
elseif networks.hidden_name(pos) then
res = networks.open_node(pos, node, placer)
end
if res then
minetest.sound_play("default_dig_snappy", {
pos = pos,
gain = 1,
max_hear_distance = 5})
elseif placer and placer.get_player_name then
minetest.chat_send_player(placer:get_player_name(), "Invalid fill material in inventory slot 1!")
end
end
end
minetest.register_tool("networks:tool", {
description = "Hide Tool\n(Fill material to the right of the tool)",
inventory_image = "networks_tool.png",
wield_image = "networks_tool.png",
use_texture_alpha = "clip",
groups = {cracky=1},
on_use = replace_node,
on_place = replace_node,
node_placement_prediction = "",
stack_max = 1,
})
-------------------------------------------------------------------------------
-- Test Commands
-------------------------------------------------------------------------------
minetest.register_chatcommand("power_data", {
func = function(name)
local player = minetest.get_player_by_name(name)
local pos = player:get_pos()
pos.y = pos.y - 0.5
pos = vector.round(pos)
local data = power.get_network_data(pos, Cable)
if data then
local s = string.format("Netw %u: generated = %u/%u, consumed = %u, storage load = %u/%u",
data.netw_num, round(data.provided),
data.available, round(data.consumed),
round(data.curr_load), round(data.max_capa))
return true, s
end
return false, "No valid node position!"
end
})
return Cable
@@ -0,0 +1,212 @@
--[[
Networks
========
Copyright (C) 2021 Joachim Stolberg
AGPL v3
See LICENSE.txt for more information
]]--
-- for lazy programmers
local P2S = function(pos) if pos then return minetest.pos_to_string(pos) end end
local S2P = minetest.string_to_pos
local M = minetest.get_meta
local power = networks.power
local liquid = networks.liquid
local function round(val)
return math.floor(val + 0.5)
end
local function get_list(tbl, sep)
local keys = {}
for k,v in pairs(tbl) do
if v then
keys[#keys + 1] = k
end
end
return table.concat(keys, sep)
end
local NetwTypes = false
local function collect_netw_types()
NetwTypes = {}
for k,v in pairs(networks.registered_networks.power) do
NetwTypes[k] = "power"
end
for k,v in pairs(networks.registered_networks.liquid) do
NetwTypes[k] = "liquid"
end
end
local function print_sides(pos, api, netw_type)
local t = {}
for _, dir in ipairs(networks.get_node_connection_dirs(pos, netw_type)) do
t[#t + 1]= tubelib2.dir_to_string(dir)
end
print("# " .. api .. " - " .. netw_type .. " dirs: " .. table.concat(t, ", "))
end
local function print_power_network_data(pos, api, netw_type, outdir)
local tlib2 = networks.registered_networks[api][netw_type]
local data = power.get_network_data(pos, tlib2, outdir)
local netw = networks.get_network_table(pos, tlib2, outdir)
if netw then
print(" - Number of network nodes: " .. (netw.num_nodes or 0))
print(" - Number of generators: " .. #(netw.gen or {}))
print(" - Number of consumers: " .. #(netw.con or {}))
print(" - Number of storage systems: " .. #(netw.sto or {}))
end
if data then
local s = string.format(" - Netw %u: generated = %u/%u, consumed = %u, storage load = %u/%u",
data.netw_num, round(data.provided),
data.available, round(data.consumed),
round(data.curr_load), round(data.max_capa))
print(s)
end
end
local function print_liquid_network_data(pos, api, netw_type, outdir)
local tlib2 = networks.registered_networks[api][netw_type]
local netw = networks.get_network_table(pos, tlib2, outdir)
if netw then
print(" - Number of network nodes: " .. (netw.num_nodes or 0))
print(" - Number of pumps: " .. #(netw.pump or {}))
print(" - Number of tanks: " .. #(netw.tank or {}))
end
end
local function is_junction(pos, tlib2)
local ndef = networks.net_def(pos, tlib2.tube_type)
return ndef.ntype == "junc"
end
local function print_netID(pos, api, netw_type)
local tlib2 = networks.registered_networks[api][netw_type]
for _,outdir in ipairs(networks.get_outdirs(pos, tlib2)) do
local netID = networks.get_netID(pos, outdir)
local s = tubelib2.dir_to_string(outdir)
if netID then
print("- " .. s .. ": netwNum for '" .. netw_type .. "': " .. networks.netw_num(netID))
if api == "liquid" then
print_liquid_network_data(pos, api, netw_type, outdir)
elseif api == "power" then
print_power_network_data(pos, api, netw_type, outdir)
end
elseif is_junction(pos, tlib2) then
netID = networks.get_netID(pos, 0)
if netID then
print("- " .. s .. ": Junction netwNum: " .. networks.netw_num(netID))
break
end
else
print("- " .. s .. ": Node has no '" .. netw_type .. "' netID!!!")
end
end
end
local function print_secondary_node(pos, api, netw_type)
local tlib2 = networks.registered_networks[api][netw_type]
if tlib2:is_secondary_node(pos) then
print("- Secondary node: true")
else
print("- Is no secondary node!!!")
end
end
local function print_valid_sides(name, api, netw_type)
local tlib2 = networks.registered_networks[api][netw_type]
local sides = tlib2.valid_node_contact_sides[name]
if sides then
print("- Valid node contact sides: " .. get_list(sides, ", "))
else
print("- Has no valid node contact sides!!!")
end
end
local function print_connected_nodes(pos, api, netw_type)
local tlib2 = networks.registered_networks[api][netw_type]
for outdir = 1,6 do
local destpos, indir = tlib2:get_connected_node_pos(pos, outdir)
if destpos and tlib2:connected(destpos) then
local s1 = tubelib2.dir_to_string(outdir)
local s2 = tubelib2.dir_to_string(indir)
local node = minetest.get_node(destpos)
print("- " .. s1 .. ": Node connected to " .. node.name .. " at " .. P2S(destpos) .. " from " .. s2)
end
end
end
-- debug print of node related data
local function debug_print(pos)
local node = minetest.get_node(pos)
local ndef = minetest.registered_nodes[node.name]
if not NetwTypes then
collect_netw_types()
end
if not ndef.networks then
print("No networks node!!!")
return
end
print("########## " .. node.name .. " ###########")
for netw_type,api in pairs(NetwTypes) do
if ndef.networks[netw_type] then
print_sides(pos, api, netw_type)
print_netID(pos, api, netw_type)
print_secondary_node(pos, api, netw_type)
print_valid_sides(node.name, api, netw_type)
print_connected_nodes(pos, api, netw_type)
end
end
print("#####################")
end
local function on_use(itemstack, placer, pointed_thing)
if pointed_thing.type == "node" then
local pos = pointed_thing.under
networks.register_observe_pos(pos)
if placer:get_player_control().sneak then
debug_print(pos)
else
debug_print(pos)
end
else
networks.register_observe_pos(nil)
end
end
local function on_place(itemstack, placer, pointed_thing)
if pointed_thing.type == "node" then
local pos = pointed_thing.under
networks.register_observe_pos(nil)
if placer:get_player_control().sneak then
debug_print(pos)
else
debug_print(pos)
end
else
networks.register_observe_pos(nil)
end
end
minetest.register_tool("networks:tool2", {
description = "Debugging Tool",
inventory_image = "networks_tool.png",
wield_image = "networks_tool.png",
use_texture_alpha = "clip",
groups = {cracky=1},
on_use = on_use,
on_place = on_place,
node_placement_prediction = "",
stack_max = 1,
})