106 lines
2.4 KiB
Lua
106 lines
2.4 KiB
Lua
|
--[[
|
||
|
|
|
||
|
|
ICTA Controller
|
||
|
|
===============
|
||
|
|
|
||
|
|
Part of the SmartLine mod
|
||
|
|
|
||
|
|
Copyright (C) 2018 Joachim Stolberg
|
||
|
|
|
||
|
|
LGPLv2.1+
|
||
|
|
See LICENSE.txt for more information
|
||
|
|
|
||
|
|
action.lua
|
||
|
|
|
||
|
|
]]--
|
||
|
|
|
||
|
|
local sl = smartline
|
||
|
|
|
||
|
|
--local mail_exists = minetest.get_modpath("mail") and mail ~= nil TODO
|
||
|
|
|
||
|
|
-- tables with all data from action registrations
|
||
|
|
local kvRegisteredActn = {}
|
||
|
|
|
||
|
|
-- list of keys for actions
|
||
|
|
local aActnTypes = {}
|
||
|
|
|
||
|
|
-- list of titles for actions
|
||
|
|
local aActnTitles = {}
|
||
|
|
|
||
|
|
--
|
||
|
|
-- API function for action registrations
|
||
|
|
--
|
||
|
|
function sl.icta_register_action(key, tData)
|
||
|
|
table.insert(aActnTypes, key)
|
||
|
|
table.insert(aActnTitles, tData.title)
|
||
|
|
tData.__idx__ = #aActnTypes
|
||
|
|
if kvRegisteredActn[key] ~= nil then
|
||
|
|
print("[SmartLine] Action registration error "..key)
|
||
|
|
return
|
||
|
|
end
|
||
|
|
kvRegisteredActn[key] = tData
|
||
|
|
for _,item in ipairs(tData.formspec) do
|
||
|
|
if item.type == "textlist" then
|
||
|
|
item.tChoices = string.split(item.choices, ",")
|
||
|
|
item.num_choices = #item.tChoices
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
-- return formspec string
|
||
|
|
function sl.actn_formspec(row, kvSelect)
|
||
|
|
return sl.submenu_generate_formspec(
|
||
|
|
row, "actn", "Action type", aActnTypes, aActnTitles, kvRegisteredActn, kvSelect)
|
||
|
|
end
|
||
|
|
|
||
|
|
-- evaluate the row action input
|
||
|
|
-- and return new data
|
||
|
|
function sl.actn_eval_input(kvSelect, fields)
|
||
|
|
kvSelect = sl.submenu_eval_input(kvRegisteredActn, aActnTypes, aActnTitles, kvSelect, fields)
|
||
|
|
return kvSelect
|
||
|
|
end
|
||
|
|
|
||
|
|
|
||
|
|
-- return the Lua code
|
||
|
|
function sl.code_action(kvSelect, environ)
|
||
|
|
if kvSelect and kvRegisteredActn[kvSelect.choice] then
|
||
|
|
if smartline.submenu_verify(kvRegisteredActn, kvSelect) then
|
||
|
|
return kvRegisteredActn[kvSelect.choice].code(kvSelect, environ)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
return nil
|
||
|
|
end
|
||
|
|
|
||
|
|
sl.icta_register_action("default", {
|
||
|
|
title = "",
|
||
|
|
formspec = {},
|
||
|
|
code = function(data, environ) return false, false end,
|
||
|
|
button = function(data, environ) return "..." end,
|
||
|
|
})
|
||
|
|
|
||
|
|
sl.icta_register_action("print", {
|
||
|
|
title = "print to output window",
|
||
|
|
formspec = {
|
||
|
|
{
|
||
|
|
type = "ascii",
|
||
|
|
name = "text",
|
||
|
|
label = "Output the following text",
|
||
|
|
default = "",
|
||
|
|
},
|
||
|
|
{
|
||
|
|
type = "label",
|
||
|
|
name = "lbl",
|
||
|
|
label = "Use a '*' character as reference to any\ncondition state",
|
||
|
|
},
|
||
|
|
},
|
||
|
|
button = function(data, environ)
|
||
|
|
return 'print("'..data.text:sub(1,12)..'")'
|
||
|
|
end,
|
||
|
|
code = function(data, environ)
|
||
|
|
local s1 = 'local text = string.gsub("'..(smartline.escape(data.text))..'", "*", env.result[#])'
|
||
|
|
local s2 = 'output(env.pos, text)'
|
||
|
|
return s1.."\n\t"..s2
|
||
|
|
end,
|
||
|
|
})
|
||
|
|
|