xloadt from mariner

diff --git a/scripts/xloadt b/scripts/xloadt
new file mode 100755 (executable)
index 0000000..a5eaf1b
--- /dev/null
+++ b/scripts/xloadt
@@ -0,0 +1,6 @@
+#!/bin/sh -
+hostname="`hostname | sed -e 's/\..*//'`"
+xlsclients | egrep \
+ '[^ ]* xload -geometry [^ ]* -title '"'xload - $hostname'" \
+ >/dev/null && exit 0
+xload -geometry 120x120+20+0 -title "xload - $hostname"