mods that hopefully work for a TechAge-based pack
This commit is contained in:
@@ -0,0 +1,199 @@
|
||||
--[[
|
||||
|
||||
TechAge
|
||||
=======
|
||||
|
||||
Copyright (C) 2017-2022 Joachim Stolberg
|
||||
|
||||
AGPL v3
|
||||
See LICENSE.txt for more information
|
||||
|
||||
TA5 teleport pipe
|
||||
|
||||
]]--
|
||||
|
||||
-- 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 S = techage.S
|
||||
|
||||
local Pipe = techage.LiquidPipe
|
||||
local teleport = techage.teleport
|
||||
local Cable = techage.ElectricCable
|
||||
local power = networks.power
|
||||
local liquid = networks.liquid
|
||||
|
||||
local STANDBY_TICKS = 4
|
||||
local COUNTDOWN_TICKS = 4
|
||||
local CYCLE_TIME = 2
|
||||
local PWR_NEEDED = 12
|
||||
local EX_POINTS = 30
|
||||
local MAX_DIST = 500
|
||||
local DESCRIPTION = S("TA5 Teleport Block Liquids")
|
||||
|
||||
local function formspec(self, pos, nvm)
|
||||
return "size[8,3]"..
|
||||
"box[0,-0.1;7.8,0.5;#c6e8ff]" ..
|
||||
"label[0.5,-0.1;" .. minetest.colorize( "#000000", DESCRIPTION) .. "]" ..
|
||||
"label[0.2,0.8;" .. M(pos):get_string("tele_status") .. "]" ..
|
||||
"image_button[3.5,2;1,1;" .. self:get_state_button_image(nvm) .. ";state_button;]" ..
|
||||
"tooltip[3.5,2;1,1;" .. self:get_state_tooltip(nvm) .. "]"
|
||||
end
|
||||
|
||||
local function can_start(pos, nvm, state)
|
||||
return teleport.is_connected(pos)
|
||||
end
|
||||
|
||||
local State = techage.NodeStates:new({
|
||||
node_name_passive = "techage:ta5_tele_pipe",
|
||||
infotext_name = DESCRIPTION,
|
||||
cycle_time = CYCLE_TIME,
|
||||
standby_ticks = STANDBY_TICKS,
|
||||
countdown_ticks = COUNTDOWN_TICKS,
|
||||
formspec_func = formspec,
|
||||
can_start = can_start,
|
||||
})
|
||||
|
||||
local function consume_power(pos, nvm)
|
||||
if techage.needs_power(nvm) then
|
||||
local taken = power.consume_power(pos, Cable, nil, PWR_NEEDED)
|
||||
if techage.is_running(nvm) then
|
||||
if taken < PWR_NEEDED then
|
||||
State:nopower(pos, nvm)
|
||||
else
|
||||
return true -- keep running
|
||||
end
|
||||
elseif taken == PWR_NEEDED then
|
||||
State:start(pos, nvm)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
minetest.register_node("techage:ta5_tele_pipe", {
|
||||
description = DESCRIPTION,
|
||||
tiles = {
|
||||
-- up, down, right, left, back, front
|
||||
"techage_filling_ta4.png^techage_frame_ta5_top.png^techage_appl_tele_pipe.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5_top.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5.png^techage_appl_teleport.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5.png^techage_appl_hole_pipe.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5.png^techage_appl_teleport.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5.png^techage_appl_teleport.png",
|
||||
},
|
||||
|
||||
after_place_node = function(pos, placer)
|
||||
local meta = M(pos)
|
||||
local nvm = techage.get_nvm(pos)
|
||||
local node = minetest.get_node(pos)
|
||||
local pipe_dir = techage.side_to_outdir("L", node.param2)
|
||||
local number = techage.add_node(pos, "techage:ta5_tele_pipe")
|
||||
State:node_init(pos, nvm, number)
|
||||
meta:set_int("pipe_dir", pipe_dir)
|
||||
meta:set_string("owner", placer:get_player_name())
|
||||
Pipe:after_place_node(pos, {pipe_dir})
|
||||
Cable:after_place_node(pos)
|
||||
teleport.prepare_pairing(pos, "ta5_tele_pipe")
|
||||
end,
|
||||
|
||||
on_receive_fields = function(pos, formname, fields, player)
|
||||
if minetest.is_protected(pos, player:get_player_name()) then
|
||||
return
|
||||
end
|
||||
if teleport.is_connected(pos) then
|
||||
local nvm = techage.get_nvm(pos)
|
||||
State:state_button_event(pos, nvm, fields)
|
||||
M(pos):set_string("formspec", formspec(State, pos, nvm))
|
||||
else
|
||||
teleport.after_formspec(pos, player, fields, MAX_DIST, EX_POINTS)
|
||||
end
|
||||
end,
|
||||
|
||||
on_rightclick = function(pos, clicker, listname)
|
||||
if teleport.is_connected(pos) then
|
||||
local nvm = techage.get_nvm(pos)
|
||||
teleport.update_status(pos)
|
||||
M(pos):set_string("formspec", formspec(State, pos, nvm))
|
||||
else
|
||||
M(pos):set_string("formspec", teleport.formspec(pos))
|
||||
end
|
||||
end,
|
||||
|
||||
on_timer = function(pos, elapsed)
|
||||
local nvm = techage.get_nvm(pos)
|
||||
consume_power(pos, nvm)
|
||||
-- the state has to be triggered by on_push_item
|
||||
State:idle(pos, nvm)
|
||||
return State:is_active(nvm)
|
||||
end,
|
||||
|
||||
after_dig_node = function(pos, oldnode, oldmetadata, digger)
|
||||
techage.remove_node(pos, oldnode, oldmetadata)
|
||||
teleport.stop_pairing(pos, oldmetadata)
|
||||
Pipe:after_dig_node(pos)
|
||||
Cable:after_dig_node(pos)
|
||||
techage.del_mem(pos)
|
||||
end,
|
||||
|
||||
paramtype2 = "facedir", -- important!
|
||||
on_rotate = screwdriver.disallow, -- important!
|
||||
is_ground_content = false,
|
||||
groups = {choppy=2, cracky=2, crumbly=2},
|
||||
sounds = default.node_sound_wood_defaults(),
|
||||
})
|
||||
|
||||
minetest.register_craft({
|
||||
output = "techage:ta5_tele_pipe",
|
||||
recipe = {
|
||||
{"techage:aluminum", "dye:red", "techage:aluminum"},
|
||||
{"techage:ta3_pipeS", "techage:usmium_nuggets", "techage:ta5_aichip"},
|
||||
{"techage:ta4_carbon_fiber", "", "techage:ta4_carbon_fiber"},
|
||||
},
|
||||
})
|
||||
|
||||
local blocked = false -- flag to prevent stack overruns (not to pump into the own "tank")
|
||||
liquid.register_nodes({"techage:ta5_tele_pipe"}, Pipe, "tank", {"L"}, {
|
||||
peek = function(pos)
|
||||
local nvm = techage.get_nvm(pos)
|
||||
return liquid.srv_peek(nvm)
|
||||
end,
|
||||
put = function(pos, indir, name, amount)
|
||||
local nvm = techage.get_nvm(pos)
|
||||
nvm.oil_amount = nvm.oil_amount or 0
|
||||
if not blocked and techage.is_operational(nvm) then
|
||||
local rmt_pos = teleport.get_remote_pos(pos)
|
||||
if rmt_pos then
|
||||
local rmt_nvm = techage.get_nvm(rmt_pos)
|
||||
if techage.is_operational(rmt_nvm) then
|
||||
local pipe_dir = M(rmt_pos):get_int("pipe_dir")
|
||||
blocked = true
|
||||
local leftover = liquid.put(rmt_pos, Pipe, pipe_dir, name, amount)
|
||||
blocked = false
|
||||
if leftover < amount then
|
||||
State:keep_running(pos, nvm, COUNTDOWN_TICKS)
|
||||
State:keep_running(rmt_pos, rmt_nvm, COUNTDOWN_TICKS)
|
||||
end
|
||||
return leftover
|
||||
else
|
||||
State:blocked(pos, nvm, S("Remote block error"))
|
||||
end
|
||||
end
|
||||
end
|
||||
return amount
|
||||
end
|
||||
})
|
||||
|
||||
techage.register_node({"techage:ta5_tele_pipe"}, {
|
||||
on_recv_message = function(pos, src, topic, payload)
|
||||
return State:on_receive_message(pos, topic, payload)
|
||||
end,
|
||||
on_beduino_receive_cmnd = function(pos, src, topic, payload)
|
||||
return State:on_beduino_receive_cmnd(pos, topic, payload)
|
||||
end,
|
||||
on_beduino_request_data = function(pos, src, topic, payload)
|
||||
return State:on_beduino_request_data(pos, topic, payload)
|
||||
end,
|
||||
})
|
||||
|
||||
power.register_nodes({"techage:ta5_tele_pipe"}, Cable, "con", {"B", "R", "F", "D", "U"})
|
||||
Pipe:set_valid_sides("techage:ta5_tele_pipe", {"L"})
|
||||
@@ -0,0 +1,191 @@
|
||||
--[[
|
||||
|
||||
TechAge
|
||||
=======
|
||||
|
||||
Copyright (C) 2017-2022 Joachim Stolberg
|
||||
|
||||
AGPL v3
|
||||
See LICENSE.txt for more information
|
||||
|
||||
TA5 teleport tube
|
||||
|
||||
]]--
|
||||
|
||||
-- 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 S = techage.S
|
||||
|
||||
local Tube = techage.Tube
|
||||
local teleport = techage.teleport
|
||||
local Cable = techage.ElectricCable
|
||||
local power = networks.power
|
||||
|
||||
local STANDBY_TICKS = 4
|
||||
local COUNTDOWN_TICKS = 4
|
||||
local CYCLE_TIME = 2
|
||||
local PWR_NEEDED = 12
|
||||
local EX_POINTS = 30
|
||||
local MAX_DIST = 500
|
||||
local DESCRIPTION = S("TA5 Teleport Block Items")
|
||||
|
||||
local function formspec(self, pos, nvm)
|
||||
return "size[8,3]"..
|
||||
"box[0,-0.1;7.8,0.5;#c6e8ff]" ..
|
||||
"label[0.5,-0.1;" .. minetest.colorize( "#000000", DESCRIPTION) .. "]" ..
|
||||
"label[0.2,0.8;" .. M(pos):get_string("tele_status") .. "]" ..
|
||||
"image_button[3.5,2;1,1;" .. self:get_state_button_image(nvm) .. ";state_button;]" ..
|
||||
"tooltip[3.5,2;1,1;" .. self:get_state_tooltip(nvm) .. "]"
|
||||
end
|
||||
|
||||
local function can_start(pos, nvm, state)
|
||||
return teleport.is_connected(pos)
|
||||
end
|
||||
|
||||
local State = techage.NodeStates:new({
|
||||
node_name_passive = "techage:ta5_tele_tube",
|
||||
infotext_name = DESCRIPTION,
|
||||
cycle_time = CYCLE_TIME,
|
||||
standby_ticks = STANDBY_TICKS,
|
||||
countdown_ticks = COUNTDOWN_TICKS,
|
||||
formspec_func = formspec,
|
||||
can_start = can_start,
|
||||
})
|
||||
|
||||
local function consume_power(pos, nvm)
|
||||
if techage.needs_power(nvm) then
|
||||
local taken = power.consume_power(pos, Cable, nil, PWR_NEEDED)
|
||||
if techage.is_running(nvm) then
|
||||
if taken < PWR_NEEDED then
|
||||
State:nopower(pos, nvm)
|
||||
else
|
||||
return true -- keep running
|
||||
end
|
||||
elseif taken == PWR_NEEDED then
|
||||
State:start(pos, nvm)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
minetest.register_node("techage:ta5_tele_tube", {
|
||||
description = DESCRIPTION,
|
||||
tiles = {
|
||||
-- up, down, right, left, back, front
|
||||
"techage_filling_ta4.png^techage_frame_ta5_top.png^techage_appl_tele_tube.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5_top.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5.png^techage_appl_teleport.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5.png^techage_appl_hole_tube.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5.png^techage_appl_teleport.png",
|
||||
"techage_filling_ta4.png^techage_frame_ta5.png^techage_appl_teleport.png",
|
||||
},
|
||||
|
||||
after_place_node = function(pos, placer)
|
||||
local meta = M(pos)
|
||||
local nvm = techage.get_nvm(pos)
|
||||
local node = minetest.get_node(pos)
|
||||
local tube_dir = techage.side_to_outdir("L", node.param2)
|
||||
local number = techage.add_node(pos, "techage:ta5_tele_tube")
|
||||
State:node_init(pos, nvm, number)
|
||||
meta:set_int("tube_dir", tube_dir)
|
||||
meta:set_string("owner", placer:get_player_name())
|
||||
Tube:after_place_node(pos, {tube_dir})
|
||||
Cable:after_place_node(pos)
|
||||
teleport.prepare_pairing(pos, "ta5_tele_tube")
|
||||
end,
|
||||
|
||||
on_receive_fields = function(pos, formname, fields, player)
|
||||
if minetest.is_protected(pos, player:get_player_name()) then
|
||||
return
|
||||
end
|
||||
if teleport.is_connected(pos) then
|
||||
local nvm = techage.get_nvm(pos)
|
||||
State:state_button_event(pos, nvm, fields)
|
||||
M(pos):set_string("formspec", formspec(State, pos, nvm))
|
||||
else
|
||||
teleport.after_formspec(pos, player, fields, MAX_DIST, EX_POINTS)
|
||||
end
|
||||
end,
|
||||
|
||||
on_rightclick = function(pos, clicker, listname)
|
||||
if teleport.is_connected(pos) then
|
||||
local nvm = techage.get_nvm(pos)
|
||||
teleport.update_status(pos)
|
||||
M(pos):set_string("formspec", formspec(State, pos, nvm))
|
||||
else
|
||||
M(pos):set_string("formspec", teleport.formspec(pos))
|
||||
end
|
||||
end,
|
||||
|
||||
on_timer = function(pos, elapsed)
|
||||
local nvm = techage.get_nvm(pos)
|
||||
consume_power(pos, nvm)
|
||||
-- the state has to be triggered by on_push_item
|
||||
State:idle(pos, nvm)
|
||||
return State:is_active(nvm)
|
||||
end,
|
||||
|
||||
after_dig_node = function(pos, oldnode, oldmetadata, digger)
|
||||
techage.remove_node(pos, oldnode, oldmetadata)
|
||||
teleport.stop_pairing(pos, oldmetadata)
|
||||
Tube:after_dig_node(pos)
|
||||
Cable:after_dig_node(pos)
|
||||
techage.del_mem(pos)
|
||||
end,
|
||||
|
||||
paramtype2 = "facedir", -- important!
|
||||
on_rotate = screwdriver.disallow, -- important!
|
||||
is_ground_content = false,
|
||||
groups = {choppy=2, cracky=2, crumbly=2},
|
||||
sounds = default.node_sound_wood_defaults(),
|
||||
})
|
||||
|
||||
minetest.register_craft({
|
||||
output = "techage:ta5_tele_tube",
|
||||
recipe = {
|
||||
{"techage:aluminum", "dye:red", "techage:aluminum"},
|
||||
{"techage:ta4_tubeS", "techage:usmium_nuggets", "techage:ta5_aichip"},
|
||||
{"techage:ta4_carbon_fiber", "", "techage:ta4_carbon_fiber"},
|
||||
},
|
||||
})
|
||||
|
||||
techage.register_node({"techage:ta5_tele_tube"}, {
|
||||
on_push_item = function(pos, in_dir, stack)
|
||||
local nvm = techage.get_nvm(pos)
|
||||
if techage.is_operational(nvm) then
|
||||
local rmt_pos = teleport.get_remote_pos(pos)
|
||||
if rmt_pos then
|
||||
local rmt_nvm = techage.get_nvm(rmt_pos)
|
||||
if techage.is_operational(rmt_nvm) then
|
||||
local tube_dir = M(rmt_pos):get_int("tube_dir")
|
||||
local leftover = techage.push_items(rmt_pos, tube_dir, stack)
|
||||
-- Moved any items
|
||||
if leftover then
|
||||
State:keep_running(pos, nvm, COUNTDOWN_TICKS)
|
||||
State:keep_running(rmt_pos, rmt_nvm, COUNTDOWN_TICKS)
|
||||
return leftover
|
||||
end
|
||||
return leftover
|
||||
else
|
||||
State:blocked(pos, nvm, S("Remote block error"))
|
||||
end
|
||||
end
|
||||
end
|
||||
return false
|
||||
end,
|
||||
is_pusher = true, -- is a pulling/pushing node
|
||||
|
||||
on_recv_message = function(pos, src, topic, payload)
|
||||
return State:on_receive_message(pos, topic, payload)
|
||||
end,
|
||||
on_beduino_receive_cmnd = function(pos, src, topic, payload)
|
||||
return State:on_beduino_receive_cmnd(pos, topic, payload)
|
||||
end,
|
||||
on_beduino_request_data = function(pos, src, topic, payload)
|
||||
return State:on_beduino_request_data(pos, topic, payload)
|
||||
end,
|
||||
})
|
||||
|
||||
power.register_nodes({"techage:ta5_tele_tube"}, Cable, "con", {"B", "R", "F", "D", "U"})
|
||||
Tube:set_valid_sides("techage:ta5_tele_tube", {"L"})
|
||||
Reference in New Issue
Block a user