f9431c5e09
interact directly with machine blocks when marks displayed hold sneak and punch a block to abort interactive setup allow removing keypad password add place sounds for mover in normal, dig and transport modes somewhat rework player punch in space code maintenance
71 lines
2.5 KiB
Lua
71 lines
2.5 KiB
Lua
-- (c) 2015-2016 rnd
|
|
-- Copyright (C) 2022-2024 мтест
|
|
-- See README.md for license details
|
|
|
|
local F, S = basic_machines.F, basic_machines.S
|
|
local mover_chests = basic_machines.get_mover("chests")
|
|
local check_palette_index = basic_machines.check_palette_index
|
|
|
|
local function transport(pos, meta, owner, prefer, pos1, node1, node1_name, source_chest, pos2)
|
|
prefer = prefer or meta:get_string("prefer")
|
|
local node_def, sound_def
|
|
|
|
-- checks
|
|
if prefer ~= "" then -- filter check
|
|
if prefer == node1_name then -- only take preferred node
|
|
node_def = minetest.registered_nodes[prefer]
|
|
if node_def then
|
|
if not check_palette_index(meta, node1, node_def) then -- only take preferred node with palette_index
|
|
return
|
|
end
|
|
else -- (see basic_machines.check_mover_filter)
|
|
minetest.chat_send_player(owner, S("MOVER: Filter defined with unknown node (@1) at @2, @3, @4.",
|
|
prefer, pos.x, pos.y, pos.z)); return
|
|
end
|
|
else
|
|
return
|
|
end
|
|
end
|
|
|
|
source_chest = source_chest or mover_chests[node1_name]
|
|
local node2_name = minetest.get_node(pos2).name
|
|
|
|
-- transport items
|
|
if source_chest and mover_chests[node2_name] then -- take all items from chest to chest (filter needed)
|
|
if prefer == node2_name then -- only to same chest type
|
|
local inv2 = minetest.get_meta(pos2):get_inventory()
|
|
if inv2:is_empty("main") then
|
|
local inv1 = minetest.get_meta(pos1):get_inventory()
|
|
if inv1:is_empty("main") then return end
|
|
inv2:set_list("main", inv1:get_list("main"))
|
|
inv1:set_list("main", {})
|
|
else
|
|
return
|
|
end
|
|
else
|
|
return
|
|
end
|
|
elseif node2_name == "air" then -- transport nodes parallel as defined by source1 and target, clone with complete metadata
|
|
sound_def = ((node_def or minetest.registered_nodes[node1_name] or {}).sounds or {}).place -- preparing for sound_play
|
|
local meta1 = minetest.get_meta(pos1):to_table()
|
|
minetest.set_node(pos2, node1)
|
|
if meta1 then minetest.get_meta(pos2):from_table(meta1) end
|
|
minetest.remove_node(pos1)
|
|
else -- nothing to do
|
|
return
|
|
end
|
|
|
|
local activation_count = meta:get_int("activation_count")
|
|
|
|
if sound_def and activation_count < 16 then -- play sound
|
|
minetest.sound_play(sound_def, {pitch = 0.9, pos = pos2, max_hear_distance = 12}, true)
|
|
end
|
|
|
|
return activation_count
|
|
end
|
|
|
|
basic_machines.add_mover_mode("transport",
|
|
F(S("This will move all blocks at source area to new area starting at target position\nThis mode preserves all inventories and other metadata\n" ..
|
|
"Make chest items transport: define the filter with the needed type of chest")),
|
|
F(S("transport")), transport
|
|
) |