209 lines
6.2 KiB
Lua
209 lines
6.2 KiB
Lua
--[[
|
|
|
|
Techage
|
|
=======
|
|
|
|
Copyright (C) 2020-2021 Joachim Stolberg
|
|
|
|
AGPL v3
|
|
See LICENSE.txt for more information
|
|
|
|
TA4 Terminal
|
|
|
|
]]--
|
|
|
|
local M = minetest.get_meta
|
|
local S = techage.S
|
|
|
|
local STR_LEN = 80
|
|
local HELP = [[#### TA4 Terminal ####
|
|
|
|
Send commands to the connected machine
|
|
and output text messages from the
|
|
machine.
|
|
|
|
Commands can have up to 80 characters.
|
|
Local commands:
|
|
- clear = clear screen
|
|
- help = this message
|
|
- pub = switch to public use
|
|
- priv = switch to private use
|
|
- connect <num> = connect the machine
|
|
|
|
All other commands are machine dependent.
|
|
]]
|
|
|
|
local function get_string(meta, num, default)
|
|
local s = meta:get_string("bttn_text"..num)
|
|
if not s or s == "" then
|
|
return default
|
|
end
|
|
return s
|
|
end
|
|
|
|
local function formspec2(mem)
|
|
mem.command = mem.command or ""
|
|
mem.output = mem.output or ""
|
|
local output = minetest.formspec_escape(mem.output)
|
|
output = output:gsub("\n", ",")
|
|
local command = minetest.formspec_escape(mem.command)
|
|
local bttn_text1 = get_string(meta, 1, "User1")
|
|
local bttn_text2 = get_string(meta, 2, "User2")
|
|
local bttn_text3 = get_string(meta, 3, "User3")
|
|
local bttn_text4 = get_string(meta, 4, "User4")
|
|
local bttn_text5 = get_string(meta, 5, "User5")
|
|
local bttn_text6 = get_string(meta, 6, "User6")
|
|
local bttn_text7 = get_string(meta, 7, "User7")
|
|
local bttn_text8 = get_string(meta, 8, "User8")
|
|
local bttn_text9 = get_string(meta, 9, "User9")
|
|
return "size[10,8]"..
|
|
"style_type[table,field;font=mono]"..
|
|
"button[0,0;3.3,1;bttn1;"..bttn_text1.."]button[3.3,0;3.3,1;bttn2;"..bttn_text2.."]button[6.6,0;3.3,1;bttn3;"..bttn_text3.."]"..
|
|
"button[0,0.8;3.3,1;bttn4;"..bttn_text4.."]button[3.3,0.8;3.3,1;bttn5;"..bttn_text5.."]button[6.6,0.8;3.3,1;bttn6;"..bttn_text6.."]"..
|
|
"button[0,1.6;3.3,1;bttn7;"..bttn_text7.."]button[3.3,1.6;3.3,1;bttn8;"..bttn_text8.."]button[6.6,1.6;3.3,1;bttn9;"..bttn_text9.."]"..
|
|
"table[0,2.5;9.8,4.7;output;"..output..";200]"..
|
|
"field[0.4,7.7;7.6,1;cmnd;;"..mem.command.."]" ..
|
|
"field_close_on_enter[cmnd;false]"..
|
|
"button[7.9,7.4;2,1;enter;"..S("Enter").."]"
|
|
end
|
|
|
|
local function output(pos, text)
|
|
local mem = techage.get_mem(pos)
|
|
mem.output = mem.output .. "\n" .. (text or "")
|
|
mem.output = mem.output:sub(-500,-1)
|
|
M(pos):set_string("formspec", formspec2(mem))
|
|
end
|
|
|
|
local function command(pos, mem, player)
|
|
local meta = minetest.get_meta(pos)
|
|
local owner = meta:get_string("owner")
|
|
|
|
if mem.command == "clear" then
|
|
mem.output = ""
|
|
mem.command = ""
|
|
meta:set_string("formspec", formspec2(mem))
|
|
elseif mem.command == "" then
|
|
output(pos, ">")
|
|
mem.command = ""
|
|
meta:set_string("formspec", formspec2(mem))
|
|
elseif mem.command == "help" then
|
|
local meta = minetest.get_meta(pos)
|
|
mem.output = HELP
|
|
mem.command = ""
|
|
meta:set_string("formspec", formspec2(mem))
|
|
elseif mem.command == "pub" and owner == player then
|
|
meta:set_int("public", 1)
|
|
output(pos, "> "..mem.command)
|
|
mem.command = ""
|
|
output(pos, "Switched to public use!")
|
|
elseif mem.command == "priv" and owner == player then
|
|
meta:set_int("public", 0)
|
|
output(pos, "> "..mem.command)
|
|
mem.command = ""
|
|
output(pos, "Switched to private use!")
|
|
elseif meta:get_int("public") == 1 or owner == player then
|
|
if mem.command == "clear" then
|
|
mem.output =
|
|
mem.command = ""
|
|
meta:set_string("formspec", formspec2(mem))
|
|
end
|
|
end
|
|
end
|
|
|
|
minetest.register_node("techage:ta4_terminal", {
|
|
description = "TA4 Collider Terminal",
|
|
tiles = {
|
|
-- up, down, right, left, back, front
|
|
'techage_terminal1_top.png',
|
|
'techage_terminal1_bottom.png',
|
|
'techage_terminal1_side.png',
|
|
'techage_terminal1_side.png',
|
|
'techage_terminal1_bottom.png',
|
|
"techage_terminal1_front.png",
|
|
},
|
|
drawtype = "nodebox",
|
|
node_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
{-12/32, -16/32, -8/32, 12/32, -14/32, 12/32},
|
|
{-12/32, -14/32, 12/32, 12/32, 6/32, 14/32},
|
|
},
|
|
},
|
|
selection_box = {
|
|
type = "fixed",
|
|
fixed = {
|
|
{-12/32, -16/32, -8/32, 12/32, -14/32, 12/32},
|
|
{-12/32, -14/32, 12/32, 12/32, 6/32, 14/32},
|
|
},
|
|
},
|
|
|
|
after_place_node = function(pos, placer)
|
|
local number = techage.add_node(pos, minetest.get_node(pos).name)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_string("formspec", formspec1())
|
|
meta:set_string("owner", placer:get_player_name())
|
|
meta:set_string("infotext", S("TA4 Collider Terminal") .. ": " .. S("not connected")
|
|
end,
|
|
|
|
on_receive_fields = function(pos, formname, fields, player)
|
|
local meta = minetest.get_meta(pos)
|
|
local mem = techage.get_mem(pos)
|
|
if fields.number and fields.number ~= "" then
|
|
local owner = meta:get_string("owner")
|
|
if techage.check_numbers(fields.number, owner) then
|
|
local own_number = meta:get_string("own_number")
|
|
if techage.send_single(own_number, fields.number, "connect") == true then
|
|
meta:set_string("number", fields.number)
|
|
meta:set_string("infotext", S("TA4 Collider Terminal") .. ": " .. S("connected with") .. " " .. fields.number)
|
|
meta:set_string("formspec", formspec2(mem))
|
|
end
|
|
end
|
|
elseif (fields.enter or fields.key_enter_field) and fields.cmnd then
|
|
mem.command = string.sub(fields.cmnd, 1, STR_LEN)
|
|
command(pos, mem, player:get_player_name())
|
|
elseif fields.key_up then
|
|
mem.command = pdp13.historybuffer_priv(pos)
|
|
meta:set_string("formspec", formspec2(mem))
|
|
elseif fields.key_down then
|
|
mem.command = pdp13.historybuffer_next(pos)
|
|
meta:set_string("formspec", formspec2(mem))
|
|
end
|
|
end,
|
|
|
|
after_dig_node = function(pos, oldnode, oldmetadata)
|
|
techage.remove_node(pos, oldnode, oldmetadata)
|
|
end,
|
|
|
|
paramtype = "light",
|
|
use_texture_alpha = techage.CLIP,
|
|
sunlight_propagates = true,
|
|
paramtype2 = "facedir",
|
|
groups = {choppy=2, cracky=2, crumbly=2},
|
|
is_ground_content = false,
|
|
sounds = default.node_sound_metal_defaults(),
|
|
})
|
|
|
|
minetest.register_craft({
|
|
output = "techage:ta4_terminal",
|
|
recipe = {
|
|
{"", "techage:ta4_display", ""},
|
|
{"dye:black", "techage:ta4_wlanchip", "default:copper_ingot"},
|
|
{"", "techage:aluminum", ""},
|
|
},
|
|
})
|
|
|
|
techage.register_node({"techage:ta4_terminal"}, {
|
|
on_recv_message = function(pos, src, topic, payload)
|
|
if topic == "term" then
|
|
output(pos, payload)
|
|
return true
|
|
elseif topic == "clear" then
|
|
local mem = techage.get_mem(pos)
|
|
mem.output = ""
|
|
mem.command = ""
|
|
M(pos):set_string("formspec", formspec2(mem))
|
|
return true
|
|
end
|
|
end,
|
|
})
|