View difference between Paste ID: i2ZriqN9 and NDNaK5cu

 function write(color, line, caption, text)
   local monitor = peripheral.find("monitor")
   monitor.setCursorPos(1, line)
-  local reactor = peripheral.wrap("BigReactors-Reactor_0")
+
   monitor.write(caption)
   monitor.setTextColor(color)
-  monitor.setTextScale(0.5)
+  monitor.write(text)
   return line + 1
-  local low = 100000
+end
-  local high = 9000000
+
-  local max = 10000000
+function findReactors()
   local reactors = {}
-  reactor.setAllControlRodLevels(reactor.getEnergyStored() * 100 / max)
+  local allReactors = {peripheral.find("BigReactors-Reactor")}
   local i = 0
-  monitor.setCursorPos(1,1)
+  for k, v in pairs(allReactors) do
     print("Found reactor " .. i)
-  monitor.write("Active: ")
+    local reactor = {}
-  monitor.setTextColor(colors.lime)
+    reactor.lastRf = 0
-  monitor.write(reactor.getActive())
+    reactor.maxControlRods = v.getNumberOfControlRods() * 100
-
+    reactor.controlRods = reactor.maxControlRods
-  monitor.setCursorPos(1,2)
+    reactor.energyProduced = 0
     reactor.fuelConsumed = 0
-  monitor.write("RF/T: ")
+    reactor.tickCount = 0
-  monitor.setTextColor(colors.lime)
+    reactor.api = v
-  monitor.write(math.floor(reactor.getEnergyProducedLastTick()))
+    reactor.lastCasingTemperature = 0
-
+    reactor.lastFuelTemperature= 0
-  monitor.setCursorPos(1,3)
+    reactors[i] = reactor
     i = i + 1
-  monitor.write("RF Stored: ")
+  end
-  monitor.setTextColor(colors.lime)
+  return reactors
-  monitor.write(math.floor(reactor.getEnergyStored()))
+end
-
+
-  monitor.setCursorPos(1,4)
+function findTurbines()
   local turbines = {}
-  monitor.write("Casing Heat: ")
+  local allTurbines = {peripheral.find("BigReactors-Turbine")}
-  monitor.setTextColor(colors.lime)
+  local i = 0
-  monitor.write(math.floor(reactor.getCasingTemperature()))
+  for k, v in pairs(allTurbines) do
-
+    print("Found turbine " .. i)
-  monitor.setCursorPos(1,5)
+    local turbine = {}
     turbine.api = v
-  monitor.write("Fuel Heat: ")
+    turbines[i] = turbine
-  monitor.setTextColor(colors.lime)
+    i = i + 1
-  monitor.write(math.floor(reactor.getFuelTemperature()))
+  end
   return turbines
-  monitor.setCursorPos(1,6)
+end
 
-  monitor.write("Control Rods: ")
+function reactorControl(line, rt, reduceEnergy)
-  monitor.setTextColor(colors.lime)
+
-  monitor.write(math.floor(reactor.getControlRodLevel(0)))
+
   local reactor = rt.api
-  -- End Reactor 1
+
 
