From f8dba77b21214607691ef2022ec04420d4e2abc1 Mon Sep 17 00:00:00 2001
From: MrEmielH <emiel.hubaux@gmail.com>
Date: Wed, 14 May 2014 20:07:29 +0200
Subject: [PATCH] added monitor support

monitor can be turned of in the config, everything that is passed trough the log functions is displayed on the monitor if turned on
---
 openbee.lua | 42 ++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 40 insertions(+), 2 deletions(-)

diff --git a/openbee.lua b/openbee.lua
index 9f252fb..e9ef49e 100644
--- a/openbee.lua
+++ b/openbee.lua
@@ -1,6 +1,6 @@
 local version = {
   ["major"] = 2,
-  ["minor"] = 1,
+  ["minor"] = 2,
   ["patch"] = 0
 }
 
@@ -26,7 +26,9 @@ if config == nil then
     ["chestSide"] = "top",
     ["chestDir"] = "up",
     ["productDir"] = "down",
-    ["analyzerDir"] = "east"
+    ["analyzerDir"] = "east",
+    ["monDir"] = "monitor_0",
+    ["useMonitor"] = "true"
   }
   saveFile("bee.config", config)
 end
@@ -84,11 +86,45 @@ function setupLog()
   return string.format("bee.%d.log", logCount)
 end
 
+function monWriteLine(msg)
+  if config.useMonitor then
+    mon = peripheral.wrap(config.monDir)
+    mon.write(msg)
+  end
+  if monWriteLineActive == nil or monWriteLineActive == false then
+    monWriteLineActive = true
+  end
+end
+
+function monNewLine()
+ if config.useMonitor then
+    mon = peripheral.wrap(config.monDir)
+    if monLines == nil then
+      monLines = 0
+    end
+	
+	if monWriteLineActive then
+	  monLines = monLines +1
+	  monWriteLineActive = false
+	end
+	
+    monw, monh = mon.getSize()
+    
+    if monh <= monLines then
+      mon.scroll(1)
+      monLines = monh -1
+    end
+  
+    mon.setCursorPos(1, monLines+1)
+  end
+end
+
 function log(msg)
   msg = msg or ""
   logFile.write(tostring(msg))
   logFile.flush()
   io.write(msg)
+  monWriteLine(msg)
 end
 
 function logLine(...)
@@ -98,10 +134,12 @@ function logLine(...)
     end
     logFile.write(msg)
     io.write(msg)
+    monWriteLine(msg)
   end
   logFile.write("\n")
   logFile.flush()
   io.write("\n")
+  monNewLine()
 end
 
 function getPeripherals()