mirror of
https://github.com/minetest-mods/digtron.git
synced 2024-12-22 12:22:22 +01:00
320a05f70d
* Apply area protections on storage nodes * Fix player undefined * Reuse codes, and add code for duplicator inventory * Add code for controller and builder * Fix luacheck
375 lines
14 KiB
Lua
375 lines
14 KiB
Lua
-- internationalization boilerplate
|
|
-- local MP = minetest.get_modpath(minetest.get_current_modname())
|
|
local S = digtron.S
|
|
-- local S = dofile(MP.."/intllib.lua")
|
|
|
|
local controller_nodebox ={
|
|
{-0.3125, -0.3125, -0.3125, 0.3125, 0.3125, 0.3125}, -- Core
|
|
{-0.1875, 0.3125, -0.1875, 0.1875, 0.5, 0.1875}, -- +y_connector
|
|
{-0.1875, -0.5, -0.1875, 0.1875, -0.3125, 0.1875}, -- -y_Connector
|
|
{0.3125, -0.1875, -0.1875, 0.5, 0.1875, 0.1875}, -- +x_connector
|
|
{-0.5, -0.1875, -0.1875, -0.3125, 0.1875, 0.1875}, -- -x_connector
|
|
{-0.1875, -0.1875, 0.3125, 0.1875, 0.1875, 0.5}, -- +z_connector
|
|
{-0.5, 0.125, -0.5, -0.125, 0.5, -0.3125}, -- back_connector_3
|
|
{0.125, 0.125, -0.5, 0.5, 0.5, -0.3125}, -- back_connector_1
|
|
{0.125, -0.5, -0.5, 0.5, -0.125, -0.3125}, -- back_connector_2
|
|
{-0.5, -0.5, -0.5, -0.125, -0.125, -0.3125}, -- back_connector_4
|
|
}
|
|
|
|
local node_inventory_table = {type="node"} -- a reusable parameter for get_inventory calls, set the pos parameter before using.
|
|
|
|
local use_texture_alpha = minetest.features.use_texture_alpha_string_modes and "opaque" or nil
|
|
|
|
-- Master controller. Most complicated part of the whole system. Determines which direction a digtron moves and triggers all of its component parts.
|
|
minetest.register_node("digtron:controller", {
|
|
description = S("Digtron Control Module"),
|
|
_doc_items_longdesc = digtron.doc.controller_longdesc,
|
|
_doc_items_usagehelp = digtron.doc.controller_usagehelp,
|
|
groups = {cracky = 3, oddly_breakable_by_hand = 3, digtron = 1},
|
|
drop = "digtron:controller",
|
|
sounds = digtron.metal_sounds,
|
|
paramtype = "light",
|
|
paramtype2= "facedir",
|
|
is_ground_content = false,
|
|
-- Aims in the +Z direction by default
|
|
tiles = {
|
|
"digtron_plate.png^[transformR90",
|
|
"digtron_plate.png^[transformR270",
|
|
"digtron_plate.png",
|
|
"digtron_plate.png^[transformR180",
|
|
"digtron_plate.png",
|
|
"digtron_plate.png^digtron_control.png",
|
|
},
|
|
|
|
drawtype = "nodebox",
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = controller_nodebox,
|
|
},
|
|
|
|
on_construct = function(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_float("fuel_burning", 0.0)
|
|
meta:set_string("infotext", S("Heat remaining in controller furnace: @1", 0))
|
|
end,
|
|
|
|
on_rightclick = function(pos, _, clicker)
|
|
local meta = minetest.get_meta(pos)
|
|
|
|
-- new delay code without nodetimer (lost on crating)
|
|
local now = minetest.get_gametime()
|
|
local last_time = (tonumber(meta:get_string("last_time")) or 0 )
|
|
|
|
-- if meta:get_string("waiting") == "true" then
|
|
if last_time + digtron.config.cycle_time > now then
|
|
-- Been too soon since last time the digtron did a cycle.
|
|
|
|
-- added for clarity
|
|
meta:set_string("infotext", S("repetition delay"))
|
|
|
|
return
|
|
end
|
|
|
|
local newpos, status = digtron.execute_dig_cycle(pos, clicker)
|
|
|
|
meta = minetest.get_meta(newpos)
|
|
if status ~= nil then
|
|
meta:set_string("infotext", status)
|
|
end
|
|
|
|
-- Start the delay before digtron can run again.
|
|
minetest.get_meta(newpos):set_string("waiting", "true")
|
|
-- minetest.get_node_timer(newpos):start(digtron.config.cycle_time)
|
|
-- new delay code
|
|
meta:set_string("last_time",tostring(minetest.get_gametime()))
|
|
end,
|
|
|
|
on_timer = function(pos)
|
|
minetest.get_meta(pos):set_string("waiting", "")
|
|
end,
|
|
})
|
|
|
|
-- Auto-controller
|
|
---------------------------------------------------------------------------------------------------------------
|
|
|
|
local auto_formspec = "size[8,6.2]" ..
|
|
default.gui_bg ..
|
|
default.gui_bg_img ..
|
|
default.gui_slots ..
|
|
"container[2.0,0]" ..
|
|
"field[0.0,0.8;1,0.1;cycles;" .. S("Cycles").. ";${cycles}]" ..
|
|
"tooltip[cycles;" .. S("When triggered, this controller will try to run for the given number of cycles.@nThe cycle count will decrement as it runs, so if it gets halted by a problem@n" ..
|
|
"you can fix the problem and restart.").. "]" ..
|
|
"button_exit[0.7,0.5;1,0.1;set;" .. S("Set").. "]" ..
|
|
"tooltip[set;" .. S("Saves the cycle setting without starting the controller running").. "]" ..
|
|
"button_exit[1.7,0.5;1,0.1;execute;" .. S("Set &\nExecute").. "]" ..
|
|
"tooltip[execute;" .. S("Begins executing the given number of cycles").. "]" ..
|
|
"field[0.0,2.0;1,0.1;slope;" .. S("Slope").. ";${slope}]" ..
|
|
"tooltip[slope;" .. S("For diagonal digging. After moving forward this number of nodes the auto controller\nwill add an additional cycle moving the digtron laterally in the\n" ..
|
|
"direction of the arrows on the side of this controller.\nSet to 0 for no lateral digging.").. "]" ..
|
|
"field[1.0,2.0;1,0.1;offset;" .. S("Offset").. ";${offset}]" ..
|
|
"tooltip[offset;" .. S("Sets the offset of the lateral motion defined in the Slope field.\nNote: this offset is relative to the controller's location.\n" ..
|
|
"The controller will move laterally when it reaches the indicated point.").. "]" ..
|
|
"field[2.0,2.0;1,0.1;period;" .. S("Delay").. ";${period}]" ..
|
|
"tooltip[period;" .. S("Number of seconds to wait between each cycle").. "]" ..
|
|
"list[current_name;stop;3.0,0.7;1,1;]" ..
|
|
"label[3.0,1.5;" .. S("Stop block").. "]" ..
|
|
"container_end[]" ..
|
|
"list[current_player;main;0,2.3;8,1;]" ..
|
|
default.get_hotbar_bg(0,2.3) ..
|
|
"list[current_player;main;0,3.5;8,3;8]" ..
|
|
"listring[current_player;main]" ..
|
|
"listring[current_name;stop]"
|
|
|
|
if minetest.get_modpath("doc") then
|
|
auto_formspec = auto_formspec ..
|
|
"button_exit[7.0,0.5;1,0.1;help;" .. S("Help") .. "]" ..
|
|
"tooltip[help;" .. S("Show documentation about this block").. "]"
|
|
end
|
|
|
|
local function auto_cycle(pos)
|
|
local node = minetest.get_node(pos)
|
|
local controlling_coordinate = digtron.get_controlling_coordinate(pos, node.param2)
|
|
local meta = minetest.get_meta(pos)
|
|
local player = minetest.get_player_by_name(meta:get_string("triggering_player"))
|
|
if player == nil or meta:get_string("waiting") == "true" then
|
|
return
|
|
end
|
|
|
|
local cycle = meta:get_int("cycles")
|
|
local slope = meta:get_int("slope")
|
|
|
|
if meta:get_string("lateral_done") ~= "true" and slope ~= 0 and (pos[controlling_coordinate] + meta:get_int("offset")) % slope == 0 then
|
|
--Do a downward dig cycle. Don't update the "cycles" count, these don't count towards that.
|
|
local newpos, status, return_code = digtron.execute_downward_dig_cycle(pos, player)
|
|
|
|
if vector.equals(pos, newpos) then
|
|
status = status .. "\n" .. S("Cycles remaining: @1", cycle) .. "\n" .. S("Halted!")
|
|
meta:set_string("infotext", status)
|
|
if return_code == 1 then --return code 1 happens when there's unloaded nodes adjacent, just keep trying.
|
|
if digtron.config.emerge_unloaded_mapblocks then
|
|
minetest.emerge_area(vector.add(pos, -80), vector.add(pos, 80))
|
|
end
|
|
minetest.after(meta:get_int("period"), auto_cycle, newpos)
|
|
else
|
|
meta:set_string("formspec", auto_formspec)
|
|
end
|
|
else
|
|
meta = minetest.get_meta(newpos)
|
|
minetest.after(meta:get_int("period"), auto_cycle, newpos)
|
|
meta:set_string("infotext", status)
|
|
meta:set_string("lateral_done", "true")
|
|
end
|
|
return
|
|
end
|
|
|
|
local newpos, status, return_code = digtron.execute_dig_cycle(pos, player)
|
|
|
|
if vector.equals(pos, newpos) then
|
|
status = status .. "\n" .. S("Cycles remaining: @1", cycle) .. "\n" .. S("Halted!")
|
|
meta:set_string("infotext", status)
|
|
if return_code == 1 then --return code 1 happens when there's unloaded nodes adjacent, call emerge and keep trying.
|
|
if digtron.config.emerge_unloaded_mapblocks then
|
|
minetest.emerge_area(vector.add(pos, -80), vector.add(pos, 80))
|
|
end
|
|
minetest.after(meta:get_int("period"), auto_cycle, newpos)
|
|
else
|
|
meta:set_string("formspec", auto_formspec)
|
|
end
|
|
return
|
|
end
|
|
|
|
meta = minetest.get_meta(newpos)
|
|
cycle = meta:get_int("cycles") - 1
|
|
meta:set_int("cycles", cycle)
|
|
status = status .. "\n" .. S("Cycles remaining: @1", cycle)
|
|
meta:set_string("infotext", status)
|
|
meta:set_string("lateral_done", "")
|
|
|
|
if cycle > 0 then
|
|
minetest.after(meta:get_int("period"), auto_cycle, newpos)
|
|
else
|
|
meta:set_string("formspec", auto_formspec)
|
|
end
|
|
end
|
|
|
|
minetest.register_node("digtron:auto_controller", {
|
|
description = S("Digtron Automatic Control Module"),
|
|
_doc_items_longdesc = digtron.doc.auto_controller_longdesc,
|
|
_doc_items_usagehelp = digtron.doc.auto_controller_usagehelp,
|
|
--Don't set a _digtron_formspec for this node_def.
|
|
--Auto-controller has special formspec handling, while active it has no formspec and right-clicking interrupts it.
|
|
groups = {cracky = 3, oddly_breakable_by_hand = 3, digtron = 1},
|
|
drop = "digtron:auto_controller",
|
|
sounds = digtron.metal_sounds,
|
|
use_texture_alpha = use_texture_alpha,
|
|
paramtype = "light",
|
|
paramtype2= "facedir",
|
|
is_ground_content = false,
|
|
-- Aims in the +Z direction by default
|
|
tiles = {
|
|
"digtron_plate.png^[transformR90^[colorize:" .. digtron.auto_controller_colorize,
|
|
"digtron_plate.png^[transformR270^[colorize:" .. digtron.auto_controller_colorize,
|
|
"digtron_plate.png^digtron_axel_side.png^[transformR270^[colorize:" .. digtron.auto_controller_colorize,
|
|
"digtron_plate.png^digtron_axel_side.png^[transformR270^[colorize:" .. digtron.auto_controller_colorize,
|
|
"digtron_plate.png^[colorize:" .. digtron.auto_controller_colorize,
|
|
"digtron_plate.png^digtron_control.png^[colorize:" .. digtron.auto_controller_colorize,
|
|
},
|
|
|
|
drawtype = "nodebox",
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = controller_nodebox,
|
|
},
|
|
|
|
on_construct = function(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_float("fuel_burning", 0.0)
|
|
meta:set_string("infotext", S("Heat remaining in controller furnace: @1", 0))
|
|
meta:set_string("formspec", auto_formspec)
|
|
-- Reusing offset and period to keep the digtron node-moving code simple, and the names still fit well
|
|
meta:set_int("period", digtron.config.cycle_time)
|
|
meta:set_int("offset", 0)
|
|
meta:set_int("cycles", 0)
|
|
meta:set_int("slope", 0)
|
|
|
|
local inv = meta:get_inventory()
|
|
inv:set_size("stop", 1)
|
|
end,
|
|
|
|
allow_metadata_inventory_put = function(pos, listname, index, stack, player)
|
|
if digtron.check_protected_and_record(pos, player)
|
|
or minetest.get_item_group(stack:get_name(), "digtron") ~= 0 then
|
|
return 0 -- pointless setting a Digtron node as a stop block
|
|
end
|
|
node_inventory_table.pos = pos
|
|
local inv = minetest.get_inventory(node_inventory_table)
|
|
inv:set_stack(listname, index, stack:take_item(1))
|
|
return 0
|
|
end,
|
|
|
|
allow_metadata_inventory_take = function(pos, listname, index, _, player)
|
|
if not digtron.check_protected_and_record(pos, player) then
|
|
node_inventory_table.pos = pos
|
|
local inv = minetest.get_inventory(node_inventory_table)
|
|
inv:set_stack(listname, index, ItemStack(""))
|
|
end
|
|
return 0
|
|
end,
|
|
|
|
on_receive_fields = function(pos, _, fields, sender)
|
|
local meta = minetest.get_meta(pos)
|
|
local offset = tonumber(fields.offset)
|
|
local period = tonumber(fields.period)
|
|
local slope = tonumber(fields.slope)
|
|
local cycles = tonumber(fields.cycles)
|
|
|
|
if period and period > 0 then
|
|
meta:set_int("period", math.max(digtron.config.cycle_time, math.floor(period)))
|
|
end
|
|
|
|
if offset then
|
|
meta:set_int("offset", offset)
|
|
end
|
|
|
|
if slope and slope >= 0 then
|
|
meta:set_int("slope", slope)
|
|
end
|
|
|
|
if cycles and cycles >= 0 then
|
|
meta:set_int("cycles", math.floor(cycles))
|
|
if sender:is_player() and cycles > 0 then
|
|
meta:set_string("triggering_player", sender:get_player_name())
|
|
if fields.execute then
|
|
meta:set_string("waiting", "")
|
|
meta:set_string("formspec", "")
|
|
auto_cycle(pos)
|
|
end
|
|
end
|
|
end
|
|
|
|
if fields.set and slope and slope > 0 then
|
|
local node = minetest.get_node(pos)
|
|
local controlling_coordinate = digtron.get_controlling_coordinate(pos, node.param2)
|
|
|
|
offset = offset or 0
|
|
local newpos = pos
|
|
local markerpos = {x=newpos.x, y=newpos.y, z=newpos.z}
|
|
local x_pos = math.floor((newpos[controlling_coordinate]+offset)/slope)*slope - offset
|
|
markerpos[controlling_coordinate] = x_pos
|
|
minetest.add_entity(markerpos, "digtron:marker_vertical")
|
|
if x_pos >= newpos[controlling_coordinate] then
|
|
markerpos[controlling_coordinate] = x_pos - slope
|
|
minetest.add_entity(markerpos, "digtron:marker_vertical")
|
|
end
|
|
if x_pos <= newpos[controlling_coordinate] then
|
|
markerpos[controlling_coordinate] = x_pos + slope
|
|
minetest.add_entity(markerpos, "digtron:marker_vertical")
|
|
end
|
|
end
|
|
|
|
if fields.help and minetest.get_modpath("doc") then --check for mod in case someone disabled it after this digger was built
|
|
minetest.after(0.5, doc.show_entry, sender:get_player_name(), "nodes", "digtron:auto_controller", true)
|
|
end
|
|
end,
|
|
|
|
on_rightclick = function(pos)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_string("infotext", meta:get_string("infotext") .. "\n" .. S("Interrupted!"))
|
|
meta:set_string("waiting", "true")
|
|
meta:set_string("formspec", auto_formspec)
|
|
end,
|
|
})
|
|
|
|
---------------------------------------------------------------------------------------------------------------
|
|
|
|
-- A much simplified control unit that only moves the digtron, and doesn't trigger the diggers or builders.
|
|
-- Handy for shoving a digtron to the side if it's been built a bit off.
|
|
minetest.register_node("digtron:pusher", {
|
|
description = S("Digtron Pusher Module"),
|
|
_doc_items_longdesc = digtron.doc.pusher_longdesc,
|
|
_doc_items_usagehelp = digtron.doc.pusher_usagehelp,
|
|
groups = {cracky = 3, oddly_breakable_by_hand=3, digtron = 1},
|
|
drop = "digtron:pusher",
|
|
sounds = digtron.metal_sounds,
|
|
use_texture_alpha = use_texture_alpha,
|
|
paramtype = "light",
|
|
paramtype2= "facedir",
|
|
is_ground_content = false,
|
|
-- Aims in the +Z direction by default
|
|
tiles = {
|
|
"digtron_plate.png^[transformR90^[colorize:" .. digtron.pusher_controller_colorize,
|
|
"digtron_plate.png^[transformR270^[colorize:" .. digtron.pusher_controller_colorize,
|
|
"digtron_plate.png^[colorize:" .. digtron.pusher_controller_colorize,
|
|
"digtron_plate.png^[transformR180^[colorize:" .. digtron.pusher_controller_colorize,
|
|
"digtron_plate.png^[colorize:" .. digtron.pusher_controller_colorize,
|
|
"digtron_plate.png^digtron_control.png^[colorize:" .. digtron.pusher_controller_colorize,
|
|
},
|
|
|
|
drawtype = "nodebox",
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = controller_nodebox,
|
|
},
|
|
|
|
on_rightclick = function(pos, _, clicker)
|
|
local meta = minetest.get_meta(pos)
|
|
if meta:get_string("waiting") == "true" then
|
|
-- Been too soon since last time the digtron did a cycle.
|
|
return
|
|
end
|
|
|
|
local newpos, status_text = digtron.execute_move_cycle(pos, clicker)
|
|
meta = minetest.get_meta(newpos)
|
|
meta:set_string("infotext", status_text)
|
|
|
|
-- Start the delay before digtron can run again.
|
|
minetest.get_meta(newpos):set_string("waiting", "true")
|
|
minetest.get_node_timer(newpos):start(digtron.config.cycle_time)
|
|
end,
|
|
|
|
on_timer = function(pos)
|
|
minetest.get_meta(pos):set_string("waiting", "")
|
|
end,
|
|
})
|