-  sleep(1)
+  local rfStored = math.floor(reactor.getEnergyStored() / 100000)
   local fuelTemperature = reactor.getFuelTemperature()
   local casingTemperature = reactor.getCasingTemperature()
 
   if math.abs(fuelTemperature - rt.lastFuelTemperature) < 3 and math.abs(casingTemperature - rt.lastCasingTemperature) < 3 or rt.controlRods == rt.maxControlRods then
     if reduceEnergy then
       if rfStored >= rt.lastRf then
         rt.controlRods = rt.controlRods + 2
       end
     else
       if rfStored < rt.lastRf then
         rt.controlRods = rt.controlRods - 2
       end
       if rfStored > rt.lastRf then
         rt.controlRods = rt.controlRods + 2
       end
       if rfStored == rt.lastRf then
         if rfStored > 90 then
           rt.controlRods = rt.controlRods + 2
         end
       end
       if rfStored < 1 then
         rt.controlRods = rt.controlRods - 2
       end
     end
   end
 
   if rt.controlRods > rt.maxControlRods then
     rt.controlRods = rt.maxControlRods
   end
   if rt.controlRods < 0 then
     rt.controlRods = 0
   end
 
   if not reactor.getActive() then
     rt.controlRods = rt.maxControlRods
   end
 
   rt.lastRf = rfStored
   rt.lastFuelTemperature = fuelTemperature
   rt.lastCasingTemperature = casingTemperature
 
   local level = math.ceil(rt.controlRods * 100 / rt.maxControlRods)
   local numberOfReduced = (level * rt.api.getNumberOfControlRods()) - rt.controlRods
 
   for i = 1,numberOfReduced do
     reactor.setControlRodLevel(i-1, level-1)
   end
   for i = numberOfReduced + 1,reactor.getNumberOfControlRods() do
     reactor.setControlRodLevel(i-1, level)
   end
 
   if reactor.getActive() then
     rt.energyProduced = (rt.energyProduced * rt.tickCount + reactor.getEnergyProducedLastTick()) / (rt.tickCount + 1)
     rt.fuelConsumed = (rt.fuelConsumed * rt.tickCount + reactor.getFuelConsumedLastTick()) / (rt.tickCount + 1)
     rt.tickCount = rt.tickCount + 1
     if (rt.tickCount > 600) then
       rt.tickCount = 600
     end
   end
 
   local color
   if reactor.getActive() then
     color = colors.lime
   else
     color = colors.red
   end
 
   line = write(color, line, "RF/T         : ", math.floor(reactor.getEnergyProducedLastTick()) .. " (" .. math.floor(rt.energyProduced) .. ")")
   line = write(color, line, "mB/T         : ", math.floor(reactor.getFuelConsumedLastTick() * 1000) / 1000 .. " (" .. math.floor(rt.fuelConsumed * 1000) / 1000 .. ")")
   line = write(color, line, "RF/mB        : ", math.floor(reactor.getEnergyProducedLastTick() / reactor.getFuelConsumedLastTick()) .. " (" .. math.floor(rt.energyProduced / rt.fuelConsumed).. ")")
   line = line + 1
   line = write(color, line, "Fuel Amount  : ", math.floor(reactor. getFuelAmount()) .. " (" .. math.floor(reactor.getFuelAmount() * 1000  / reactor.getFuelAmountMax()) / 10 .. "%)")
   line = line + 1
   line = write(color, line, "Heat (C/F)   : ", math.floor(reactor.getCasingTemperature()) .. " / " .. math.floor(reactor.getFuelTemperature()))
   line = line + 1
   line = write(color, line, "Control Rods : ", math.floor(rt.controlRods * 100 / rt.maxControlRods * 10) / 10)
 
   return line
 
 end
 
 function sumEnergyStored(list)
   local value = 0
   for k,v in pairs(list) do
     value = v.api.getEnergyStored() + value
   end
   return value
 end
 
 function checkReduce(turbines)
   for k,v in pairs(turbines) do
     if v.api.getEnergyStored() > 900000 then
       return true
     end
   end
   return false
 end
 
 function loop(reactors, turbines)
   local lastRfTurbine = 0
   while true do
     local monitor = peripheral.find("monitor")
     monitor.clear()
     monitor.setTextScale(1)
     local line = 1
     local rfTurbine = sumEnergyStored(turbines)
     local rfReactors = sumEnergyStored(reactors)
     local reduceEnergy
     if math.floor(rfTurbine / 100) > math.floor(lastRfTurbine / 100) then
       lastRfTurbine = rfTurbine
       reduceEnergy = true
     end
     if math.floor(lastRfTurbine / 100) > math.floor(rfTurbine / 100) then
       lastRfTurbine = rfTurbine
       reduceEnergy = false
     end
     if math.floor(lastRfTurbine / 100) == math.floor(rfTurbine / 100) then
       reduceEnergy = checkReduce(turbines)
     end
     local color = colors.lime
     if reduceEnergy then
       color = colors.red
     end
     line = write(color, line, "RF Stored    : ", math.floor(rfTurbine + rfReactors))
     line = line + 2
 
     for k,v in pairs(reactors) do
       line = reactorControl(line, v, reduceEnergy) + 3
     end
     lastRfTurbine = rfTurbine
     sleep(2)
   end
 end
 
 function doLoop()
   local reactorList = findReactors()
   local turbineList = findTurbines()
   loop(reactorList, turbineList)
 end
 
 while true do
   local status, message = pcall(doLoop)
   local monitor = peripheral.find("monitor")
   monitor.clear()
   monitor.setTextScale(1)
   write(colors.red, 1, "Error : ", message)
   sleep(10)
 end