Added server ups

modules/gui/server-ups.lua

@@ -0,0 +1,62 @@
+--[[-- Gui Module - Server UPS
+    - Adds a server ups counter in the top right and a command to toggle is
+    @gui sverer-ups
+    @alias sverer_ups
+]]
+
+local Gui = require 'expcore.gui' --- @dep expcore.gui
+local Event = require 'utils.event' --- @dep utils.event
+local Commands = require 'expcore.commands' --- @dep expcore.commands
+
+--- Label to show the server ups
+-- @element sverer_ups
+local sverer_ups =
+Gui.element{
+    type = 'label',
+    caption = 'Server UPS = 60.0'
+}
+:style{
+    font = 'default-game'
+}
+
+--- Toggles if the server ups is visbile
+-- @command server-ups
+Commands.new_command('server-ups','Toggle the server ups display')
+:add_alias('sups','ups')
+:register(function(player)
+    local label = player.gui.screen[sverer_ups.name]
+    label.visible = not label.visible
+end)
+
+-- Set the location of the label
+-- 1920x1080: x=1455, y=30 (ui scale 100%)
+local function set_location(event)
+    local player = game.players[event.player_index]
+    local label = player.gui.screen[sverer_ups.name]
+    local res = player.display_resolution
+    local uis = player.display_scale
+    label.location = { x=res.width-465*uis, y=30*uis }
+end
+
+-- Draw the label when the player joins
+Event.add(defines.events.on_player_created,function(event)
+    local player = game.players[event.player_index]
+    local label = sverer_ups(player.gui.screen)
+    label.visible = false
+    set_location(event)
+end)
+
+-- Update the caption for all online players
+Event.on_nth_tick(60,function()
+    local caption = 'Server UPS = 60.0'
+    if global.ext and global.ext.server_ups then
+        caption = 'Server UPS = '..global.ext.server_ups
+    end
+    for _,player in pairs(game.connected_players) do
+        player.gui.screen[sverer_ups.name].caption = caption
+    end
+end)
+
+-- Update when res or ui scale changes
+Event.add(defines.events.on_player_display_resolution_changed,set_location)
+Event.add(defines.events.on_player_display_scale_changed,set_location)