From eef9568ec3b5af37be30dcaccfc1a34568904d15 Mon Sep 17 00:00:00 2001
From: Kiritow <1362050620@qq.com>
Date: Sat, 23 Jun 2018 11:03:05 +0800
Subject: [PATCH] Add mfe monitor

---
 mfe_monitor.lua | 61 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 61 insertions(+)
 create mode 100644 mfe_monitor.lua

diff --git a/mfe_monitor.lua b/mfe_monitor.lua
new file mode 100644
index 0000000..909a51e
--- /dev/null
+++ b/mfe_monitor.lua
@@ -0,0 +1,61 @@
+-- Energy monitor
+-- Does not require any external library.
+-- Designed to run on Tier 1 CPU with Tier 1 RAM
+local function gettimestr(s)
+    local ans=''
+    if(s<60) then
+        return '' .. s .. "s"
+    elseif(s<3600) then
+        return '' .. math.ceil(s/60) .. "m," .. gettimestr(s%60)
+    else
+        return '>1h'
+    end
+end
+local function xnum(x)
+    return math.ceil(x*100)/100
+end
+local component=require("component")
+local sides=require("sides")
+local serialization=require("serialization")
+local shell=require("shell")
+local args=shell.parse(...)
+local intv=1
+if(args[1]~=nil) then intv=tonumber(args[1]) end
+print("Interval:",intv)
+local m=component.proxy(component.list("ic2_te_mfe")())
+local net=component.list("modem")()
+local netok=false
+if(net~=nil) then
+    print("netcard modem found.")
+    net=component.proxy(net)
+    netok=true
+end
+local function broad(tb)
+    if(netok) then
+        net.broadcast(996,serialization.serialize(tb))
+    end
+end
+local cap=m.getCapacity()
+local post=m.getEnergy()
+print("Monitor started. Press Ctrl+Alt+C to stop it.")
+while(true) do
+    os.sleep(intv)
+    local now=m.getEnergy()
+    io.write("[" .. xnum(now/cap) .. "%] ")
+    if(now-post>=0) then
+        print("Created " .. xnum(now-post)  .. "EU. +" .. xnum((now-post)/intv/20) .. "/t. Full in " .. gettimestr(math.ceil((cap-now)/(now-post))))
+        broad({
+            ["eu"]= xnum(now-post),
+            ["per"]=xnum((now-post)/intv/20),
+            ["time"]=math.ceil((cap-now)/(now-post))
+        })
+    else
+        print("Used " .. xnum(post-now) .. "EU. -" .. xnum((post-now)/intv/20) .. "/t. Run out in " .. gettimestr(math.ceil(now/(post-now))))
+        broad({
+            ["eu"]= xnum(now-post),
+            ["per"]=xnum((now-post)/intv/20),
+            ["time"]=math.ceil(now/(post-now))
+        })
+    end
+    post=now
+end
\ No newline at end of file