function td(content) return "" .. content .. "" end function tr(...) local ret = "" for i,s in ipairs(arg) do ret = ret .. s end return "" .. ret .. "\n" end function sensor_to_tr(id,sensor) return tr(td(sensor["name"]), td(sensor["measure_last"]), td(sensor["measure_min"]), td(sensor["measure_max"])) end str = "

Psensor Monitoring Server

" if cpu and cpu["load"] then str = str .. "

System

" .. "" .. "" .. "" .. "
NameValue
CPU Usage" .. math.ceil(100*cpu["load"]) .. "%
" end str = str .. "

Sensors

" .. "" .. "" for i,sensor in ipairs(sensors) do str = str .. sensor_to_tr(i,sensor) end str = str .. "
NameValueMinMax

psensor-server" return str