cc-mek-scada/graphics/elements/indicator_data.lua

-- Data Indicator Graphics Element

local util    = require("scada-common.util")

local element = require("graphics.element")

---@class data_indicator_args
---@field label string indicator label
---@field unit? string indicator unit
---@field format string data format (lua string format)
---@field label_unit_colors? cpair label foreground color (a), unit foreground color (b)
---@field default any default value
---@field parent graphics_element
---@field x? integer 1 if omitted
---@field y? integer 1 if omitted
---@field width integer length
---@field fg_bg cpair foreground/background colors

-- new data indicator
---@param args data_indicator_args
local function data_indicator(args)
    -- create new graphics element base object
    local e = element.new(args)

    -- label color
    if args.label_unit_colors ~= nil then
        e.window.setForegroundColor(args.label_unit_colors.color_a)
    end

    -- write label
    e.setCursorPos(1, 1)
    e.window.write(args.label)

    local data_start = string.len(args.label) + 2

    -- on state change
    ---@param value any new value
    function e.on_update(value)
        local data_str = util.sprintf(args.format, value)

        -- write data
        e.window.setCursorPos(data_start, 1)
        e.window.setForegroundColor(e.fg_bg.fgd)
        e.window.write(data_str)

        -- write label
        if args.unit ~= nil then
            if args.label_unit_colors ~= nil then
                e.window.setForegroundColor(args.label_unit_colors.color_b)
            end
            e.window.write(" " .. args.unit)
        end
    end

    -- initial value draw
    e.on_update(args.default)

    return e.get()
end

return data_indicator