techage_modpack/minecart/terminal.lua
2023-03-05 11:54:37 +01:00

135 lines
3.6 KiB
Lua

--[[
Minecart
========
Copyright (C) 2019-2023 Joachim Stolberg
MIT
See license.txt for more information
]]--
-- for lazy programmers
local M = minetest.get_meta
local S = minecart.S
local function is_player_nearby(pos)
for _, object in pairs(minetest.get_objects_inside_radius(pos, 6)) do
if object:is_player() then
return true
end
end
end
local function formspec(pos, text)
text = minetest.formspec_escape(text)
text = text:gsub("\n", ",")
return "size[11,9]"..
default.gui_bg..
default.gui_bg_img..
default.gui_slots..
"box[0,-0.1;10.8,0.5;#c6e8ff]"..
"label[4.5,-0.1;"..minetest.colorize( "#000000", S("Cart List")).."]"..
"style_type[table,field;font=mono]"..
"table[0,0.5;10.8,8.6;output;"..text..";200]"
end
minetest.register_node("minecart:terminal", {
description = S("Cart Terminal"),
inventory_image = "minecart_terminal_front.png",
tiles = {
"minecart_terminal_top.png",
"minecart_terminal_top.png",
"minecart_terminal_side.png",
"minecart_terminal_side.png",
"minecart_terminal_back.png",
"minecart_terminal_front.png",
},
drawtype = "nodebox",
node_box = {
type = "fixed",
fixed = {
{ -8/16, -8/16, 0/16, 8/16, 8/16, 8/16},
},
},
after_place_node = function(pos, placer)
local meta = M(pos)
meta:set_string("owner", placer:get_player_name())
meta:set_string("formspec", formspec(pos, ""))
if minetest.global_exists("techage") then
local number = techage.add_node(pos, "minecart:terminal")
meta:set_string("node_number", number)
meta:set_string("infotext", "Cart Terminal " .. number)
end
minetest.get_node_timer(pos):start(2)
end,
on_timer = function(pos, elapsed)
if is_player_nearby(pos) then
local text = minecart.get_cart_list(pos, M(pos):get_string("owner"))
M(pos):set_string("formspec", formspec(pos, text))
end
return true
end,
paramtype2 = "facedir",
paramtype = "light",
use_texture_alpha = minecart.CLIP,
on_rotate = screwdriver.disallow,
sunlight_propagates = true,
is_ground_content = false,
groups = {cracky = 2, level = 2},
sounds = default.node_sound_metal_defaults(),
})
minetest.register_craft({
output = "minecart:terminal",
recipe = {
{"", "default:obsidian_glass", "default:steel_ingot"},
{"", "default:obsidian_glass", "default:copper_ingot"},
{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
},
})
minetest.register_on_mods_loaded(function()
if minetest.global_exists("techage") then
techage.register_node({"minecart:terminal"}, {
on_recv_message = function(pos, src, topic, payload)
local number = tonumber(payload)
if number then
local owner = M(pos):get_string("owner")
if topic == "state" then
return minecart.cmnd_cart_state(owner, number)
elseif topic == "distance" then
return minecart.cmnd_cart_distance(owner, number, pos)
else
return "unsupported"
end
end
end,
on_beduino_receive_cmnd = function(pos, src, topic, payload)
return 2 -- unknown or invalid topic
end,
on_beduino_request_data = function(pos, src, topic, payload)
if topic == 128 then
return 0, "minecart:terminal"
elseif topic == 129 then -- state
local owner = M(pos):get_string("owner")
local STATE = {unknown = 0, stopped = 1, running = 2}
local state = STATE[minecart.cmnd_cart_state(owner, payload[1])] or 0
return 0, {state}
elseif topic == 130 then -- distance
local owner = M(pos):get_string("owner")
local dist = minecart.cmnd_cart_distance(owner, payload[1], pos)
return 0, {dist}
else
return 2, "" -- topic is unknown or invalid
end
end,
})
end
end)